Multiple choice technology mainframe

Sample code WORKING-STORAGE SECTION. 01 WORK-TABLE. 05 WK-ALPHA PIC A(2) VALUE 'AB'. 05 FILLER PIC X VALUE ''. 05 WK-ALPHANUM PIC X(4) VALUE 'CDEF'. 05 PIC X VALUE ''. 05 WK-NUM PIC 999. 05 PIC X VALUE '*'. PROCEDURE DIVISION. .... INITIALIZE WORK-TABLE. After execution of the statement in the sample code above, which one of the following values does WORK-TABLE contain? NOTE: b = BLANK or UNPRINTABLE HEXADECIMAL character

  1. bb*bbbb*bb0*

  2. AB*CDEF*bb0*

  3. ABbCDEFb000b

  4. bb*bbbb*000*
Reveal answer Fill a bubble to check yourself
D Correct answer
Explanation

INITIALIZE sets all alphabetic fields (PIC A) to spaces, alphanumeric fields (PIC X) to spaces, and numeric fields (PIC 9) to zeros. WK-ALPHA (PIC A(2)) becomes 'bb', FILLER '' remains, WK-ALPHANUM (PIC X(4)) becomes 'bbbb', WK-NUM (PIC 999) becomes 000. Result: 'bb*bbbb*000' where b=blank.

Keep practicing — related questions