01 WS-TOP PIC X(1) 01 WS-TOP-RED REDEFINES WS-TOP PIC X(2). If you MOVE "12" to WS-TOP-RED, DISPLAY WS-TOP will show

Keep practicing — related questions

• WS-NUM-1 PIC S9(04)MOVE -95 TO WS-NUM-1DISPLAY WS-NUM-1 What will be the display?
• 01 WS-ABCD PIC X(8) VALUE SPACES . . . INSPECT WS-ABCD TALLYING WS-COUNT FOR ALL SPACES DISPLAY WS-COUNT Wh...
• WS-COUNT PIC 9 VALUE 1... PERFORM UNTIL WS-COUNT >= 2 DISPLAY WS-COUNT ADD +1 TO WS-COUNTEND-PERFORMWhat wi...
• 01 WS-CHECK PIC X 88 TCS VALUE Y . . . MOVE 'T' TO WS-CHECK IF TCS DISPLAY 'T' ELSE DISPLAY 'X' END-IF What...
• "01 WS-VAR1 PIC X(10) VALUE 'ABCDEFGHIJ'. 01 WS-VAR2 REDEFINES WS-VAR1 PIC 9(5) VALUE '12345' DISPLAY WS-VA...
• 01 ws-var1 pic 9(9).99. 01 ws-var2 pic 9(9)v99 value 10. move zeros to ws-var1. compute ws-var1 = ws-var1 +...
• WS-AMT PIC --.---.---.---.--9,99. MOVE -25000 TO WS-AMT DISPLAY WS-AMT WHAT WILL THE RESULT BE?
• WS-TAX-IN PIC 9(4) VALUE '1234'. WS-TAX-OUT PIC 9(3). MOVE WS-TAX-IN TO WS-TAX-OUT. What is the value WS-TA...