Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
ISPF table is not displayed properly

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
Author Message
Neilabh

New User


Joined: 29 Nov 2006
Posts: 8
Location: India
PostPosted: Thu Aug 28, 2008 10:44 am    Post subject: ISPF table is not displayed properly
 Reply with quote
Hello,

I am trying to display the contents of a table using TBDISPL

Here is the relevant PANEL description

Code:

~**%&ZDATE \=\  ------  \=\%$USER:%&ZUSER~**           
%COMMASD ==>_ZCMD                                                       
+                                                     ~MM $/~DD$/~YY$   
+     $TICKET _Z      $                    $OPENED   : _Z $/_Z $/_Z $   
+                                          $UPDATED  : _Z $/_Z $/_Z $   
      $STATUS _Z$                                                       
+                                                                       
+$----------------------------------------------------------------------
)MODEL ROWS(SCAN)                                                       
+ _S$&TICKETNO$&OPNDATE$&UPDDATE$&SDESC1                               
+                               $&SDESC2                               
)INIT                                                                   
   .ZVARS = '(TICKETNO OPMM OPDD OPYY UPMM UPDD UPYY STATUS)'           
                                                                       
)PROC                                                                   
                                                                       
                                                                       
)END                                                                   


Here is the REXX CODE invoking the table

Code:

ADDRESS ISPEXEC                               
TICKETNO = 'T*'                               
"TBOPEN TCKTMSTR"                             
"TBSARG TCKTMSTR NEXT NAMECOND(TICKETNO,EQ)" 
"TBSCAN TCKTMSTR"                             
"TBDISPL TCKTMSTR PANEL(PNLTCKET)"           
"TBCLOSE TCKTMSTR NEWCOPY"                   


Table contains 2 records T1111111 and T2222222.

But my panel displays 2 records for key T1111111 as below

Code:

                                                       MM  / DD / YY           
       TICKET  T111111                      OPENED   :  __ / __ / __           
                                            UPDATED  :  __ / __ / __           
       STATUS  A                                                               
                                                                               
  ------------------------------------------------------------------------------
   _ T1111111  11/03/08 11/04/08 SAMPLE 1                                       
                                 SAMPLE 2                                       
   _ T1111111  11/03/08 11/04/08 SAMPLE 1                                       
                                 SAMPLE 2                                       
 ******************************* Bottom of data ********************************


Can anyone tell me, what I am missing here.
Back to top
View user's profile Send private message
References
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 543
Location: work
PostPosted: Thu Aug 28, 2008 9:40 pm    Post subject: Reply to: ISPF table is not displayed properly
 Reply with quote
Can you show your )ATTR section?
Back to top
View user's profile Send private message
Neilabh

New User


Joined: 29 Nov 2006
Posts: 8
Location: India
PostPosted: Fri Aug 29, 2008 8:37 am    Post subject:
Reply with quote
Thanks Pedro for the reply. Here is the )ATTR section.
Code:

)ATTR DEFAULT(%+_)                                                     
_ TYPE(INPUT)  INTENS(HIGH) CAPS(ON) JUST(LEFT) COLOR(GREEN) PAD(_)     
% TYPE(TEXT)   INTENS(HIGH)                                             
+ TYPE(TEXT)   INTENS(LOW)  SKIP(ON)                                   
# TYPE(TEXT)   INTENS(LOW)  SKIP(ON) COLOR(WHITE)                       
~ TYPE(TEXT)   INTENS(HIGH) CAPS(OFF) COLOR(BLUE)                       
} TYPE(TEXT)   INTENS(HIGH) SKIP(ON) COLOR(YELLOW)                     
$ TYPE(TEXT)   INTENS(LOW)  SKIP(ON) COLOR(TURQ) CAPS(ON)               
@ TYPE(TEXT)   INTENS(HIGH) SKIP(ON) COLOR(GREEN)                       
! TYPE(TEXT)   INTENS(LOW)  SKIP(ON) COLOR(RED)                         
Back to top
View user's profile Send private message
Neilabh

New User


Joined: 29 Nov 2006
Posts: 8
Location: India
PostPosted: Fri Aug 29, 2008 11:22 am    Post subject:
Reply with quote
Hey Pedro, I got the point. I have changed the type from TEXT to OUTPUT for those table variables.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 543
Location: work
PostPosted: Fri Aug 29, 2008 9:17 pm    Post subject: Reply to: ISPF table is not displayed properly
 Reply with quote
I was not ready to make the point yet, but glad you found it right away.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1