Skip to main content

How to use the DDNAME passed from JCL in a COBOL program?

  • January 4, 2019
  • 12 replies
  • 0 views
D

Hi,

We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

Regards,

Sunil


#EnterpriseDeveloper
#COBOL

    12 replies

    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    Hello Sunil,
    There is an example in the Samples Browser; Mainframe Samples > JCL > Classic JCL Demo, that shows a COBOL program, JCLCREAT.cbl, opening and writing to a dataset identified by the DDNAME OUTFILE in the ESJCL.jcl job.
    If you open the sample project in your IDE you will be able to see the compiler options for the program (mainframe dialect).
    Hope this helps.
    Regards,
    Andrew
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    Hello Sunil,
    There is an example in the Samples Browser; Mainframe Samples > JCL > Classic JCL Demo, that shows a COBOL program, JCLCREAT.cbl, opening and writing to a dataset identified by the DDNAME OUTFILE in the ESJCL.jcl job.
    If you open the sample project in your IDE you will be able to see the compiler options for the program (mainframe dialect).
    Hope this helps.
    Regards,
    Andrew
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL

    Sunil, can you provide some more details in order to correctly assess what you try to achieve?

    • ED Eclipse? Visual Studio?  version?
      Target ES environment : Linux? UNIX? Windows?
    • Small piece of JCL as an exemple
    • What task is expected to be done in the COBOL program?
      Providing the relevant piece of COBOL code may be helpful

    Thanks,

    Daniel

    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    hi,
    Could you please provide the link of the samples, i could not navigate to the program you mentioned.
    Many thanks for replying
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    hi,
    Could you please provide the link of the samples, i could not navigate to the program you mentioned.
    Many thanks for replying
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    Hi,

    We are using Visual studio 2015 and out target environment is Windows
    Its not about the Task the COBOL program is doing, actually we are not able to reference the DD statement of the JCL file in the COBOL program.
    For example:-
    file-control.
    select out-file assign to OUTFILE
    organization is sequential
    access mode is sequential
    FILE STATUS IS WS-FS1.

    in the above file control MF cobol is seeing OUTFILE as variable and thus failing to do any operation. is there any way it to represent the DDNAME in JCL say for example:-

    //STEP01 EXEC PGM=JCLCRT
    //OUTFILE DD DSN=TEMP.INTRDR,RECFM=FB,LRECL=80,
    // DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(100,50),RLSE)
    //SYSOUT DD SYSOUT=*
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    Hi,

    We are using Visual studio 2015 and out target environment is Windows
    Its not about the Task the COBOL program is doing, actually we are not able to reference the DD statement of the JCL file in the COBOL program.
    For example:-
    file-control.
    select out-file assign to OUTFILE
    organization is sequential
    access mode is sequential
    FILE STATUS IS WS-FS1.

    in the above file control MF cobol is seeing OUTFILE as variable and thus failing to do any operation. is there any way it to represent the DDNAME in JCL say for example:-

    //STEP01 EXEC PGM=JCLCRT
    //OUTFILE DD DSN=TEMP.INTRDR,RECFM=FB,LRECL=80,
    // DISP=(NEW,CATLG,DELETE),SPACE=(CYL,(100,50),RLSE)
    //SYSOUT DD SYSOUT=*
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    Hi Sunil,
    The Samples Browser is installed with your Enterprise Developer product. Start > All Programs > Micro Focus Enterprise Developer > Samples > Mainframe Samples
    Regards
    Andrew
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    Yep, found the program, its running fine in ENT COBOL, but not in MF COBOL dialect
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 4, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    Yep, found the program, its running fine in ENT COBOL, but not in MF COBOL dialect
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 17, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    found the solution after lot of searching. Couldn't believe it was so simple. putting it here , so that some may find it helpful.

    This can be done easily by using the compiler directive :-
    $set FCDCAT ASSIGN(EXTERNAL)
    D
    • Dominique SacreRocketeer
    • Author
    • Rocketeer
    • 19312 replies
    • January 17, 2019

    Hi,

    We have a requirement where whe have to invoke a COBOL program from JCL , where we are passing a file to the program from JCL. Could you please provide some examples on how we can get this done.

    Regards,

    Sunil


    #EnterpriseDeveloper
    #COBOL
    found the solution after lot of searching. Couldn't believe it was so simple. putting it here , so that some may find it helpful.

    This can be done easily by using the compiler directive :-
    $set FCDCAT ASSIGN(EXTERNAL)


    Terms & ConditionsAccessibility statement