转！转！转！ 白师傅的 嗯 受教

转自：http://scnblogs.techweb.com.cn/laobai/archives/130.html

 

 

采购订单：1. CALL FUNCTION ‘ME_DISPLAY_PURCHASE_DOCUMENT’ EXPORTING i_ebeln = itab-ebeln EXCEPTIONS not_found = 1 no_authority = 2 invalid_call = 3 preview_not_possible = 4 OTHERS = 5.2. SET PARAMETER ID ‘BES’ FIELD itab-ebeln. CALL FUNCTION ‘ME_DISPLAY_PURCHASE_DOCUMENT’ EXPORTING i_ebeln = itab-ebeln i_ebelp = itab-ebelp i_enjoy = ‘X’* IMPORTING* E_EKKO = EXCEPTIONS not_found = 1 no_authority = 2 invalid_call = 3 OTHERS = 4 .物料凭证： SET PARAMETER ID ‘MBN’ FIELD itab-belnr. SET PARAMETER ID ‘MJA’ FIELD itab-gjahr. SET PARAMETER ID ‘BUK’ FIELD itab-bukrs. CALL FUNCTION ‘MIGO_DIALOG’ EXPORTING i_action = ‘A04′ i_refdoc = ‘R02′ i_notree = ‘X’ i_skip_first_screen = ‘X’ i_okcode = ‘OK_GO’ i_mblnr = itab-belnr i_mjahr = itab-gjahr EXCEPTIONS illegal_combination = 1 OTHERS = 2.销售订单： SET PARAMETER ID ‘AUN’ FIELD it_itab-vgbel . CALL TRANSACTION ‘VA03′ AND SKIP FIRST SCREEN .交货单： SET PARAMETER ID ‘VL’ FIELD it_itab-vbeln . CALL TRANSACTION ‘VL03N’ AND SKIP FIRST SCREEN .PO的物料： CALL FUNCTION ‘MMPUR_MATERIAL_DISPLAY’ EXPORTING im_matnr = itab-matnr.物料： SET PARAMETER ID ‘MXX’ FIELD ‘E’. “Table T132，决定显示哪个视图 SET PARAMETER ID ‘MAT’ FIELD itab-matnr. SET PARAMETER ID ‘WRK’ FIELD itab-werks. SET PARAMETER ID ‘LIF’ FIELD itab-lifnr.* Set parameter id ‘KAR’ field ‘001′.* SET PARAMETER ID ‘LAG’ FIELD im_lgort. CALL TRANSACTION ‘MM03′ AND SKIP FIRST SCREEN.MXX的选择看表T132 (同时看表MOFF)A 工作计划B 会计C 分类D 物料需求计划E 采购F 生产资源/工具G 成本核算K 基本数据L 存储P 预测Q 质量管理S 仓库管理V 销售X X 工厂库存Z X 存储位置库存供应商： CALL FUNCTION ‘MMPUR_VENDOR_DISPLAY’ EXPORTING im_lifnr = itab-lifnr im_ekorg = ‘B000′.信息记录： CALL FUNCTION ‘MMPUR_INFO_RECORD_DISPLAY’ EXPORTING im_infnr = itab-infnr im_ekorg = ‘B000′ im_werks = itab-werks.工厂： DATA: ls_vt001w TYPE v_t001w. ls_vt001w-mandt = sy-mandt. ls_vt001w-werks = itab-werks. CALL FUNCTION ‘VIEW_MAINTENANCE_SINGLE_ENTRY’ EXPORTING action = ‘SHOW’ view_name = ‘V_T001W’ CHANGING entry = ls_vt001w. 注：一般维护视图的界面可以用这个方法 *几个关于”Display”的Function Group：CK50，EDI5，MEEXT等 会计凭证: SET PARAMETER ID ‘BLN’ FIELD ‘90000046′ .SET PARAMETER ID ‘BUK’ FIELD ‘1000′.SET PARAMETER ID ‘GJR’ FIELD ‘2008′.CALL TRANSACTION ‘FB03′ AND SKIP FIRST SCREEN