MVSFORUMS.com

[hdagar]

I need help on the CICS abend INTR 4038.

I am getting this abend while executing an ACCEPT statement in a Cobol module.ACCEPT is accepting the system date.

[kolusu]

hdagar,

You cannot use COBOL statements that require the use of operating system Services. Instead, use CICS commands. You can request the current date and time of day with ASKTIME command.

Check the following links for

ASKTIME

FORMAT TIME


Some of the other COBOL statements you CANNOT code in CICS are :

CURRENT-DATE, DATE, DAY , DISPLAY, EXHIBIT, STOPRUN, TRACE

Any I/0 statements ( OPEN ,CLOSE, READ, WRITE, REWRITE, DELETE, START)

Check this link which explains in detail about the Restrictions.

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DFHP3A04/1.4.1.1?SHELF=&DT=20050112153951&CASE=

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

[Mike Chantrey]

There are additional restrictions as well if you are using the old OS/VS COBOL compiler.
In that case, you must not use such statements as INSPECT, STRING, UNSTRING and various others. This is fully documented in Appendix B (OS/VS COBOL) of the CICS Application Programming Guide (at CICS/TS 1.3).