Genero 的部落格

一樣的功能，但放在不一樣的地方時，程式碼是不一定能全部 COPY

如訂單單身的  AFTER FIELD oeb04  段，加了以下一段程式碼

SELECT SUM(img10) INTO l_img10
                FROM img_file
                WHERE img01 = g_oeb[l_ac].oeb04 AND img02 IN ('HS02','HS24')
                GROUP BY img01                
                IF  cl_null(l_img10) THEN LET l_img10 = 0 END IF
                LET g_oeb[l_ac].img10 = l_img10               
                DISPLAY BY NAME g_oeb[l_ac].img10

但同樣的程式，也需要放在 b_fill 的  FOREACH oebglobal_curs INTO g_oeb[g_cnt].*  裡，

這時，上述的程式就要將 [l_ac] 改為 [g_cnt] 才行。

SELECT SUM(img10) INTO g_oeb[g_cnt].img10
          FROM img_file
          WHERE img01 = g_oeb[g_cnt].oeb04 AND img02 IN ('HS02','HS24')
          GROUP BY img01
          IF cl_null(g_oeb[g_cnt].img10) THEN LET g_oeb[g_cnt].img10 = 0 END IF