Data field · 2 statements in 2 programsACSMNAMI

0W · 1R · 1?

COACTUPC

condition	IF ACSMNAMI OF CACTUPAI = '*' OR ACSMNAMI OF CACTUPAI = SPACES	1100-RECEIVE-MAP COACTUPC.cbl:1297–1298
read	MOVE ACSMNAMI OF CACTUPAI TO ACUP-NEW-CUST-MIDDLE-NAME NOT (ACSMNAMI OF CACTUPAI = '*' OR ACSMNAMI OF CACTUPAI = SPACES)	1100-RECEIVE-MAP COACTUPC.cbl:1301

Defined: 02 ACSMNAMI PIC X(25)
WORKING-STORAGE · in CACTUPAI · offset 526, 25 bytes
COACTUP.CPY:216 via COACTUPC.cbl:623
Program: COACTUPC

0W · 0R · 0?

Declared but never referenced.

Defined: 02 ACSMNAMI PIC X(25)
WORKING-STORAGE · in CACTVWAI · offset 467, 25 bytes
COACTVW.CPY:156 via COACTVWC.cbl:229
Program: COACTVWC