IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Dynamically adding CLIST Library to existing TSO Lirbaries


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 124
Location: India

PostPosted: Sat Mar 14, 2020 4:33 pm
Reply with quote

Hi,

I have my personal CLIST with my own customization. I want this to be added to existing CLIST concatenations after I login to TSO session.

For ex:
My CLIST library : TEST.CLIST

Existing CLIST Concatenations as below:-

From ISRDDN
Code:

SYSPROC  ABCD.BASE.EXEC
         TEST.BASE.EXEC
         SYSTSO.BASE.CLIST
         SYS1.SISPEXEC


Is there any way to dynamically add my CLIST datast TEST.CLIST as below
Code:

SYSPROC  ABCD.BASE.EXEC
         TEST.BASE.EXEC
         SYSTSO.BASE.CLIST
         SYS1.SISPEXEC
       TEST.CLIST


Thanks!
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2454
Location: Hampshire, UK

PostPosted: Sat Mar 14, 2020 4:55 pm
Reply with quote

Use a Rexx exec to do the allocation.
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 124
Location: India

PostPosted: Sat Mar 14, 2020 5:20 pm
Reply with quote

Hi Nic,

I have used below CLIST

Code:

ALLOCATE DA('TEST.CLIST') F(SYSPROC) SHR REUSE


But only my dataset is allocated and other libraries missing from SYSPROC Concatenation.

Thanks!
Back to top
View user's profile Send private message
Joerg.Findeisen

Senior Member


Joined: 15 Aug 2015
Posts: 1335
Location: Bamberg, Germany

PostPosted: Sat Mar 14, 2020 6:07 pm
Reply with quote

Try something like this to activate and deactivate your CLIST.
Code:
ALTLIB ACTIVATE APPLICATION(EXEC) DA('TEST.CLIST')

Code:
ALTLIB DEACTIVATE APPLICATION(EXEC)
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 124
Location: India

PostPosted: Sat Mar 14, 2020 7:25 pm
Reply with quote

Hi Joerg,

I have executed above code and it ran fine(RC=0) , But my library TEST.CLIST is not added.

Thanks!
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10888
Location: italy

PostPosted: Sat Mar 14, 2020 7:29 pm
Reply with quote

the forum is not for spoon feeding icon_evil.gif

why don't You do a bit of homework and find out by Yourself

Quote:
Try something like this to activate and deactivate your CLIST.


hinted that it might not have been the final solution


a simple google search with

Quote:
altlib activate application(exec)


would have given enough hints to fix the issue by Yourself

anyway the question has been asked so many times that the topic should
belong to the topics not allowed any longer for discussion category
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 124
Location: India

PostPosted: Sat Mar 14, 2020 7:56 pm
Reply with quote

Hi Enrico,

I have another code as below and worked fine.
Code:

/* REXX */
DSNAME = "'TEST.CLIST'"
DDNAME = "SYSPROC"
"ISPEXEC QBASELIB "DDNAME" ID(DSLIST)"
"ALLOC F("DDNAME") DA("DSNAME","DSLIST") SHR REU"
EXIT 0


But somehow ALTLIB is not working for me. Will try and post results..

Thanks!
Upendra.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10888
Location: italy

PostPosted: Sat Mar 14, 2020 9:22 pm
Reply with quote

RTFM
returned by the google search I told You to use

since You are clearly too lazy to google here is the link returned as the first hit when I searched for You icon_evil.gif

www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.ikjc500/ikj2l2_ALTLIB_command_operands.htm
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 124
Location: India

PostPosted: Sat Mar 14, 2020 9:51 pm
Reply with quote

Hi Enrico,

Thank you.
Am already in IBM link and working on ALTLIB Commands.



Thanks!
Back to top
View user's profile Send private message
Willy Jensen

Active Member


Joined: 01 Sep 2015
Posts: 734
Location: Denmark

PostPosted: Sun Mar 15, 2020 3:43 pm
Reply with quote

One method for reallocation is the CONCAT pgm found at cbttape.org file 183. Or write something yourself using the QBASELIB function mentioned above.
Be aware that you can reallocate SYSPROC, but not SYSEXEC while in ISPF.
ALTLIB does not concattenate to the DDname, it alllocates a new DDname and adds that to the search order.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2594
Location: Silicon Valley

PostPosted: Mon Mar 16, 2020 2:41 am
Reply with quote

Quote:
but not SYSEXEC while in ISPF

Are you sure? That did not used to be true.
Back to top
View user's profile Send private message
Willy Jensen

Active Member


Joined: 01 Sep 2015
Posts: 734
Location: Denmark

PostPosted: Mon Mar 16, 2020 3:22 am
Reply with quote

Just tried it to be sure, I get message 'KJ56861I FILE SYSEXEC NOT FREED, DATA SET IS OPEN' when I try to free or ALLOC .. REUSE. Actually I am pretty sure it always was so.
Back to top
View user's profile Send private message
upendrasri

Active User


Joined: 28 Sep 2017
Posts: 124
Location: India

PostPosted: Mon Mar 16, 2020 8:13 am
Reply with quote

Hi All,

I have used below code which worked fine.
Code:

ALTLIB ACTIVATE APPLICATION(EXEC) DATASET(’TEST.CLIST')


But with ALTLIB we can't concatenate CLIST dataset to SYSPROC datasets but we can create a new DDNAME and we can add it to search order.

Thanks!
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Dynamically build sort control statem... SYNCSORT 18
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
No new posts Adding QMF and SPUFI to the ISPF menu DB2 20
No new posts Calling an Open C library function in... CICS 1
No new posts Sort First/last record of a subset th... DFSORT/ICETOOL 7
Search our Forums:

Back to Top