MACRO JCLRTFRILLS20 IS ( LITERAL (OMFLIB) %OMFLIB:= "O20", LITERAL (DELETE) %DELETE:= 'YES') MACBEGIN STRING %DELFILE := %OMFLIB+'.ICL9LPJCLPROCS(-1)' BEGIN ADDJCLRTSYN20(%%OMFLIB) SETUPRTTEMPL20(%%OMFLIB) IF %DELETE = 'YES' THEN SMSG('DELETE COMMENCES') SMSG('***************:') FI IF %DELETE = 'YES' THEN ENTER XF(%%DELFILE) FI END MACEND