File concatenation in ISPF

[SowKan]

I have a PDS that needs to be allocated to the ISPF Message Library say ISPMLIB. How can I do that in REXX?

 

[rexxhead]

The following must happen outside ISPF (i.e.: in READY-mode):
(1) Find out which datasets are currently allocated to ISPMLIB (LISTA STATUS);
(2) Add the additional dataset(s) to the list;
(3) Reallocate (ALLOC FI(ISPMLIB) DA(...) )

Or... you could eliminate the need for ISPMLIB altogether by issuing any required messages in-line:

if <message-condition> then do
   zerrsm = <short msg>
   zerrlm = <long msg>
   zerrhm = <2ry HELP panel>
   zerralrm = <YES or NO>
   address ISPEXEC "SETMSG MSG(ISRZ002)"
   end

Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster

 

[sunbhu082]

You can also allocate ur message library to a temp ddname and concat temp ddname to ISPMLIB

ALLOC FI(TEMP4) DA('DENTSO.ISPMLIB') SHR
CONCAT ISPMLIB TEMP4

 

[KiwiREXXDude]

sunbhu082, CONCAT is a program and not available to all sites.

Personally I always use rexxhead's alternate method (which can be used in panels as well).