Exporttoexcel ON ACTION LETのg_action_choice = " exporttoexcel " cl_auth_chk_act(IF " exporttoexcelは" )THEN #(版:62)---スタート--- #、調整に応じて、輸出規則を得意と同時に、古いものと新しい慣行のニーズを満たす lb_get_typeはLET = cl_get_exporttoexcel_type() #add -ポイント:ACTIONのexporttoexcel名= ON " ui_dialog.exporttoexcel_type_change " #END追加 - ポイント DISPLAYを" lb_get_type:" 、lb_get_type CASE lb_get_type WHEN = " POI " #の使用のPOI樣板 #browserの CALLのg_export_node.clear()は g_main_hidden IF = 1 THEN l_arr_len LET = g_browser.getLength() g_export_tabname [LET 1 ] = " s_browse " g_export_tagをLET [ 1 ] = rec_arr_type.create (l_arr_len) FOR l_arr_cnt = 1 l_arr_len TO LET g_export_tag [ 1 ] [l_arr_cnt] = g_browser [l_arr_cnt] FOR END #add -点:アクションexporttoexcel名ON = " menu.exporttoexcel_browser_poi " #ENDアド - ポイント のCALL cl_export_poi() #add -点:アクションexporttoexcel名ON = " menu.exporttoexcel_browser_after_poi 「 #ENDのアドオン - ポイント #の非ブラウザは、 ELSE l_arr_len LET= g_xcck_d.getLength()は g_export_tag [LET 1 ] = rec_arr_type.create(l_arr_len) LET g_export_tabname [ 1 ] = " s_detail1 " l_arr_cnt FOR = 1 l_arr_len TO g_export_tagをLET [ 1 ] [l_arr_cnt] = g_xcck_d [l_arr_cnt] FOR END #add -ポイント:ACTIONのexporttoexcel名ON = " menu.exporttoexcel_poi " LET l_arr_len = g_xcck2_d.getLength() g_export_tagは[LET 2 ] = rec_arr_type.create(l_arr_len) g_export_tabname [LET 2 ] = " s_detail2 " l_arr_cnt FOR = 1 l_arr_len TO LET g_export_tag [ 2 ] [l_arr_cnt] = g_xcck2_d [l_arr_cnt] FOR END #ENDアド - ポイント (コールcl_export_to_excel_getpageを) CALLのcl_export_poi() #add -点:アクションexporttoexcel名ON =" menu.exporttoexcel_after_poi " #ENDアド - ポイント END IF
ON ACTION exporttoexcel
LET g_action_choiceは= "exporttoexcel"
IF cl_auth_chk_act ("exporttoexcelは" ) THEN
#(版:62)---スタート---
#調整に応じて、輸出ルールをエクセル、同時に古いものと新しい慣行のニーズを満たす
LET lb_get_type = cl_get_exporttoexcel_type ()
アドインポイント#:ACTIONのexporttoexcel名ON = "ui_dialog.exporttoexcel_type_change"
#ENDアドインポイント
DISPLAY "lb_get_typeは:" 、 lb_get_type
CASEを
WHEN lb_get_type = "ポイ" ポイを使用して#テンプレート
#browser
CALLの g_export_node 。クリアな()
IF g_main_hidden = 1 THEN
LET l_arr_len = g_browser .getLength ()は、
LET g_export_tabname [ 1 ] = "s_browse"
LET g_export_tagを[ 1 ] = rec_arr_type .create ( l_arr_len )
FOR l_arr_cnt = 1 に l_arr_len
LET g_export_tagを[ 1 ] [ l_arr_cnt ] = g_browser 【 l_arr_cnt ]
END FOR
#追加点を:ON ACTIONのexporttoexcel名= "menu.exporttoexcel_browser_poi"
#END追加点
CALL cl_export_poi ()
#が追加点を:ACTIONのexporttoexcel名= "menu.exporttoexcel_browser_after_poi" ON
#END追加点を
#の非ブラウザ
ELSEは
LET l_arr_len = g_xcck_d .getLength ()
LET g_export_tag [ 1 ] = rec_arr_type .create ( l_arr_len )
LET g_export_tabname [ 1 ] = "s_detail1"
FOR l_arr_cnt = 1 TO l_arr_len
LET g_export_tagが[ 1 ] [ l_arr_cnt ] = g_xcck_d [ l_arr_cnt ]
END FOR
#追加点を:アクションexporttoexcel名ON = "menu.exporttoexcel_poi"
LET l_arr_len = g_xcck2_d .getLength ()は、
LET g_export_tag [ 2 ] = rec_arr_type .create ( l_arr_len )
LET g_export_tabname [ 2 ] = "s_detail2"
FOR l_arr_cnt = 1 TO l_arr_len
LET g_export_tag [ 2 ] [ l_arr_cnt ] = g_xcck2_d [ l_arr_cnt ]
END FOR
#END追加点
CALLの cl_export_to_excel_getpage ()
CALLの cl_export_poi ()
#アドイン点:アクションexporttoexcel名ON = "menu.exporttoexcel_after_poi"を
#END追加点を
END IF
# S_detail2は同じ参照s_detail2を追加するための2つ目のタブは、複数のタブです