Programming Structure - Parallel Data Pump

Routine Language

Programming Structure

Assembler

First parameter:

RRECORD  DSECT

RTNCODE  DS   F

RLENGTH  DS   F

RBODY    DS   CLxxxxx

Note: In the RBODY specification, the body length xxxxx is:

Second parameter:

IPARM    DSECT

RSEQ     DS   F

PLEN     DS   H

PBODY    DS   CL100

C

First parameter:

struct {

          long Status;

          long RecordLength;

          char buffer[xxxxx];

        }

Note: In the char buffer specification, the buffer length xxxxx is:

Second parameter:

struc

          long  seqnum;

          short parmlen;

          char  parm[80];

        }

COBOL

First parameter:

01 INMOD‑RECORD.

       03 RETURN‑CODE PIC S9(9) COMP.

       03 RECORD‑LENGTH PIC 9(9) COMP.

       03 RECORD‑BODY PIC X(xxxxx)

Note: In the RECORD‑BODY specification, the body length xxxxx is:

Second parameter:

01 PARM‑STRUCT.

       03 SEQ‑NUM PIC 9(9) COMP.

       03 PARM‑LEN PIC 9(4) COMP.

       03 PARM‑BODY PIC X(80).

PL/I

First parameter:

DCL 1 PARMLIST,

         10 STATUS FIXED BINARY(31,0)

         10 RLENGTH FIXED BINARY(31,0)

         10 REC CHAR(xxxxx)

Note: In the REC CHAR specification, the length xxxxx is:

Second parameter:

DCL 1 PARMLIST,

         10 SEQNUM FIXED BINARY(31,0)

         10 PLENGTH FIXED BINARY(15,0)

         10 PBODY CHAR(80)