T100-----汇出EXCEL表格
例子：cxmp541
1 #excel匯出功能
2 ON ACTION exporttoexcel
3 LET g_action_choice="exporttoexcel"
4 IF cl_auth_chk_act("exporttoexcel") THEN
5 #browser
6 CALL g_export_node.clear()
7 # IF g_main_hidden = 1 THEN
8 LET g_export_node[1] = base.typeInfo.create(g_detail_d)
9 LET g_export_id[1] = "s_detail1"
10 CALL cl_export_to_excel()
11 # #非browser
12 # ELSE
13 # LET g_export_node[1] = base.typeInfo.create(g_pmdt_d)
14 # LET g_export_id[1] = "s_detail1"
15 # LET g_export_node[2] = base.typeInfo.create(g_pmdt2_d)
16 # LET g_export_id[2] = "s_detail2"
17 # LET g_export_node[3] = base.typeInfo.create(g_pmdt3_d)
18 # LET g_export_id[3] = "s_detail3"
19 #
20 # #add-point:ON ACTION exporttoexcel name="menu.exporttoexcel"
21 # LET g_export_node[4] = base.typeInfo.create(g_pmdt4_d)
22 # LET g_export_id[4] = "s_detail4"
23 #
24 # LET g_export_node[5] = base.typeInfo.create(g_inao_d)
25 # LET g_export_id[5] = "s_detail1_s_lot_s01"
26 # #END add-point
27 # CALL cl_export_to_excel_getpage()
28 # CALL cl_export_to_excel()
29 # END IF
30 END IF
