@SET PATH = "/home/cfwy/cdd/cdd"
@SET DATE&TIME = GETDATE()
@SET DATE = COPY(DATE&TIME,1,6)
@CHDIR(PATH)
@COMMENT("The current UNIX directory is : ",GETDIR())
@CHECK("OFF")
@CHDIR(DATE)
@IFERROR THEN SET DEXIST = 0
@ELSE SET DEXIST = 1
@IF DEXIST = 0 THEN EXECUTE("rm -R ./* > /dev/null")
@IF DEXIST = 0 THEN MKDIR(DATE)
@IF DEXIST = 0 THEN CHDIR(DATE)
@SET DEXIST = 1
@COMMENT("!! New Directory is created :",GETDIR(),DATE," !!")
@COMMENT("The Log will be created in directory :","=>",GETDIR())
@FOR result= 1 TO 8
@IF result = 1 THEN SET systemid="CFBSC1B"
@IF result = 2 THEN SET systemid="CFBSC2B"
@IF result = 3 THEN SET systemid="CFBSC3"
@IF result = 4 THEN SET systemid="CFBSC4"
@IF result = 5 THEN SET systemid="CFBSC6"
@IF result = 6 THEN SET systemid="CFBSC7"
@IF result = 7 THEN SET systemid="CFBSC8"
@IF result = 8 THEN SET systemid="CFBSC9"
@connect(systemid)
@IF result = 1THEN log ("CFBSC1B.log")
@IF result = 2THEN log ("CFBSC2B.log")
@IF result = 3THEN log ("CFBSC3.log")
@IF result = 4THEN log ("CFBSC4.log")
@IF result = 5THEN log ("CFBSC6.log")
@IF result = 6THEN log ("CFBSC7.log")
@IF result = 7THEN log ("CFBSC8.log")
@IF result = 8THEN log ("CFBSC9.log")
CACLP;
RLTYP;
RLLBP;
RLDCP;
RLLSP;
RLOMP;
RLVAP;
RLCAP;
RLVLP;
PLLDP;
RAEPP:ID=ALL;
RLDEP:CELL=ALL;
RLDEP:CELL=ALL,EXT;
RLSTP:CELL=ALL;
RLCFP:CELL=ALL;
RLCHP:CELL=ALL;
RLNRP:CELL=ALL;
RLCPP:CELL=ALL;
RLCPP:CELL=ALL,EXT;
RLPCP:CELL=ALL;
RLLHP:CELL=ALL;
RLLHP:CELL=ALL,EXT;
RLLOP:CELL=ALL;
RLLOP:CELL=ALL,EXT;
RLCXP:CELL=ALL;
RLHPP:CELL=ALL;
RLBCP:CELL=ALL;
RLIHP:CELL=ALL;
RLMFP:CELL=ALL;
RLLUP:CELL=ALL;
RLLPP:CELL=ALL;
RLLFP:CELL=ALL;
RLLDP:CELL=ALL;
RLSBP:CELL=ALL;
RLSSP:CELL=ALL;
RLOLP:CELL=ALL;
RLSMP:CELL=ALL;
RLIMP:CELL=ALL;
RLLCP:CELL=ALL;
RLCRP:CELL=ALL;
RLDHP:CELL=ALL;
RLACP:CELL=ALL;
RLSLP:CELL=ALL;
RLCDP:CELL=ALL;
RLPBP:CELL=ALL;
RLOLP:CELL=ALL;
RLLLP:CELL=ALL;
RLGSP:CELL=ALL;
RLGRP:CELL=ALL;
RLDRP:CELL=ALL;
RLDTP:CELL=ALL;
RRGBP;
RXTCP:MOTY=RXOTG;
RXMOP:MOTY=RXOTG;
RXMOP:MOTY=RXOCF;
RXMOP:MOTY=RXOTRX;
RXMFP:MOTY=RXOCF,FAULTY;
RXMFP:MOTY=RXOTRX,FAULTY;
RXMFP:MO=RXOTX,FAULTY;
RXMSP:MOTY=RXOTRX;
@c
@next result
|