Call Transaction MM

Q5|}~:k
~4J02.        SET PARAMETER ID 'BES' FIELD itab-ebeln.
:C7Yk/b3Z0          CALL FUNCTION 'ME_DISPLAY_PURCHASE_DOCUMENT'
Ksfxgm0             EXPORTING
@'q;I3d6s6t+WQ)H0                  i_ebeln      = itab-ebeln
GbA s~m[
D'?0                  i_ebelp      = itab-ebelp
+o8~PWe_M%X Jc#ni0                  i_enjoy      = 'X'ITPUB个人空间4ZYa:kcoS(s
*          IMPORTINGITPUB个人空间1[S,H9q,`;K6M5Wu
*               E_EKKO       =ITPUB个人空间W:vC?h#R9jt
             EXCEPTIONS
)M e#P,fG8B;v0                  not_found    = 1
{,FJSf,@%?T0                  no_authority = 2
*M3_7P#_vw0                  invalid_call = 3
+d5t z)^yvMt+eI,i0                  OTHERS       = 4   .

ITPUB个人空间B"qU0gwy
物料凭证：ITPUB个人空间v8i oa2?"MB?
        SET PARAMETER ID 'MBN' FIELD itab-belnr.ITPUB个人空间'Mdl9IWj7G
        SET PARAMETER ID 'MJA' FIELD itab-gjahr.
m{GoS'y
y]d#z-M0        SET PARAMETER ID 'BUK' FIELD itab-bukrs.

        CALL FUNCTION 'MIGO_DIALOG'
OQ }9q qKt8Vr2x"F0             EXPORTINGITPUB个人空间L!j2c"ze1s1Y&V4a
                  i_action            = 'A04'
_7l{lm]W Qn-k0                  i_refdoc            = 'R02'ITPUB个人空间1bi6E"o?r+A-c
Y
                  i_notree            = 'X'ITPUB个人空间:w7b:Ht_\
                  i_skip_first_screen = 'X'
3Z7t6Z?3G0                  i_okcode            = 'OK_GO'
i E ]+p$P?%Z$? E0                  i_mblnr             = itab-belnrITPUB个人空间'pnfe9Z6sW_
                  i_mjahr             = itab-gjahr
Z D4\7b(R$RF6HPn1Z0             EXCEPTIONSITPUB个人空间bb VOqmK d(}L
                  illegal_combination = 1
%e1l%D@@`fb|0                  OTHERS              = 2.

ITPUB个人空间,E)czS&F
销售订单：ITPUB个人空间ENo3NSC
        SET PARAMETER ID 'AUN' FIELD it_itab-vgbel .ITPUB个人空间*_qZQ8I*FD
        CALL TRANSACTION 'VA03' AND SKIP FIRST SCREEN .

.B&P]2GM)Cd-@/a y0交货单：ITPUB个人空间6x!X4L|j&zs)K's
        SET PARAMETER ID 'VL' FIELD it_itab-vbeln .ITPUB个人空间d5U"J/X5]/c\&s
        CALL TRANSACTION 'VL03N' AND SKIP FIRST SCREEN .

ITPUB个人空间 t6\7hEi'Z_
PO的物料：
5Kv Ol
}0        CALL FUNCTION 'MMPUR_MATERIAL_DISPLAY'ITPUB个人空间F$Kr8M$Z!X
l
f-^
             EXPORTING
S
C
Z {q'f!i7xW0                  im_matnr = itab-matnr.

物料：ITPUB个人空间W5ST0Vn#sp R6\ z
       SET PARAMETER ID 'MXX' FIELD 'E'. "Table T132，决定显示哪个视图ITPUB个人空间 ]ITAhb8x/Ze
       SET PARAMETER ID 'MAT' FIELD itab-matnr.ITPUB个人空间d F3f6U2J8A-W
       SET PARAMETER ID 'WRK' FIELD itab-werks.
S-?7zG%U&[ydT;_X R0       SET PARAMETER ID 'LIF' FIELD itab-lifnr.
0K@y_i#Da0L0*       Set parameter id 'KAR' field '001'.ITPUB个人空间EB;A xTSn_;?FC
*       SET PARAMETER ID 'LAG' FIELD im_lgort.
5dT my*C}!h1|/O;]8}0       CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.

MXX的选择看表T132 (同时看表MOFF)
*n)}TP!DO1rIW(Q0A           工作计划ITPUB个人空间T7Pr-F$`"TR
B           会计ITPUB个人空间6D*H5f,vq
C           分类ITPUB个人空间
t7D/U&k(w/X4j
D           物料需求计划ITPUB个人空间(D4Cn"zf.}l2re:R
E           采购
mRT)R2e yK-UY)IG0F           生产资源/工具
v'IK+?5a xdU0G           成本核算
pD,O&_ `k0K           基本数据
._H"}jb0L           存储
eL;eYU0P           预测ITPUB个人空间CV]*c2AZm_
Q           质量管理ITPUB个人空间vg.`Nge_ zvq
S           仓库管理ITPUB个人空间Q {z*|0r+_O
V           销售ITPUB个人空间;B6VS.t1V1Kk&oL
X     X     工厂库存ITPUB个人空间'NrS,T$R,k
Z     X     存储位置库存

xon7m"[ F1@ v y0供应商：
`*j.O?*b^N0        CALL FUNCTION 'MMPUR_VENDOR_DISPLAY'ITPUB个人空间:}W@K5|
             EXPORTING
(B1V:]I&l6HZwJ0                  im_lifnr = itab-lifnrITPUB个人空间{NLt2s!LS-W
                  im_ekorg = 'B000'.

信息记录：
|]^o+C0e0       CALL FUNCTION 'MMPUR_INFO_RECORD_DISPLAY'ITPUB个人空间?_R C1F6K C E
         EXPORTING
v
ZVPy3T3V3~,x+~2Uc}W0              im_infnr = itab-infnr
$^hM:?9Xc8|b0              im_ekorg = 'B000'ITPUB个人空间u:I,a cp4g
              im_werks = itab-werks.
2IkGw1a}0工厂：
}E+T;{E F0       DATA: ls_vt001w TYPE v_t001w.ITPUB个人空间#`
ZW;i&yr)@5t.J7U*o
       ls_vt001w-mandt = sy-mandt.ITPUB个人空间+l%QL-@6?
       ls_vt001w-werks = itab-werks.ITPUB个人空间v b9W?'tcC%x
       CALL FUNCTION 'VIEW_MAINTENANCE_SINGLE_ENTRY'
P3QW6W'_-xz}0         EXPORTINGITPUB个人空间g3f3SV!c
e
           action    = 'SHOW'ITPUB个人空间4~Fn+r/V _^]-Q
           view_name = 'V_T001W'ITPUB个人空间w"vn^Bb&WQBT
         CHANGING
|pZ6Y*y,N3RR0           entry     = ls_vt001w.

e_"vw ]8o
tG0      注：一般维护视图的界面可以用这个方法

 

 

*几个关于"Display"的Function Group：CK50，EDI5，MEEXT等