What does INITIALIZE clause do

tarakanta · New User Joined: 30 Jan 2007 Posts: 10 Location: Hyderabad

HI ALL

I WAS ASKED LIKE THIS

W-S SECTION.
01 GRP01.
02 VAR1 PIC XX VALUE 'AB'.
02 VAR2 PIC 99 VALUE 45.
02 FILLER PIC XX VALUE 'AB'
.............
...........
PROCEDURE DIVISION.
..................
...............
INITIALIZE GRP01.
DISPLAY GRP01.
..................
....................

WHAT WILL BE THE OUTPUT?????????????

Warning: ??????????? removed from Title

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

Hi,

If you used: DISPLAY '>' GRP01 '<'.

You get: >bb00AB< where b is a blank.

The default for INIT... is to put spaces in A/N fields and zeros in num fields. The zeros will have a format consistant w/its type - e.g. COMP, COMP-3, etc. Fillers are left alone.