Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Updated CLIST is not being picked up by the program.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX
View previous topic :: :: View next topic  
Author Message
pravin madoori

New User


Joined: 29 Jan 2007
Posts: 25
Location: Hyderabad

PostPosted: Thu Aug 20, 2009 10:51 am    Post subject: Updated CLIST is not being picked up by the program.
Reply with quote

Hi
I have a PLI program which calls a CLIST. I had changed the CLIST but it has not picked up by the program, It is still giving same errors which were coming with old clist code.

The problem with old code:
PROC 0
CONTROL ASIS NOFLUSH NOMSG NOLIST NOCONLIST NOSYMLIST
WRITE EXECUTING COATZ96

/************************************************************
/* GET CONTROL VARS AND USER-ENTERED VARS FROM ISPF
/************************************************************
ISPEXEC VGET ( PLANID ) SHARED
ISPEXEC VGET ( ZCMD,
- - - - - - - - - - - - - - - 14 Line(s) not
MACSR10 ) SHARED

/************************************************************
/* DELETE DATASET FROM PREVIOUS REQUEST
/************************************************************
DELETE '&PLANID..USERONL.&ZUSER..COATZ95.HISTIN'

FREE ATTRLIST (DCB)
ATTRIB DCB BLKSIZE(25) RECFM(F) LRECL(25) DSORG(PS)
ALLOC FI(DATAOUT)
DA('&PLANID..USERONL.&ZUSER..COATZ95.HISTIN')
NEW
CATALOG
SP(1 1)
USING(DCB)
REUSE

OPENFILE DATAOUT OUTPUT

when above is executed I am getting below errors:
IGD17051I ALLOCATION FAILED FOR DATA SET
USERONL.PRAVINA.COATZ95.HISTIN
, PRIMARY SPACE EXCEEDS 65535 TRKS
The input or output file DATAOUT is not allocated. It cannot be opened for I/O.
EXECIO error while trying to GET or PUT a record.

New CLIST:
changed SP(1 1) to SP(1,1) Tracks but still same error.

So , i have removed everything from CLIST & just kept few WRITE lines... but still getting same above error.. I wonder why my updated CLIST is not in effect.

Program call CLIST like below:
COMMAND = 'CMD(%COATZ96)';
CALL ISPLINK('SELECT',LCOMMD, COMMAND);

please let me know,,what I need to do,,if my new clist code has to work?/
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Aug 20, 2009 11:39 am    Post subject:
Reply with quote

Is it called by the program from the same library that you updated it in ?
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CLIST & REXX All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Executing OO COBOL program invoking J... Virendra Shambharkar COBOL Programming 2 Tue Jan 10, 2017 6:37 pm
No new posts Need Suggestion on COBOL program vickey_dw COBOL Programming 5 Thu Jan 05, 2017 10:55 pm
No new posts I can not compile my program PL1 V3.R... Miguel Fernandez PL/I & Assembler 13 Tue Dec 06, 2016 8:30 pm
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts IMS BMP program causes 878 system abend Artemk IMS DB/DC 7 Tue Nov 22, 2016 8:26 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us