View previous topic :: View next topic
|
Author |
Message |
sandeep prajapati
New User
Joined: 23 Mar 2020 Posts: 19 Location: India
|
|
|
|
Hi All,
I am trying to implement a simple Cobol program to compute account balance by reading 3 files i.e. file1 having account balance, file2 having deposit amount & file3 withdraw amount.
I have written logic for the program which is simple, but I am unable to execute one the program using the below JCL. could you please provide a correct JCL for COBOL execution.
Code: |
***************************** Top of Data ******************************
//BANKACCT JOB NOTIFY=Z56117,CLASS=A,MSGCLASS=A,PRTY=15
//COBRUN EXEC IGYWCLG
//COBOL.SYSIN DD DSN=Z56117.SOURCE(BANKCOB),DISP=SHR
//BALANCE DD DSN=Z56117.SOURCE.BALANCE,DISP=SHR
//DEPOSIT DD DSN=Z56117.SOURCE.DEPOSIT,DISP=SHR
//WITHDRW DD DSN=Z56117.SOURCE.WITHDRW,DISP=SHR
//SYSOUT DD SYSOUT=*
**************************** Bottom of Data **************************** |
I definitely is missing the something very important, could you please assist. |
|
Back to top |
|
|
Robert Sample
Global Moderator
Joined: 06 Jun 2008 Posts: 8700 Location: Dubuque, Iowa, USA
|
|
|
|
Quote: |
could you please provide a correct JCL for COBOL execution. |
No, we cannot because (1) depending upon your site the provided JCL could work perfectly fine, and (2) you did not find the message(s) telling you what the problem is and provide them to us. As a guess, most likely the issue is that your site requires an accounting field and/or programmer name (both of which would have to come before the first keyword parameter you used. Or, maybe IGYWCLG is not in a system PROCLIB and the system cannot find that procedure to execute it? |
|
Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008 Posts: 2140 Location: USA
|
|
|
|
Did you know that JCL procedure IGYWCLG consists of three sequential procedure steps?
Did you know what is JCL procedure?
Did you know what is a procedure step?
What are any results of your test? |
|
Back to top |
|
|
sandeep prajapati
New User
Joined: 23 Mar 2020 Posts: 19 Location: India
|
|
|
|
ok, after doing some searching I found, program execution requires a load module(LLP) which is generated using compile procedure IGYWCL.
below is the JCL
Code: |
//COBRUN JOB NOTIFY=Z56117,CLASS=A,MSGCLASS=A,PRTY=15
//COBOL EXEC IGYWCL,MBR=BANKCOB
//RUN EXEC PGM=BANKCOB
//STEPLIB DD DSN=&SYSUID..LOAD,DISP=SHR
//BALANCE DD DSN=Z56117.SOURCE.BALANCE,DISP=SHR
//DEPOSIT DD DSN=Z56117.SOURCE.DEPOSIT,DISP=SHR
//WITHDRW DD DSN=Z56117.SOURCE.WITHDRW,DISP=SHR
//SYSOUT DD SYSOUT=* |
now, the system is throwing S0C7 error.
tried using the offset value to locate the data which is error in CEEDUMP, found nothing helpful, there is 3 files passing 99999999.99 value which looks fine. |
|
Back to top |
|
|
sergeyken
Senior Member
Joined: 29 Apr 2008 Posts: 2140 Location: USA
|
|
|
|
Any message log, please
S0C7 means you try to use some COMP-3 field which contains invalid data.
Do you know any of mentioned terms?
Is this the first program in your life?
BTW: the sentence “JCL execution fail COBOL program” - what does this mean from English point of view??? |
|
Back to top |
|
|
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2454 Location: Hampshire, UK
|
|
|
|
Presumably you got past the previous error that you posted about - file status. If so, please update that topic with the solution.
New question = new topic.
This topic locked. |
|
Back to top |
|
|
|