Data field · 2 statements in 2 programsACSCITYI

0W · 1R · 1?

COACTUPC

condition	IF ACSCITYI OF CACTUPAI = '*' OR ACSCITYI OF CACTUPAI = SPACES	1100-RECEIVE-MAP COACTUPC.cbl:1329–1330
read	MOVE ACSCITYI OF CACTUPAI TO ACUP-NEW-CUST-ADDR-LINE-3 NOT (ACSCITYI OF CACTUPAI = '*' OR ACSCITYI OF CACTUPAI = SPACES)	1100-RECEIVE-MAP COACTUPC.cbl:1333

Defined: 02 ACSCITYI PIC X(50)
WORKING-STORAGE · in CACTUPAI · offset 725, 50 bytes
COACTUP.CPY:252 via COACTUPC.cbl:623
Program: COACTUPC

0W · 0R · 0?

Declared but never referenced.

Defined: 02 ACSCITYI PIC X(50)
WORKING-STORAGE · in CACTVWAI · offset 666, 50 bytes
COACTVW.CPY:192 via COACTVWC.cbl:229
Program: COACTVWC