how to change a PD to ZD including date using sort
Posted: Wed Aug 04, 2010 7:03 pm
Hi ,
please see my below record format and help in changing from PD to ZD.
PIC X(08).
PIC X(09).
SEQ-NUM PIC S9(03) COMP-3.
PIC X(03).
PIC 9(04).
PIC X(03).
DATE PIC S9(09) COMP-3.
TIME PIC S9(09) COMP-3.
PIC X(02).
PIC X(03).
DATE-New PIC S9(09) COMP-3.
TIME-New PIC S9(09) COMP-3.
PIC X(02).
PIC X(01).
FILLER PIC X(143).
PIC X(50).
Total record length is 250.
please see my below record format and help in changing from PD to ZD.
PIC X(08).
PIC X(09).
SEQ-NUM PIC S9(03) COMP-3.
PIC X(03).
PIC 9(04).
PIC X(03).
DATE PIC S9(09) COMP-3.
TIME PIC S9(09) COMP-3.
PIC X(02).
PIC X(03).
DATE-New PIC S9(09) COMP-3.
TIME-New PIC S9(09) COMP-3.
PIC X(02).
PIC X(01).
FILLER PIC X(143).
PIC X(50).
Total record length is 250.