Hi,
I am trying to use the below code in my Program for executing quikjob utility but the below code is not allowed and my job is abending with RC=ABENDU3333.
MOVE C"'" TO OFA36.
abend reason: INVALID AREA NAME
MOVE TIME-HH TO OFA48-49.
MOVE C'.' TO OFA50.
MOVE TIME-MM TO OFA51-52.
MOVE C'.' TO OFA53.
MOVE TIME-SS TO OFA54-55.
MOVE C'.' TO OFA56.
abend reason: INVALID AREA NAME
The "'" and TIME-HH etc. are not allowed.
Get back to me ASAP.
quikjob
Moderators: Frank Yaeger, DikDude, Moderator Group
use the following code to acheive it
The VAL62-66 contains the system time in HH:MM format.
Code: Select all
MOVE C'''' TO OFA36.
MOVE VAL62-63 TO OFA48-49. <-- this contains HH
MOVE C'.' TO OFA50.
MOVE VAL65-66 TO OFA51-52. <- this contains MM
MOVE C'.' TO OFA53.
MOVE C'00' TO OFA54-55.
MOVE C'.' TO OFA56.
The VAL62-66 contains the system time in HH:MM format.
Regards,
Raj.
vrajx
Raj.
vrajx
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page