Data field · 2 statements in 1 program · all programsACCTSIDI

0W · 1R · 1?

COACTVWC

condition	IF ACCTSIDI OF CACTVWAI = '*' OR ACCTSIDI OF CACTVWAI = SPACES	2200-EDIT-MAP-INPUTS COACTVWC.cbl:628–629
read	MOVE ACCTSIDI OF CACTVWAI TO CC-ACCT-ID NOT (ACCTSIDI OF CACTVWAI = '*' OR ACCTSIDI OF CACTVWAI = SPACES)	2200-EDIT-MAP-INPUTS COACTVWC.cbl:632

Defined: 02 ACCTSIDI PIC 99999999999
WORKING-STORAGE · in CACTVWAI · offset 169, 11 bytes
COACTVW.CPY:60 via COACTVWC.cbl:229
Program: COACTVWC