under the browse list (AS400/IBM I)

[noamp]

hey,
i have a problem on lansa as400/ibm i.
maybe anyone can help me with that.

when i have browse list on the display screen i can't position test or field under the list on the bottom of the screen.

please if anyone know.
thanks!

[caseywhite]

I haven't looked at green screen code in a long time but I did figure out how you might be able to do what you want depending on whether you need fields to be input capable. Check out the help on the DISPLAY/REQUEST command and look at the OPTIONS parm. You can use *NOREAD on the first DISPLAY which will cause the system to go to the next DISPLAY/REQUEST. But that means that those fields cannot be input capable. I tried putting an input field above the browselist in the second but it resulted in the browselist data not being displayed. Your input capable fields would be on your the second DISPLAY/REQUEST.

Here is some sample code to play around with. I commented out the Request that didn't work correctly.

Code: Select all

Def_List Name(#TEST) Fields(#STD_TEXT)

Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)
Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)
Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)
Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)

Display Fields((#STD_ALPHA *L4 *P3) (#STD_TEXTS *L6 *P3)) Browselist(#TEST 5) Options(*NOREAD)
Request Fields((#STD_FLAG *L19 *P3 *INPUT)) Options(*OVERLAY)
* Request Fields((#STD_FLAG *L19 *P3 *INPUT) (#STD_ALPHA *L3 *P2)) Options(*OVERLAY)

[noamp]

I haven't looked at green screen code in a long time but I did figure out how you might be able to do what you want depending on whether you need fields to be input capable. Check out the help on the DISPLAY/REQUEST command and look at the OPTIONS parm. You can use *NOREAD on the first DISPLAY which will cause the system to go to the next DISPLAY/REQUEST. But that means that those fields cannot be input capable. I tried putting an input field above the browselist in the second but it resulted in the browselist data not being displayed. Your input capable fields would be on your the second DISPLAY/REQUEST.

Here is some sample code to play around with. I commented out the Request that didn't work correctly.

Code: Select all

Def_List Name(#TEST) Fields(#STD_TEXT)

Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)
Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)
Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)
Change Field(#STD_TEXT) To(X)
Add_Entry To_List(#TEST)

Display Fields((#STD_ALPHA *L4 *P3) (#STD_TEXTS *L6 *P3)) Browselist(#TEST 5) Options(*NOREAD)
Request Fields((#STD_FLAG *L19 *P3 *INPUT)) Options(*OVERLAY)
* Request Fields((#STD_FLAG *L19 *P3 *INPUT) (#STD_ALPHA *L3 *P2)) Options(*OVERLAY)

Thank you caseywhite!!
It's work perfect.