Re: AW: embedded sql - Continued

["Douglas W. Palme" <dpalme@xxxxxxxxxxx>]

Its turned on with an indicator IN51  

If you look down a bit you will see it 
> > A  51                                  SFLDSP                 

The other strange thing is when I get the standard session error if I hit 
the enter key the subfile actually displays for a brief second and then is 
gone......I don't know if that means anything or more; it happens so fast I 
can't see what is displayed.


On Wed, 27 Jul 2005 18:14:57 +0200, Carel Teijgeler wrote
> Douglas,
> 
> Basically, I miss the keyword to display the SFLCTL.
> 
> Regards,
> Carel Teijgeler
> 
> *********** REPLY SEPARATOR  ***********
> 
> On 27-7-05 at 8:55 Douglas W. Palme wrote:
> 
> >Here is the dds for the subfile:
> >
> > A                                      DSPSIZ(24 80 *DS3)     
> > A          R SPECSFL                   SFL                    
> > A            DCUSTNO        9S 0O  7  2                       
> > A            DCUSTNAME     17A  O  7 13                       
> > A            DSALES         9Y 2O  7 32EDTCDE(1)              
> > A            DMARGIN        9Y 2O  7 60EDTCDE(1)              
> > A            DPCT           5Y 2O  7 74EDTWRD('   .  ')       
> > A            DCOST          9Y 2O  7 46EDTCDE(1)
> 
> > A          R SPECCTL                   SFLCTL(SPECSFL)        
> > A                                      CF12(12 'F12=CANCEL')      
> >  A                                      OVERLAY                
> > A  51                                  SFLDSP                 
> > A  52                                  SFLCLR                 
> > A                                      SFLSIZ(0015)           
> > A                                      SFLPAG(0014)           
> > A                                  1  3DATE                   
> > A                                      EDTCDE(Y)              
> > A                                  1 30'CWTS'
> >A                                  1 70USER                       
> >A                                  2 28'SPEC GAS TOP TEN CUSTOMERS
> >A                                      COLOR(WHT)                 
> >A                                  3 35'Year to Date'             
> >A                                  5  4'CUST NO'                  
> >A                                      COLOR(WHT)                 
> >A                                  6  2'==========================
> >A                                      ===========================
> >A                                      ========='                 
> >A                                      COLOR(WHT)                 
> >A                                  5 14'CUSTOMER NAME'            
> >A                                      COLOR(WHT)  
> >A                                  5 39'SALES'     
> >A                                      COLOR(WHT)  
> >A                                  5 66'MARGIN'    
> >A                                      COLOR(WHT)  
> >A                                  5 77'PCT'       
> >A                                      COLOR(WHT)  
> >A                                  5 54'COST'      
> >A                                      COLOR(WHT)
> 
> -- 
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
>  mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To 
> subscribe, unsubscribe, or change list options, visit: 
> http://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-
> L-request@xxxxxxxxxxxx Before posting, please take a moment to 
> review the archives at http://archive.midrange.com/rpg400-l.


If you bought, it was hauled by a truck - somewhere, sometime.