MAINFRAME - TIP OF THE DAY :
Q. If there is a situation, where we need to code more than 255 steps in a JOB?
A. We need to split jcl into two jcls , at the end of the first jcl check the condition code and initiate the second jcl.
Programmers Voted for below topics. Please Vote for good Posts.
Thank You! for your feedback. Connecting to the server. Please Wait...
Posted: Fri Feb 22, 2008 6:41 pm Post subject: HELP NEEDED CLIST MACRO
I have one cobol pgm which can be used for checking the cobol standards. I want to use a clist prog for invocking the program and list down the coding errors, but the problem now is this clist code is not working. I have attached all the clist codes I'm using ......... if anybody can help me on this asap...........pls help it's very urjent
the pgm works like if we type COBCHECK IT WILL LIST DOWN THE ERRORS AT SPECIFIC LINES AND WE CAN CHANGE & SAVE
ISREDIT MACRO (LEVEL)
/* CHECKS A PROGRAM TO SEE IF ERROR LOGGING IS CODED CORRECTLY
/* CONTROL FLUSH MSG LIST CONLIST SYMLIST
SET XAMSGLVL = 1
IF &LEVEL = THEN GOTO CHNGCHK
IF &SUBSTR(1:3,&LEVEL) = ERR THEN SET XAMSGLVL = 3
IF &SUBSTR(1:3,&LEVEL) = WAR THEN SET XAMSGLVL = 2
ISREDIT (DATACHNG) = DATA_CHANGED
IF &DATACHNG = YES THEN +
WRITE YOU MUST SAVE THE SOURCE BEFORE RUNNING THIS CLIST
/* OBTAIN MEMBER NAME
ISREDIT (PROGNAME) = MEMBER
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum