兩個LF的KEY值合并為UNIQUE KEY

i400as

求助解答

有兩個LF ，LFA有3個KEYS，LFB有1個KEY，現(xiàn)因業(yè)務(wù)需要，將兩個LF的4個KEYS作為UNIQUE去查找一個記錄。程序應(yīng)該如何定義？非常感謝。

我現(xiàn)程序這樣定義

N49      MKEY1     CHAINSMESALLA             52  
N49      MKEY2     CHAINSMESALLB             53  
             *IN52     IFEQ '1'                     
            *IN53     ANDEQ'1'                     
                          SETON                     4249
                         ENDIF                        
                         ENDIF                        

但是實現(xiàn)的只是前面的MKEY1滿足要求，MKEY2被忽略。

digitalchina

新建個LFC 如何?

wdz315

原帖由 i400as 于 2009-1-6 13:48 發(fā)表
求助解答

有兩個LF ，LFA有3個KEYS，LFB有1個KEY，現(xiàn)因業(yè)務(wù)需要，將兩個LF的4個KEYS作為UNIQUE去查找一個記錄。程序應(yīng)該如何定義？非常感謝。

我現(xiàn)程序這樣定義

N49      MKEY1     CHAINSMESALLA     ...

新建一個結(jié)合邏輯文件比較好！

zhas400

不需要如此復(fù)雜。先用LFA查找記錄，如果不存在，抱錯。如果存在，用MKEY2的值和LFB鍵字對應(yīng)的字段進(jìn)行比較。如果相等，說明符合條件。

N49      MKEY1     CHAINSMESALLA             52  
  52                      SETON                   4249        
N52      MKEY2     IFNE  SMESALLB的KEY對應(yīng)的字段                              
                          SETON                     4249
                          ENDIF

duoer-ld

SETON                                                    4249
            MKEY1     SETLLSMESALLA            
            DOW        *IN55 = '0'
            MKEY1     READESMESALLA                         *IN55
            IF             *IN55 = '0' AND
                           MKEY2 =  與SMESALLA中對應(yīng)的字段     
                           SETOFF                   4249
            ENDIF
            ENDDO

個人建議，還是建一個LFA和LFB 的組合LF比較好。