IBM MAINFRAME: Is there any command in Cobol (Batch Program) to DELAY -::::AuthorMessagesravindrasNew UserJoined: 29 Nov 2005Posted: Wed Jun 25, 2014 11:08 am Post subject: Is there any command in Cobol (Batch Program) to DELAYHi All,I am writing a cobol Batch TCP/IP program. Where in ' need to be able to set a delay on the call so we can throttle the call e.g. 30 milliseconds between calls. 'Meaning If my input file is having 3 records.The Cobol program will read the first record once Connection to Port is established. After that the same first record needs to be talking to the port after a delay of 30 milliseconds. This will happen 10 times for the first record.Then it reads the second record, process is repeated again till end of file.we are doing Load Testing. Bill WoodgerDFSORT ModeratorJoined: 09 Mar 2011Posted: Wed Jun 25, 2014 11:39 am Post subject: Reply to: Is there any command in Cobol (Batch Program) to dLanguage Environment Callable Service CEEDLYM.Ed GoodmanActive MemberJoined: 08 Jun 2011Location: USAPosted: Wed Jun 25, 2014 7:31 pm Post subject:Out of curiosity, why do you need the delay for a read operation?

• Delay In Cobol Batch Program - Download Free Apps For Android
• Delay In Cobol Batch Program - Download Free Apps For Pc

Are your reads timing out?Rohit UmarjikarSenior MemberJoined: 21 Sep 2010Location: NY,USAPosted: Thu Jun 26, 2014 10:03 am Post subject:You can perform n times in between the read or calls and delay the executionBill WoodgerDFSORT ModeratorJoined: 09 Mar 2011Posted: Thu Jun 26, 2014 12:16 pm Post subject: Reply to: Is there any command in Cobol (Batch Program) to dUnless the secret part of the requirement was 'su. of up the entire CPU', no you don't. How would you even know how many TIMES is 30ms?Robert SampleGlobal ModeratorJoined: 06 Jun 2008Location: Dubuque, Iowa, USAPosted: Thu Jun 26, 2014 6:08 pm Post subject:If you think you need a delay in a batch program, the design is wrong - period. Batch jobs are not supposed to need delays, and you could negatively impact your entire LPAR if you do so incorrectly.

Redesign the process.sravindrasNew UserJoined: 29 Nov 2005Posted: Mon Jun 30, 2014 2:36 pm Post subject:Thanks for the reply for my earlier query.Mean time I was trying to connect to a port. But I am getting Below error.60 ETIMEDOUT Connect The connection timed out before itwas completed. Ensure the server application is available.How to solve this!!!!

Tried with different Port Number as well.enrico-sorichettiSenior MemberJoined: 14 Mar 2007Location: italyPosted: Mon Jun 30, 2014 5:43 pm Post subject: Reply to: Is there any command in Cobol (Batch Program) to dQuote:Ensure the server application is available.there is NO guarantee that a delay will solve the server application availabilityerrors due to unavailable application should be pursued thru a different path( management, operations control. )not by tweaking the codeEd GoodmanActive MemberJoined: 08 Jun 2011Location: USAPosted: Mon Jun 30, 2014 5:48 pm Post subject:I know it can be confusing dealing with ports and connections at first.The error message tells you something very important.

It's telling you that your program tried to reach out and connect with some server that waits for connections. It tried for 60 seconds, then gave up.So, you need to make sure that the connection you are trying to make is valid from the perspective of the running program. Remember, the program is running on the mainframe, and has to reach that server from THERE. Just because you can ping it or whatever from your desktop, does NOT mean that the mainframe can see it.You can be dealing with an invalid address, a firewall, different IP stacks, etc. So you have to start trying to isolate each factor and make sure it's correct.So, start with the TSO command line and try to ping that server. I would bet doughnut money that you'll find your issue right away.

Delay In Cobol Batch Program - Download Free Apps For Android

Not two dozen doughnuts, but you know, like a 3/$2 kind of deal.If you CAN ping it from the mainframe. Then it probably means the port is unreachable. So if the port can be reached from say, your desktop, then it must be a firewall.The process here is just like any other problem.

You need to think about what is actually happening, then break that down into testable chunks.

Delay In Cobol Batch Program - Download Free Apps For Pc

Compiling COBOL ProgramsIn order to execute a COBOL program in batch mode using JCL, the program needs to be compiled and a load module is created with all the sub-programs. The JCL uses the load module and not the actual program at the time of execution. The load libraries are concatenated and given to the JCL at the time of execution using JCLLIB or STEPLIB.There are many mainframe compiler utilities available to compile a COBOL program. Some corporate companies use Change Management tools like Endevor, which compiles and stores every version of the program.

This is useful in tracking the changes made to the program.//COMPILE JOB,CLASS=6,MSGCLASS=X,NOTIFY=&SYSUID//.//STEP1 EXEC IGYCRCTL,PARM=RMODE,DYNAM,SSRANGE//SYSIN DD DSN=MYDATA.URMI.SOURCES(MYCOBB),DISP=SHR//SYSLIB DD DSN=MYDATA.URMI.COPYBOOK(MYCOPY),DISP=SHR//SYSLMOD DD DSN=MYDATA.URMI.LOAD(MYCOBB),DISP=SHR//SYSPRINT DD SYSOUT=.//.IGYCRCTL is an IBM COBOL compiler utility. The compiler options are passed using PARM parameter. In the above example, RMODE instructs the compiler to use relative addressing mode in the program. The COBOL program is passed using SYSIN parameter and the copybook is the library used by the program in SYSLIB.This JCL produces the load module of the program as output which is used as the input to the execution JCL. Running COBOL ProgramsBelow a JCL example where the program MYPROG is executed using the input file MYDATA.URMI.INPUT and produces two output files written to the spool.//COBBSTEP JOB CLASS=6,NOTIFY=&SYSUID////STEP10 EXEC PGM=MYPROG,PARM=ACCT5000//STEPLIB DD DSN=MYDATA.URMI.LOADLIB,DISP=SHR//INPUT1 DD DSN=MYDATA.URMI.INPUT,DISP=SHR//OUT1 DD SYSOUT=.//OUT2 DD SYSOUT=.//SYSIN DD.//CUST1 1000//CUST2 1001/.The load module of MYPROG is located in MYDATA.URMI.LOADLIB. This is important to note that the above JCL can be used for a non-DB2 COBOL module only.

Passing Data to COBOL ProgramsData input to COBOL batch program can be through files, PARAM parameter and SYSIN DD statement. In the above example:.Data records are passed to MYPROG through file MYDATA.URMI.INPUT.

This file will be referred in the program using the DD name INPUT1. The file can be opened, read and closed in the program.The PARM parameter data ACCT5000 is received in the LINKAGE section of the program MYPROG in a variable defined within that section.The data in the SYSIN statement is received through ACCEPT statement in the PROCEDURE division of the program. Every ACCEPT statement reads one whole record (i.e., CUST1 1000) into a working storage variable defined in the program.Running a COBOL-DB2 programFor running COBOL DB2 program, specialised IBM utility is used in the JCL and program; DB2 region and required parameters are passed as input to the utility.The below steps are followed in running a COBOL-DB2 program:.When a COBOL-DB2 program is compiled, a DBRM (Database Request Module) is created along with the load module. The DBRM contains the SQL statements of the COBOL programs with its syntax checked to be correct.The DBRM is bound to the DB2 region (environment) in which the COBOL will run.