我將 l_ac 及 l_table變數修改成其他名稱，一樣會發生問題，請問我是哪裡做錯了，謝謝

FUNCTION t360_out_history_price()
  DEFINE l_sql    STRING,
         l_a     INTEGER,
         l_a_2   INTEGER,
         l_flag   INTEGER,
         l_table2  STRING
        ,l_sql_t  STRING   

  DEFINE sr RECORD
           oqu03 LIKE oqu_file.oqu03,
           oqu04 LIKE oqu_file.oqu04,
           oqt01 LIKE oqt_file.oqt01,
           oqt02 LIKE oqt_file.oqt02,
           oqu02 LIKE oqu_file.oqu02,
           oqt09 LIKE oqt_file.oqt09,
           oqu07 LIKE oqu_file.oqu07
         END RECORD

  LET l_sql_t = "oqu03.oqu_file.oqu03,",
                "oqu04.oqu_file.oqu04,",
                "oqt01.oqt_file.oqt01,",
                "oqt02.oqt_file.oqt02,",
                "oqu02.oqu_file.oqu02,",
                "oqt09.oqt_file.oqt09,",
                "oqu07.oqu_file.oqu07"

  LET l_table2 = cl_prt_temptable('cxmt360',l_sql_t) CLIPPED
  IF l_table2 = -1 THEN RETURN END IF
  LET l_sql_t = "INSERT INTO ",g_cr_db_str CLIPPED,l_table2 CLIPPED,
                " VALUES(?,?,?,?,? ,?,?)"

  PREPARE insert_prep_out_3 FROM l_sql_t
  IF SQLCA.SQLCODE OR STATUS THEN
    CALL cl_err('inser_prep_out_3:',status,1)
    RETURN
  END IF

  FOR l_a = 1 TO g_oqu.getLength()
    LET l_flag = 0
    FOR l_a_2 = 1 TO l_a-1
      IF g_oqu[l_a_2].oqu03 = g_oqu[l_a].oqu03 AND g_oqu[l_a_2].oqu04 = g_oqu[l_a].oqu04 THEN
        LET l_flag = 1
        EXIT FOR
      END IF
    END FOR
    IF l_flag = 1 THEN
      CONTINUE FOR
    END IF

    LET l_sql = " SELECT oqu03,oqu04,oqt01,oqt02,oqu02,oqt09,NVL(oqu07,oqv05) oqu07",
                "   FROM oqt_file LEFT JOIN oqu_file ON oqt01 = oqu01 ",
                "                 LEFT JOIN (SELECT oqv01,oqv02,MIN(oqv05) oqv05 FROM oqv_file GROUP BY oqv01,oqv02) ON oqu01 = oqv01 AND oqu02 = oqv02",
                "  WHERE oqt04 = '",g_oqt.oqt04,"' AND oqu03 = '",g_oqu[l_a].oqu03,"' ",
                "    AND oqu04 = '",g_oqu[l_a].oqu04,"'", 
                "    AND NOT oqt01 = '",g_oqt.oqt01,"'  AND NOT oqtconf = 'X'",
                " ORDER BY oqt02 DESC,oqt01, oqu02 " 

    PREPARE cxmt360_prepare_out_3 FROM l_sql
    DECLARE cxmt360_curs_out_3 CURSOR FOR cxmt360_prepare_out_3
    IF SQLCA.sqlcode OR STATUS THEN
      CALL cl_err('prepare:',SQLCA.sqlcode,1)
      CALL cl_used(g_prog,g_time,2) RETURNING g_time
      RETURN
    END IF

    FOREACH cxmt360_curs_out_3 INTO sr.*
      EXECUTE insert_prep_out_3 USING sr.*
    END FOREACH

    CLOSE cxmt360_curs_out_3
    FREE cxmt360_prepare_out_3

  END FOR

  LET l_sql = "SELECT * FROM ",g_cr_db_str CLIPPED,l_table2 CLIPPED

  CALL cl_prt_cs3('cxmt360','cxmt360_history_price',l_sql,"")
END FUNCTION

您好想再問一下
建議1:我已經有修改過但還是不行
建議2:我不太懂新增一隻r的程式是指甚麼，剛剛去翻了一下還是不明白，所以想再請教一下，謝謝

1.r的程式=>指的是獨立的報表程式.(TIPTOP程式編號第四碼='r':代表為報表程式.=>請參考TIPTOP的技轉手冊前幾頁就有說明)
2.l_ac :沒改到,只改到l_table , 如果l_ac 改為l_ac_1 也無效， 就要用debug mode 檢查