|
View previous topic :: View next topic
|
| Author |
Message |
bhuspin
New User
Joined: 13 Aug 2008
Posts: 26
Location: chennai
|
|
|
|
HI ALL,
Could you pls tell me how to search the fieldnames that are coded in body section in a panels as if we execute F ALL in tso command line similarly if i type F ALL CODE in command line in my panel it should highlight the code that i defined in panel's BODY section and when i press RFIND=F5 it should repeat for next occurence in same panel
| Code: |
)PANEL KEYLIST(KEYPAX,TAR,SHARED)
)ATTR
* TYPE(TEXT)
$ TYPE(TEXT) INTENS(LOW) COLOR(TURQ)
( TYPE(TEXT) INTENS(HIGH) COLOR(RED)
! TYPE(TEXT) INTENS(HIGH) COLOR(WHITE)
# TYPE(TEXT) INTENS(HIGH) SKIP(ON)
% TYPE(INPUT) INTENS(HIGH) COLOR(TURQ) JUST(RIGHT) HILITE(USCORE)
_ TYPE(OUTPUT) INTENS(HIGH) COLOR(WHITE) HILITE(USCORE)
)BODY
!-------------------------------------------------------------------------------------
$ ENTER ==>%ZCMD # $I - INDEX F-FIND !|| COMMAND ==>%Z
!----------------------------- PAGE %PNO# OF 200 -----------------------------
*code1 :_Z #
*code2 :_Z #
*code3 :_Z # |
above is a panel it should highlight code in body section and proceed to next code on pressing F5
Thans in advance
Edited: Please use BBcode when You post some code, that's rather readable, Thanks...Anuj |
|
| Back to top |
|
 |
Bill Dennis
Active Member
Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA
|
|
|
|
| The program displaying the panel would be responsible for acting upon the command, seaching the values in the fields and positioning the cursor prior to the next display. |
|
| Back to top |
|
|
Marso
REXX Moderator
Joined: 13 Mar 2006
Posts: 1353
Location: Israel
|
|
|
|
The only way to recognize a variable from plain text is by checking the attribute.
You would have to search the )ATTR section for TYPE(OUTPUT) or TYPE(INPUT), without forgetting the default attributes,
Then search the )BODY for these attributes. The variable name comes immediatly after it.
Seems a lot of work to me, specially knowing that there are other TYPE(xxx) to consider, there are the ZVARS, and more things like )MODEL and so on... |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
|
|
|
|
| Your example does not have one, but you can also have variables specified through an ampersand. |
|
| Back to top |
|
|
bhuspin
New User
Joined: 13 Aug 2008
Posts: 26
Location: chennai
|
|
|
|
Thanks for Pedro,Marso & Bill
But could you pls explain clearly further on the same |
|
| Back to top |
|
|
Pedro
Global Moderator
Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley
|
|
|
|
Your rexx program could set a value like this:
| Code: |
dsn1 = 'user.jcllib'
|
and your panel could have some thing like this:
| Code: |
)BODY
Enter the volid for &dsn1 _mydsn +
|
In your search for variables, you would need to look for both the attribute of '_' and for the ampersand. |
|
| Back to top |
|
|
|
|
