.; .; Command file for assembling and building the .; FNDSRV find service task. .; .ENABLE SUBSTITUTION .ASK IASM Do you want to assemble .ASK ITKB Do you want to taskbuild .IFF IASM .GOTO GO .ASK LST Do you want an assembly listing .IFT LST .SETS LIST ",FNDSRV/-SP" .IFF LST .SETS LIST "" .GO: .IFF ITKB .GOTO GO1 .ASK ODT Do you want ODT .IFT ODT .SETS ODT1 "/DA" .IFF ODT .SETS ODT1 "" .GO1: .; .; ASSEMBLY .; .ASSM: .IFF IASM .GOTO NOASM MAC FNDSRV'LIST'=[1,1]NETLIB.MLB/ML,''QUEUE.MLB/ML,''FNDSRV .IF NE 1 .EXIT .; .; TASK BUILD .; .NOASM: .IFF ITKB .GOTO NOTKB .; .OPEN FNDSRVBLD.CMD .ENABLE DATA FNDSRV/-CP/ID'ODT1',FNDSRV/-SP=FNDSRV / STACK=200 WNDWS=1 ASG=TI:1 ASG=NS:2 ASG=NS:3 // .DISABLE DATA .CLOSE FNDSRVBLD.CMD .; TKB @FNDSRVBLD.CMD .; .NOTKB: .; .; CLEAN UP .; PIP FNDSRVBLD.CMD;*/DE/NM PIP FNDSRV.*/PU