IBM Mainframe Forum

Hi,

I am coding a REXX program to write jcl skeletons. The jcl skeletons will be written on that line where the user provides a particular label (eg .k) . After writing the jcl skeleton, I want to remove the label in that particular line. Could anyone suggest me how to do this?
This is how I check the line number where the user has keyed in the label or not -

'(LN) = LINENUM .K'
IF RC = 8 THEN
DO
SAY "LABEL K NOT FOUND"
EXIT
END

Thanks!

Got the anwer for this. It should be -
ADDRESS ISREDIT 'RESET LABEL .K .K' at the end of the jcl skeleton.