REXX / Dialog Manager & selecting mult rows



TSO Programming, ISPF, SDF, SDSF and PDF, FTP, TCP/IP Concepts, SNA & SNA/IP etc...

REXX / Dialog Manager & selecting mult rows

Postby tom_glaser » Mon Oct 24, 2011 7:08 pm

Hi,

I’m looking for an example of coding a rexx routine that calls a dialog manager table and allows the user to select multiple rows. I can get a selection of 1 row to work, but I’m a bit confused on selecting multiple rows. Here’s what I currently have:

000025 +
000026 % SEL Schema Type Application
000027 % === ====== ========= ==================
000028 )MODEL
000029 $S ¢SCHEMA }TYPE }APP
000030 )INIT

When the user hits enter, I can pick up the selection. I’ve tried the following:

ADDRESS ISPEXEC "TBTOP QMONQ"
say 'this is 1st s = 'S
say 'this is type = 'type
say 'this is schema = 'schema
ADDRESS ISPEXEC "TBSKIP QMONQ NUMBER(1)"
say 'this is 2nd s = 'S
say 'this is type = 'type
say 'this is schema = 'schema
ADDRESS ISPEXEC "TBSKIP QMONQ NUMBER(1)"
say 'this is 3rd s = 'S
say 'this is type = 'type
say 'this is schema = 'schema

The selection of each record is accurate for the “type” and “schema,” but the “S” shows the same value for each row based on the user’s last entry. For example, if user entered an “S” next to row, each and every row shows an “S”. Does anyone have an example I could look at?

Thanks,

Tom Glaser
MasterCard
tom_glaser@mastercard.com
tom_glaser
 
Posts: 5
Joined: Tue Oct 04, 2011 2:39 am
Has thanked: 0 time
Been thanked: 0 time

Re: REXX / Dialog Manager & selecting mult rows

Postby MrSpock » Mon Oct 24, 2011 7:36 pm

I always find this document to be quite helpful.
User avatar
MrSpock
Global moderator
 
Posts: 807
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 4 times

Re: REXX / Dialog Manager & selecting mult rows

Postby tom_glaser » Tue Oct 25, 2011 8:57 am

MrSpock, thank you so much for this link. This will get me started. You helped me on an earlier question....thanks again!

Tom
tom_glaser
 
Posts: 5
Joined: Tue Oct 04, 2011 2:39 am
Has thanked: 0 time
Been thanked: 0 time


Return to TSO & ISPF

 


  • Related topics
    Replies
    Views
    Last post