- 论坛徽章:
- 0
|
000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID. ACCEPT1.
000210 AUTHOR. TANKEY.
000300 ENVIRONMENT DIVISION.
000400 DATA DIVISION.
000500 WORKING-STORAGE SECTION.
000600 01 PARA PIC 99.
000800 PROCEDURE DIVISION.
001000 ACCEPT PARA.
001100 DISPLAY PARA.
001300 STOP RUN.
上面是简单写得一个程序l
//TJ0063C JOB (’2′),
// TJD0063,
// NOTIFY=&TJD0063,
// MSGLEVEL=(1,1)
//STEP1 EXEC PROC=IGYWCLG
//COBOL.SYSIN DD DSN=TJD0063.COBOL.SOURCE(ACCEPT1),DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
20
/*
上面是jcl
NO. MESSAGE
1 IEFC627I INCORRECT USE OF AMPERSAND IN THE NOTIFY FIELD
2 IEFC001I PROCEDURE IGYWCLG WAS EXPANDED USING SYSTEM LIBRARY USER.PROC
************************** BOTTOM OF DATA ********************************
上面是问题,请问我错在哪里 |
|