Post Command and Wait Event Command

The POST command
The POST command creates a Timer event control area that expires when a specified time interval has expired. You can then use a WAIT EVENT command to block the task until the posted event expires.


EXEC CICS POST
{
INTERVAL(hhmmss)
TIME(hhmmss)
AFTER [HOURS(hh)] [MINUTES(mm)] [SECONDS(ss)]
AT [HOURS(hh)] [MINUTES(mm)] [SECONDS(ss)]
}
SET(pointer-ref)
[ REQID(name) ]
END-EXEC


Options
INTERVAL Specifies the duration after which the event is POSTED. You can code a literal in the form hhmmss. If you specify a data area it must be a PIC S9(7) COMP-3 field and the value must be in the form 0hhmmss.

TIME Specifies a time of the day when the event expires. You can code a literal in the form hhmmss. If you specify a data area it must be a PIC S9(7) COMP-3 field and the value must be in the form 0hhmmss.

AFTER Specifies in HOURS, MINUTES and SECONDS the time interval after which the event expires.

AT Specifies in HOURS, MINUTES and SECONDS the time of the day when the event will expire.
HOURS, Each is a PIC S9(8) COMP full word. Hours can be from 0-99
MINUTES, minutes can be from 0 to 59 or 0 to 5999
SECONDS. Seconds can be from 0 to 59 or 0 to 359999
If INTERVAL, TIME, FOR and UNTIL are omitted, INTERVAL(0) is assumed.

REQID Specifies a one to eight character name used to uniquely identify this POST command. You can omit this field and allow CICS to generate a REQID in the EIBREQID field. This REQID can be used to CANCEL the POST command.


SET Specifies a Full Word binary field PIC S9(8) COMP where CICS places the address of the Timer Event Control area.

Conditions
EXPIRED The time you specified in the interval or time option has already expired.

INVREQ The command is invalid, or the HOURS, MINUTES or SECONDS are out of range.

Notes
  1. One useful implementation of this command is to force a minimum response time on the transaction. Do this by issuing a POST at the start of the program and then issuing a WAIT EVENT just before sending the final data.

The WAIT EVENT command:

EXEC CICS
WAIT EVENT ECADDR(pointer-ref)
END-EXEC

Options:
ECADDR The pointer returned by the POST command in the SET field. This is a binary full word field PIC S9(8) COMP.

Conditions:
INVREQ The address of the timer event control area is invalid.

0 comments:

Computers TopOfBlogs Technology Blogs Mainframe interview question and answers,mainframe jobs,cobol,vsam,jcl,cics,db2,rdbms,mvs,tso,ispf,ibm,hcl,tcs,cts,wibro Blog Directory