Data field · 2 statements in 1 program · all programsACSEFTCI

0W · 1R · 1?

COACTUPC

condition	IF ACSEFTCI OF CACTUPAI = '*' OR ACSEFTCI OF CACTUPAI = SPACES	1100-RECEIVE-MAP COACTUPC.cbl:1410–1411
read	MOVE ACSEFTCI OF CACTUPAI TO ACUP-NEW-CUST-EFT-ACCOUNT-ID NOT (ACSEFTCI OF CACTUPAI = '*' OR ACSEFTCI OF CACTUPAI = SPACES)	1100-RECEIVE-MAP COACTUPC.cbl:1414

Defined: 02 ACSEFTCI PIC X(10)
WORKING-STORAGE · in CACTUPAI · offset 881, 10 bytes
COACTUP.CPY:306 via COACTUPC.cbl:623
Program: COACTUPC