开云体育

ctrl + shift + ? for shortcuts
© 2025 开云体育

How to link mainprogram and subprogram in MVT Cobol


 

Hi
?
Can somebody please explain, whats the purpose of the DD DDNAME=SYSIN statement here? What does it reference to? SYSIN was used as source input dataset for the COBOL compiler and SYSLIN is the object module. I don't understand that. Thank you very much.
?
?
COBUCL procedure:
?
//COBUCL ?PROC CPARM1='LOAD,SUPMAP', ? ? ? ? ? ? ? ? ? ? ? ?
// ? ? ? ? ? ? CPARM2='SIZE=2048K,BUF=1024K', ? ? ? ? ? ? ??
// ? ? ? ? ? ? LKEDPGM='IEWL' ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
//COB ?EXEC ?PGM=IKFCBL00,REGION=4096K, ? ? ? ? ? ? ? ? ? ??
// ? ? ? ? ? PARM='&CPARM1,&CPARM2' ? ? ? ? ? ? ? ? ? ? ? ??
//SYSPRINT ?DD SYSOUT=* ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
//SYSUT1 DD UNIT=SYSDA,SPACE=(460,(700,100)) ? ? ? ? ? ? ? ?
//SYSUT2 DD UNIT=SYSDA,SPACE=(460,(700,100)) ? ? ? ? ? ? ? ?
//SYSUT3 DD UNIT=SYSDA,SPACE=(460,(700,100)) ? ? ? ? ? ? ? ?
//SYSUT4 DD UNIT=SYSDA,SPACE=(460,(700,100)) ? ? ? ? ? ? ? ?
//SYSLIN DD DSN=&LOADSET,DISP=(MOD,PASS),UNIT=SYSDA, ? ? ? ?
// ? ? ? ? ? ? SPACE=(80,(500,100)) ? ? ? ? ? ? ? ? ? ? ? ??
//LKED EXEC PGM=&LKEDPGM, ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
// ? ? ? ? ?PARM='LIST,XREF,LET',COND=(5,LT,COB),REGION=96K?
//SYSLIN ?DD DSN=&LOADSET,DISP=(OLD,DELETE) ? ? ? ? ? ? ? ??
// ?DD ?DDNAME=SYSIN ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
//SYSLMOD DD DDNAME=SYSLMOD ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
//SYSLIB DD ? DSN=SYS1.COBLIB,DISP=SHR ? ? ? ? ? ? ? ? ? ? ?
//SYSUT1 DD UNIT=SYSDA,SPACE=(1024,(50,20)) ? ? ? ? ? ? ? ??
//SYSPRINT DD SYSOUT=* ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?

Join [email protected] to automatically receive all group messages.