public static void main(String[] args)

AngryCola · #1 12-24-2005, 03:26 PM

#2 12-24-2005, 06:53 PM

DATA DIVISION.
01 WORKING-STORAGE.
01 HEADER-1 PIC X(15) VALUE 'MERRY CHRISTMAS'

PROCEDURE DIVISION.

PERFORM 100-INIT THRU 100-INIT-EXIT.
PERFORM 200-MAIN THRU 200-MAIN-EXIT.
PERFORM 300-TERM THRU 300-TERM0EXIT.
GOBACK.

100-INIT.
OPEN OUTPUT-FILE FOR OUTPUT.
100-INIT-EXIT.

200-MAIN.
WRITE OUT-REC FROM HEADER-1.
200-MAIN-EXIT.

300-TERM.
CLOSE OUTPUT-FILE.
300-TERM-EXIT.

Then just open the output file in 3.4.

PokerAce · #3 12-26-2005, 05:07 PM

[ QUOTE ]
DATA DIVISION.
01 WORKING-STORAGE.
01 HEADER-1 PIC X(15) VALUE 'MERRY CHRISTMAS'

PROCEDURE DIVISION.

PERFORM 100-INIT THRU 100-INIT-EXIT.
PERFORM 200-MAIN THRU 200-MAIN-EXIT.
PERFORM 300-TERM THRU 300-TERM0EXIT.
GOBACK.

100-INIT.
OPEN OUTPUT-FILE FOR OUTPUT.
100-INIT-EXIT.

200-MAIN.
WRITE OUT-REC FROM HEADER-1.
200-MAIN-EXIT.

300-TERM.
CLOSE OUTPUT-FILE.
300-TERM-EXIT.

Then just open the output file in 3.4.

[/ QUOTE ]

MY EYES!!!!!