This sample DDS shows a select logical which uses the comparison to select records based on different values in different fields.


A          R GPORTA                    PFILE(GPORTAFL)
A          K COMPNZ                                   
A          K INVNOZ                                   
A          S FSTATZ                    CMP(EQ 'E')    
A          S RESBMH                    CMP(EQ 'Y')    
                                         

[Back]