Genero 的部落格

如果說 因為一些小的改變想要把原本的程式(母程式) 複製一份出來修改，重新命名一個新的程式(子程式)，但是程式使用的報表都是跟原程式一樣。
作法是先將 g_prog 改為原先的程式 (母程式). CALL cl_prt_cs3 後，再改為 新的程式(子程式).
如:
Let g_prog = 'cimr161'
CALL cl_prt_cs3('cimr161',g_rpt1,l_sql,g_str)
Let g_prog = 'cimr061'

這樣就可以了。