CDzOS to B2B CD SA

Copy a File from Connect:Direct for z/OS to a B2B Integrator Mailbox

COPYTOMB     PROCESS   SNODE=CDNODE01SA                              -
                       SNODEID=(B2B_UserID,B2B_Password)             -
                       PNODE=CDZOS01
STEP1        COPY FROM (DSN=E.BA.SSO)                                -
                 TO   (FILE=/mailbox/B2B_UserID/Inbox                -
                       DISP=(NEW))

Exemplo arquivo sample.cd

/*
* This sample process ...
* 
*/

sample PROCESS SNODE=NODE1

step01 COPY
  FROM (
    FILE=/tmp/file1.txt
    PNODE
  )

  CKPT=2M
  COMPRESS extended

  TO (
    FILE=/tmp/file1.delete
    SNODE
    DISP=rpl
  )

PEND;

Onde:

CKPT: Checkpoint a cada NN e a medida K/M

Ver também

Artigos sobre IBM Sterling