quikjob

In this Mainframe Forum - You can post your queries on JCL, OS/390 JCL, MVS JCL, z/OS JCL, JES2 & JES3

Moderators: Frank Yaeger, DikDude, Moderator Group

Post Reply
spawar4
Member
Posts: 21
Joined: Sun Oct 25, 2009 10:35 am

quikjob

Post by spawar4 » Tue Dec 22, 2009 6:00 pm

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.

User avatar
vrajx
Member
Posts: 3
Joined: Thu Dec 24, 2009 2:51 pm

Post by vrajx » Thu Dec 24, 2009 2:56 pm

use the following code to acheive it

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

academyindia4

Topic deleted by Admin

Post by academyindia4 » Fri Jan 15, 2016 8:58 pm

<< Content deleted By Admin >>

Post Reply

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



Other References
Mainframe Tools and others