The following is an example of a Connect:Direct® for HP NonStop RUN
TASK submitted from a Sterling Connect:Direct for Miscrosoft Windows
node.
NDM PROCESS SNODE=NDM.BAY1DR /*$HP NONSTOP$*/
SNODEID=(NCC.NDM,xxxxxxxx)
BEGINMSG RUN TASK (PGM = BTFNDMLG
SYSOPTS = "/NAME, IN $DATA2.BTFDATA.DEFTABLE, VOL $DATA2.BTFLOAD -
/ND033 DNLOAD FUNBCC FUNBBETA TRUO5")
SNODE
COPYSTEP COPY FROM (PNODE
FILE = g:\vms\mftd\export\fusi\backup\TradeExport_20000818.002
SYSOPTS = "DATATYPE(BINARY)STRIP.BLANKS(NO)XLATE(NO)" )
TO (SNODE
FILE = $test.bftdata.beta5
SYSOPTS = "'SET TYPE E' 'SET BLOCK 200' 'SET REC 200'"
DISP = RPL)
IF (COPYSTEP EQ 0) THEN
GOTO OKMSG
ELSE
ERRORMSG RUN TASK (PGM = BTFNDMLG
SYSOPTS = "/NAME, IN $DATA2.BTFDATA.DEFTABLE, VOL $DATA2.BTFLOAD -
/ND035 DNLOAD FUNBCC FUNBBETA TRUO5")
SNODE
EXIT
OKMSG RUN TASK (PGM = BTFNDMLG
SYSOPTS = "/NAME, IN $DATA2.BTFDATA.DEFTABLE, VOL $DATA2.BTFLOAD -
/ ND034 DNLOAD FUNBCC FUNBBETA TRUO5")
SNODE
FT3IN RUN TASK (PGM = BTFNDMDN
SYSOPTS = "/NAME, IN $DATA2.BTFDATA.DEFTABLE, VOL $DATA2.BTFLOAD -
/ DNLOAD FT3IN $test.btfdata.beta5 FUNBCC FUNBBETA TRUO5")
|