Comments on: Popup window is not displaying any field values in subfile http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/ Tue, 18 Jun 2013 06:50:50 +0000 hourly 1 By: TomLiotta http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115558 TomLiotta Thu, 24 Jan 2013 12:11:33 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115558 I see SFLDSP is conditioned by *IN20. I don’t see when *IN20 is set on. Ah, I see Phil’s awake… Good morning. Tom

]]> By: RamvishakRamesh http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115557 RamvishakRamesh Thu, 24 Jan 2013 12:09:34 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115557 Got it.. the field value corresponds to SFLRCDNBR was 0. now working fine

]]> By: philpl1jb http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115556 philpl1jb Thu, 24 Jan 2013 12:03:58 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115556  20 SFLDSP                                I probably missed it but have you turned indicator 20 on?This allows the subfile to be displayed.

]]> By: RamvishakRamesh http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115555 RamvishakRamesh Thu, 24 Jan 2013 11:41:00 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115555 RPG code 
FfielnameCF   E             WORKSTN  SFILE(SFL01:W#RRN1)                            


D W#Rrn1          S              2S 0                               
/*some codes to display the screen and after taking F5 – 

C                   When      *In05 = *On      
C                   ExSR      Sr@Audit         
C                   EndSL                      
 *********************************************************************        
 *  SUBR/Sr@Audit – Subroutine to show the Audit Log             *            
 *********************************************************************        
C     Sr@Audit      BegSR                                                     
                                          
C                   Clear                   SFL01                             
C                   Eval      *In22    = *On                                  
C                   Write     Ctl01                                           
C                   Eval      *In22    = *Off                                 
C                   Eval      W#RRN1   = *Zeros                               
C                                                                                                          
C     *Loval        SetLL     filename                                      
C     KeyLst        ReadE     filename                                      
C                   DoW       Not %Eof(filename)                            
C                   Eval      W#RRN1   = W#RRN1  + 1      
 
C                   Eval      W#RRN1   = W#RRN1  + 1                               
C                   Eval      S@UPDDT  = field1                                
C                   Eval      S@USRID  = field2
C                   Eval      S@PRODD1 = field3                                
C                   Eval      S@PRODD2 = field4                                 
C                   Eval      S@PRODD3 = field5                                 
C                   Eval      S@PRODD4 = field6                                
C                   Eval      S@PRODD5 = field7                                  
C                   Write     SFL01                                                
C                   Eval      *In23    = *Off                                      
C     K@VAHPF       ReadE     filename                                           
C                   EndDo                                                          
C                   Eval      D@INSC   = VlValr + ‘-’ + VlValS                     
C                   Eval      *In21    = *On                                       
C                   Write     Fmt03                                                
C                   ExFmt     Ctl01                                                
C                   EndSR
]]> By: RamvishakRamesh http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115554 RamvishakRamesh Thu, 24 Jan 2013 11:40:19 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115554 
A          R SFL01                     SFL                     
A*==========================================================   
A            S@UPDDT         Z  O  3  3                        
A            S@USRID        7A  O  3 34                        
A            S@PRODD1      70A  O  4  3                        
A            S@PRODD2      70A  O  5  3                        
A            S@PRODD3      70A  O  6  3                        
A            S@PRODD4      70A  O  7  3                        
A            S@PRODD5      70A  O  8  3                        
A*==========================================================   
A          R CTL01                     SFLCTL(SFL01)           
A                                      SFLSIZ(0999)                       
A                                      SFLPAG(0002)                       
A                                      WINDOW(FMT03)                      
A                                      OVERLAY                            
A                                      PROTECT                            
A*                                     KEEP                               
A  20                                  SFLDSP                             
A  21                                  SFLDSPCTL                          
A  22                                  SFLCLR                             
A  23                                  SFLEND(*MORE)                      
A                                      PAGEUP(25 ‘ROLL_UP’)               
A                                      PAGEDOWN(26 ‘ROLL_DOWN’)           
A            H@TOP1         4S 0H      SFLRCDNBR                          
A            D@INSC        11A  O  1  1                                   
A                                      COLOR(WHT)                         
A                                  1 23′Securities Extension Audit Log’   
A                                      COLOR(WHT)                         
A                                  2  1′Date/Time’                        
A                                      COLOR(WHT)
]]> By: TomLiotta http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115553 TomLiotta Thu, 24 Jan 2013 11:23:05 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115553 After FMT03, there is a…
 
I don’t think it matters what’s after FMT03. But we should see the full subfile definition. All we see is the subfile control record (CTL01) and what seems to be a single field (S@PRODD5) from the subfile. Where is the rest of the subfile record?
 
I am moving values to the subfile fields…
 
How?
 
If the database fields and display fields are named the same, that could help explain how you’re doing it. But we need to know that. By looking at it, it looks like you aren’t moving anything into the subfile.
 
Tom

]]> By: RamvishakRamesh http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115550 RamvishakRamesh Thu, 24 Jan 2013 10:29:17 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115550 After FMT03, there is a footer in subfile to with F1 – return. nothing more.      

]]> By: RamvishakRamesh http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115549 RamvishakRamesh Thu, 24 Jan 2013 10:27:22 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115549 I am moving values to the subfile fields after
Eval W#RRN1 = W#RRN1 + 1

]]> By: RamvishakRamesh http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115548 RamvishakRamesh Thu, 24 Jan 2013 10:24:06 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115548 C When *In05 = *On C ExSR Sr@Audit C EndSL ********************************************************************* * SUBR/Sr@Audit – Subroutine to show the Audit Log * ********************************************************************* C Sr@Audit BegSR C Clear SFL01 C Eval *In22 = *On C Write Ctl01 C Eval *In22 = *Off C Eval W#RRN1 = *Zeros C C *Loval SetLL filename C KeyLst ReadE filename C DoW Not %Eof(filename) C Eval W#RRN1 = W#RRN1 + 1 C Write SFL01 C Eval *In23 = *Off C KeyLst ReadE filename C EndDo C Eval D@INSC = VlValr + ‘-’ + VlValS C Eval *In21 = *On C Write Fmt03 C ExFmt Ctl01 C EndSR ]]> By: TomLiotta http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115546 TomLiotta Thu, 24 Jan 2013 10:06:50 +0000 http://itknowledgeexchange.techtarget.com/itanswers/popup-window-is-not-displaying-any-field-values-in-subfile/#comment-115546 Can we see the rest of the subfile definition, please? Also, we need to see the program code that loads and displays the subfile. — Tom

]]>