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

Search for a member in a set of concatenated pds's


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

New User


Joined: 05 Aug 2009
Posts: 44
Location: Hyderabad

PostPosted: Sat Oct 31, 2009 11:30 am
Reply with quote

Hello All,

lets say there is a command GETPROC which will open the proc for us when the cursor is placed at a PROC inside a PL/1 program.
For this I need to specify the libraries in which it has to perform the search.
My doubt is.. how can we specify user defined libs for the REXX exec to search in for.

I have used the following code:
Code:
when sysnode='MVSADM1' then                             
do                                                       
  proc.proc00 = proc.proc00 'SYS1.PROCLIB'               
  proc.proc00 = proc.proc00 'SYS1.DBDC.PROCLIB'         
  proc.proc00 = proc.proc00 'SYS1.XGROUP.PROCLIB'       
  proc.proc00 = proc.proc00 'ALL.PROCLIB'               
  proc.proc00 = proc.proc00 'CECFRT.PROD.PROCLIB'       
  proc.proc00 = proc.proc00 'CECFRT.IN80916.PROCLIB'     
  proc.proc00 = proc.proc00 'LCRAT.PROD.PROCLIB'         
  proc.proc00 = proc.proc00 'LCRAT.IN80916.PROCLIB'     
end                                                     


but it gives an error:
Code:
     66 +++ proc.proc00 = proc.proc00 'SYS1.PROCLIB'
        +++ "SYNTAX"                                 
 Error running GETPROC, line 66: Label not found     


This is how I invoke this MACRO
Code:
   CECFRT.SYST.PLI(CECFR02) - 01.99         
===> GETPROC                                 
 DCL PLIXOPT CHAR(50) VAR STATIC EXT         
                      INIT('STACK(32K,32K)');
 %INCLUDE COMBUILD;   


The cursor is placed at COMBUILD and hit ENTER
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Sat Oct 31, 2009 3:52 pm
Reply with quote

Posting more of the code might give mere mortal non-psychics like us a clue...
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Sat Oct 31, 2009 11:23 pm
Reply with quote

It looks okay to me, but PROC might be a reserved word. Try changing the stem name to some other name.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1306
Location: Vilnius, Lithuania

PostPosted: Sun Nov 01, 2009 12:22 am
Reply with quote

Pedro wrote:
It looks okay to me, but PROC might be a reserved word. Try changing the stem name to some other name.


REXX does not have reserved words.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Sun Nov 01, 2009 2:51 pm
Reply with quote

Where are you assigning a value to proc00
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 Search two or more word with FILEAID Compuware & Other Tools 15
No new posts Sortjoin and Search for a String and ... DFSORT/ICETOOL 1
No new posts first column truncated in search result IBM Tools 13
No new posts ISRSUPC search utility - using high l... TSO/ISPF 2
No new posts To search DB2 table based on Conditio... DB2 1
Search our Forums:

Back to Top