Disini saya akan sedikit berbagi mengenai sebuah Coddingan
Cobol untuk membuat PERFORM NAMA-PROSEDUR. Coddingannya seperti ini :
IDENTIFICATION DIVISION.
PROGRAM-ID. PERFORM.
ENVIRONMENT DIVISION.
DATA DIVISION.
PROCEDURE DIVISION.
MULAI.
PERFORM
PROCEDURE-A.
DISPLAY ‘SELAMAT
BELAJAR’.
PERFORM
PROCEDURE-B.
PERFORM
PROCEDURE-A.
PROCEDURE-A
DISPLAY ‘................’.
DISPLAY ‘,,,,,,,,,,,,,,,,,’.
PROCEDURE-B.
DISPLAY ‘DAN
SEMOGA SUKSES’.
Hasilnya :
*****************
^^^^^^^^^^^^^^^^^
SELAMAT
BELAJAR
DAN
SEMOGA SUKSES
*****************
^^^^^^^^^^^^^^^^^
Selamat mencoba....
0 komentar:
Posting Komentar