MFmainframe-rea
WS carddemo · 26f629ef

Data field · 9 statements in 5 programsACCTSIDI

0W · 1R · 1?

COACTUPC

conditionIF ACCTSIDI OF CACTUPAI = '*' OR ACCTSIDI OF CACTUPAI = SPACES
1100-RECEIVE-MAP
COACTUPC.cbl:1051–1052
readMOVE ACCTSIDI OF CACTUPAI TO CC-ACCT-ID ACUP-NEW-ACCT-ID-X
  1. NOT (ACCTSIDI OF CACTUPAI = '*' OR ACCTSIDI OF CACTUPAI = SPACES)
1100-RECEIVE-MAP
COACTUPC.cbl:1056–1057
Defined
02 ACCTSIDI PIC X(11)
WORKING-STORAGE · in CACTUPAI · offset 169, 11 bytes
COACTUP.CPY:60 via COACTUPC.cbl:623
Program
COACTUPC
0W · 1R · 1?

COACTVWC

conditionIF ACCTSIDI OF CACTVWAI = '*' OR ACCTSIDI OF CACTVWAI = SPACES
2200-EDIT-MAP-INPUTS
COACTVWC.cbl:628–629
readMOVE ACCTSIDI OF CACTVWAI TO CC-ACCT-ID
  1. NOT (ACCTSIDI OF CACTVWAI = '*' OR ACCTSIDI OF CACTVWAI = SPACES)
2200-EDIT-MAP-INPUTS
COACTVWC.cbl:632
Defined
02 ACCTSIDI PIC 99999999999
WORKING-STORAGE · in CACTVWAI · offset 169, 11 bytes
COACTVW.CPY:60 via COACTVWC.cbl:229
Program
COACTVWC
0W · 1R · 0?

COCRDLIC

readMOVE 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 bytes
COCRDLI.CPY:66 via COCRDLIC.cbl:276
Program
COCRDLIC
0W · 1R · 1?

COCRDSLC

conditionIF ACCTSIDI OF CCRDSLAI = '*' OR ACCTSIDI OF CCRDSLAI = SPACES
2200-EDIT-MAP-INPUTS
COCRDSLC.cbl:615–616
readMOVE ACCTSIDI OF CCRDSLAI TO CC-ACCT-ID
  1. NOT (ACCTSIDI OF CCRDSLAI = '*' OR ACCTSIDI OF CCRDSLAI = SPACES)
2200-EDIT-MAP-INPUTS
COCRDSLC.cbl:619
Defined
02 ACCTSIDI PIC X(11)
WORKING-STORAGE · in CCRDSLAI · offset 169, 11 bytes
COCRDSL.CPY:60 via COCRDSLC.cbl:215
Program
COCRDSLC
0W · 1R · 1?

COCRDUPC

conditionIF ACCTSIDI OF CCRDUPAI = '*' OR ACCTSIDI OF CCRDUPAI = SPACES
1100-RECEIVE-MAP
COCRDUPC.cbl:589–590
readMOVE ACCTSIDI OF CCRDUPAI TO CC-ACCT-ID CCUP-NEW-ACCTID
  1. NOT (ACCTSIDI OF CCRDUPAI = '*' OR ACCTSIDI OF CCRDUPAI = SPACES)
1100-RECEIVE-MAP
COCRDUPC.cbl:594–595
Defined
02 ACCTSIDI PIC X(11)
WORKING-STORAGE · in CCRDUPAI · offset 169, 11 bytes
COCRDUP.CPY:60 via COCRDUPC.cbl:334
Program
COCRDUPC