|
View previous topic :: View next topic
|
| Author |
Message |
priti
New User
Joined: 29 Sep 2005
Posts: 3
|
|
|
|
I wanted to know the syntax of find command in REXX. Pls give an example too.
Also can you pls find out the error in the following rex code
"FIND "'PROCEDURE DIVISION'" WORD FIRST"
"(PDROW,PDCOL) = CURSOR" |
|
| Back to top |
|
 |
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
Why is it so difficult for folks to look this stuff up for themselves? It's described right here.
| Quote: |
FIND is a non-SAA built-in function provided only by TSO/E and VM.
WORDPOS is the preferred built-in function for this type of word search.
FIND(string,phrase)
returns the word number of the first word of phrase found in string or returns 0 if phrase is not found or if there are no words in phrase. The phrase is a sequence of blank-delimited words. Multiple blanks between words in phrase or string are treated as a single blank for the comparison.
Here are some examples:
FIND('now is the time','is the time') -> 2
FIND('now is the time','is the') -> 2
FIND('now is the time','is time ') -> 0
|
| Quote: |
Also can you pls find out the error in the following rex code
"FIND "'PROCEDURE DIVISION'" WORD FIRST"
"(PDROW,PDCOL) = CURSOR"
|
That is not REXX code (REXX code would not coded within quotes). It looks more like an ISPF EDIT 'FIND' command, possibly even part of an ISPF EDIT Macro. If it is, you can look here. |
|
| Back to top |
|
|
priti
New User
Joined: 29 Sep 2005
Posts: 3
|
|
|
|
Well I saw this explanation in the IBM manual, but the rexx code I have is not using the same format.
AS I mentioned earlier,
can u find out the error in the following rexx code
"FIND "'PROCEDURE DIVISION'" WORD FIRST"
"(PDROW,PDCOL) = CURSOR" |
|
| Back to top |
|
|
mainfrae
Currently Banned
New User
Joined: 07 Feb 2006
Posts: 4
|
|
|
|
HI PRITA
change the code by giving "FIND 'PROCEDURE DIVISION' FIRST" or
"FIND 'PROCEDURE DIVISION' WORD FIRST".it is working fine for me.
U can use SEEK command also.SEEK means search,but there is difference between SEEK and FIND
COL8=8
"SEEK "COL8" 'PROCEDURE DIVISION' FIRST"
COL8 is a variable which represents the 8th column
If u need more information,please let me know |
|
| Back to top |
|
|
|
|
