Return 16

/* rexx */
“isredit macro”
“isredit (cur) = cursor”
lineno = cur
line = “//JOBCARD  JOB ,’Name’,NOTIFY=&SYSUID.,”
“isredit line_after “lineno” = (line)”
line = “//            MSGCLASS=A,MSGLEVEL (1,1),CLASS=A”
“isredit line_after “lineno+1″ = (line)”
line = “//“
“isredit line_after “lineno+2″ = (line)”

Macro: Insert job card template
About: An isredit macro to insert a job card into a member open in ispf edit.
Usage: Allocate the macro to your sysproc or sysexec in your login proc or dynamically with ‘tso alloc fi(sysproc) da(‘macro.dataset’) shr reu’. Enter the macro name on the command line and either press enter to insert at the top of the member, or place your cursor where you would like to insert and then press enter.