.; ink.cmd - create a ''foo.cmd .; p1 name of .cmd file foo .; p2 purpose of .cmd file install_lisp.cob .; #2 file to write commands to for backout .; #3 file to write requirements .; .; backout: delete lb:''-.cmd .; .enable substitution .enable escape .data #3 you will need system command file 'p1'.cmd for 'p2' .sets cnam "LB:'''p1'.CMD" @ini ...pip $pip DEC_file_utility .testfile 'cnam' .if <> 1 .goto 100 ; 'cnam' already exists. ; I can (1) supercede it or (2) leave it alone .testfile 'cnam' .sets old "''" .testfile 'p1'.cmd .sets new "''" .ask superc Supercede 'old' with 'new' .iff superc .exit .100: .retry: pip 'cnam'/nv=sy:'''p1'.cmd .if = .goto made ; PROBLEM -- I couldn''t install 'cnam' ; 'cnam' is used for 'p2' .asks junk type to continue regardless, to retry .ift .goto banzai ; PAUSING so you can correct the problem before retrying .pause .goto retry .banzai: .made: .testfile 'cnam' .data #2 pip ''/de/nm .exit