Data field · 2 statements in 1 program · all programsACSGOVTI

0W · 1R · 1?

COACTUPC

condition	IF ACSGOVTI OF CACTUPAI = '*' OR ACSGOVTI OF CACTUPAI = SPACES	1100-RECEIVE-MAP COACTUPC.cbl:1401–1402
read	MOVE ACSGOVTI OF CACTUPAI TO ACUP-NEW-CUST-GOVT-ISSUED-ID NOT (ACSGOVTI OF CACTUPAI = '*' OR ACSGOVTI OF CACTUPAI = SPACES)	1100-RECEIVE-MAP COACTUPC.cbl:1405

Defined: 02 ACSGOVTI PIC X(20)
WORKING-STORAGE · in CACTUPAI · offset 823, 20 bytes
COACTUP.CPY:282 via COACTUPC.cbl:623
Program: COACTUPC