Data field · 2 statements in 1 program · all programsACSTTUSI

0W · 1R · 1?

COACTUPC

condition	IF ACSTTUSI OF CACTUPAI = '*' OR ACSTTUSI OF CACTUPAI = SPACES	1100-RECEIVE-MAP COACTUPC.cbl:1065–1066
read	MOVE ACSTTUSI OF CACTUPAI TO ACUP-NEW-ACTIVE-STATUS NOT (ACSTTUSI OF CACTUPAI = '*' OR ACSTTUSI OF CACTUPAI = SPACES)	1100-RECEIVE-MAP COACTUPC.cbl:1069

Defined: 02 ACSTTUSI PIC X(1)
WORKING-STORAGE · in CACTUPAI · offset 187, 1 bytes
COACTUP.CPY:66 via COACTUPC.cbl:623
Program: COACTUPC