T100マルチタブは、エクスポートエクセル

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つ目のタブは、複数のタブです

 

おすすめ

転載: www.cnblogs.com/MyshoWJ/p/11199164.html