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