Pausing or Slowing a Batch Cobol Script

Thread View: bit.listserv.idms-l

2 messages

[T] Back to Threads [V] Tree View [G] Group Articles

2 total messages Started by Trevelain Fri, 11 Jun 2004 13:32

#157

Author: Trevelain
Date: Fri, 11 Jun 2004 13:32

4 lines
929 bytes

Is there any way to introduce a WAIT or SLEEP command into a Batch
Cobol Script?  If not, are there any creative workarounds?

Many thanks for the assistance everyone.

Re: Pausing or Slowing a Batch Cobol Script

#158

Author: Sam William
Date: Mon, 21 Jun 2004 12:46

34 lines
2152 bytes

Hi, only in idms-DC you can use such things (wait, wait redispatch,
set timer wait, ...). In Batch (I hope you mean that with
'Cobol-Script') there are'nt any dml statement for wait situations.
We use a little assembler program which we are calling to solve such a
problem. Hope you are using an MVS-environment.

The relevant asm code of the 10-line modul:
   ...declarations ....
     L     R2,0(R1)                 
     MVC   ZEITMM,0(R2)             
     L     R2,4(R1)                 
     MVC   ZEITSS,0(R2)             
     STIMER WAIT,DINTVL=ZEITINTV    
   ... registerhandling ...

And the Cobol-source looks like this:
   WORKING-STORAGE SECTION.
      01  ZEITMM              PIC X(02) VALUE "01". 
      01  ZEITSS              PIC X(02) VALUE "00". 
                                              
   PROCEDURE DIVISION.                           
    MOVE "01"                 TO ZEITMM       
    MOVE "00"                 TO ZEITSS       
    CALL "STIMER" USING ZEITMM ZEITSS      

Thats all.
Sam


toms_jason@hotmail.com (Trevelain) wrote in message news:<8ba118f4.0406110532.15fdba37@posting.google.com>...
> Is there any way to introduce a WAIT or SLEEP command into a Batch
> Cobol Script?  If not, are there any creative workarounds?
> 
> Many thanks for the assistance everyone.

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads