Data field · 9 statements in 5 programsACCTSIDI
COACTUPC
| condition | IF ACCTSIDI OF CACTUPAI = '*' OR ACCTSIDI OF CACTUPAI = SPACES | 1100-RECEIVE-MAP COACTUPC.cbl:1051–1052 |
| read | MOVE ACCTSIDI OF CACTUPAI TO CC-ACCT-ID ACUP-NEW-ACCT-ID-X
| 1100-RECEIVE-MAP COACTUPC.cbl:1056–1057 |
- Defined
- 02 ACCTSIDI PIC X(11) WORKING-STORAGE · in CACTUPAI · offset 169, 11 bytesCOACTUP.CPY:60 via COACTUPC.cbl:623
- Program
- COACTUPC
COACTVWC
| condition | IF ACCTSIDI OF CACTVWAI = '*' OR ACCTSIDI OF CACTVWAI = SPACES | 2200-EDIT-MAP-INPUTS COACTVWC.cbl:628–629 |
| read | MOVE ACCTSIDI OF CACTVWAI TO CC-ACCT-ID
| 2200-EDIT-MAP-INPUTS COACTVWC.cbl:632 |
- Defined
- 02 ACCTSIDI PIC 99999999999 WORKING-STORAGE · in CACTVWAI · offset 169, 11 bytesCOACTVW.CPY:60 via COACTVWC.cbl:229
- Program
- COACTVWC
COCRDLIC
| read | MOVE ACCTSIDI OF CCRDLIAI TO CC-ACCT-ID | 2100-RECEIVE-SCREEN COCRDLIC.cbl:969 |
- Defined
- 02 ACCTSIDI PIC X(11) WORKING-STORAGE · in CCRDLIAI · offset 179, 11 bytesCOCRDLI.CPY:66 via COCRDLIC.cbl:276
- Program
- COCRDLIC
COCRDSLC
| condition | IF ACCTSIDI OF CCRDSLAI = '*' OR ACCTSIDI OF CCRDSLAI = SPACES | 2200-EDIT-MAP-INPUTS COCRDSLC.cbl:615–616 |
| read | MOVE ACCTSIDI OF CCRDSLAI TO CC-ACCT-ID
| 2200-EDIT-MAP-INPUTS COCRDSLC.cbl:619 |
- Defined
- 02 ACCTSIDI PIC X(11) WORKING-STORAGE · in CCRDSLAI · offset 169, 11 bytesCOCRDSL.CPY:60 via COCRDSLC.cbl:215
- Program
- COCRDSLC
COCRDUPC
| condition | IF ACCTSIDI OF CCRDUPAI = '*' OR ACCTSIDI OF CCRDUPAI = SPACES | 1100-RECEIVE-MAP COCRDUPC.cbl:589–590 |
| read | MOVE ACCTSIDI OF CCRDUPAI TO CC-ACCT-ID CCUP-NEW-ACCTID
| 1100-RECEIVE-MAP COCRDUPC.cbl:594–595 |
- Defined
- 02 ACCTSIDI PIC X(11) WORKING-STORAGE · in CCRDUPAI · offset 169, 11 bytesCOCRDUP.CPY:60 via COCRDUPC.cbl:334
- Program
- COCRDUPC