also wenn es darum geht zu prüfen ob der wert in der tabelle ist, dann versuche es mit
Code:
     d iln             s             13s 0 dim(5) perrcd(1) ctdata   
     d test            s             10a                             
     d index           s              5s 0                           
                                                                     
     c                   clear                   index               
     c                   eval      index = %lookup(4004849000005:iln)
     c                   if        index > *zeros                    
     c                   eval      test  = 'Hallo'                   
     c                   endif                                       
     c                                                               
     c                   eval      *inlr = *on                       
**                                                                   
4004840000004                                                        
4002593000005                                                        
4004849000005                                                        
4001645000000                                                        
4007104000000
wenn index > 0 ist, dann hat dann ist der wert in der tabelle. und bei 0 halt nicht

gruß ronald

[Dieser Beitrag wurde von malzusrex am 31. März 2003 editiert.]