一见钟情
百度空间 | 百度首页 
 
留言板
 

新春快乐...
 

你是在临江镇的清中上学的吗,你是哪一届的。我是79届的,你为何到唐山定居了。
 
 

请问一下,用smartforms做的form标题抬头只要第一页上有,换页时不要有,只要明细就可以...
 
     
 
日历
 
     
 
最新照片
 
   
 
文章分类
 
 
 
 
 
 
 
 
 
     
 
文章存档
 
 
 
 
 
 
     
 
常用
 
 
     
 
背景音乐
 
 
最近访客
 
 

whjdjs

の叫什么

ok2291417261

美羊羊的QQ

L_Yan灬

何球无圆

tanfhn

lyllyl1213
     
 
最新评论
 
文章评论|照片评论


好伟大的母爱,为天下的母亲致敬。
 
 

都没怎么联系了。突然来看看,大家都长大了。。
 

碧螺春想通过百度空间与您成为朋友好么?
 
 
     
 
订阅我的空间
 
已有人次访问本空间
 
订阅RSS  什么是RSS?

您也想拥有这样的空间?请点此申请。
     
 
 
文章列表
 
2007-05-01 19:42
*&---------------------------------------------------------------------*
*&        Form    REPLACE
*&---------------------------------------------------------------------*
*         物料替换主程序
*----------------------------------------------------------------------*
*    -->    p1          text
 
2007-05-01 19:42

REPORT    ZMMR038.
TABLES:RESB,ZMRHEAD,ZAPHEAD,ZAPDETAIL.
**屏幕控件
CONTROLS:ZMMR TYPE TABLEVIEW USING SCREEN 2000.

DATA:OK_CODE LIKE SY-UCOMM,
       SAVE_OK LIKE SY-UCOMM.
**BDC定义
DATA: BEGIN OF INT_BDC OCCURS 0.
          INCLUDE STRUCTURE BDCDATA.
DATA: END OF INT_BDC.
**BAPI定义
DATA: BEGIN OF L_TAB1 OCCURS 1.
     

 
2007-04-30 22:09

*&---------------------------------------------------------------------*
*&        Form    GET_DATA
*&---------------------------------------------------------------------*
*         text
*----------------------------------------------------------------------*
*    -->    p1          text

 
2007-04-30 22:08

&---------------------------------------------------------------------*
*&        Form    CREATE_AND_INIT_TREE
*&---------------------------------------------------------------------*
*         text
*----------------------------------------------------------------------*
*    -->    p1        

 
2007-04-30 22:06

*----------------------------------------------------------------------*
*         CLASS lcl_application DEFINITION
*----------------------------------------------------------------------*
*
*----------------------------------------------------------------------*
CLASS LCL_APPLICATION DEFINITION.

    PUBLIC SECTION.
      METHODS:
       

 
2007-04-30 22:05

REPORT    ZMMR009.
TABLES:MAST,MAKT,STPO,RESB,MARC,TC04,ZDATA.
TYPE-POOLS: SLIS.

**    定义对象的双击方法,用于将该对象双击方法分配到树双击事件
CLASS LCL_APPLICATION DEFINITION DEFERRED.
CLASS CL_GUI_CFW DEFINITION LOAD.

TYPES: ITEM_TABLE_TYPE LIKE STANDARD TABLE OF MTREEITM WITH DEFAULT KEY."节点表

DATA: G_APPLICATION TYPE REF TO LCL_APPLICATION,
*    客户对象
      

 
2007-04-30 19:47

REPORT    ZPLM25.
TABLES: ZDRAD,ZRESB,ZEBOM,ZEBOMHEAD.
**定义屏幕数据
CONTROLS MYTABSTRIP TYPE TABSTRIP.

DATA: OK_CODE TYPE SY-UCOMM,
        SAVE_OK TYPE SY-UCOMM.
DATA:TAB_1 LIKE ZDRAD OCCURS 0 WITH HEADER LINE,
       TAB_2 LIKE ZRESB OCCURS 0 WITH HEADER LINE,
       TAB_3 LIKE ZEBOM OCCURS 0 WITH HEADER LINE.
***屏幕alv
DATA: ZMMR1

 
2007-04-28 15:24

EBOM导入主程序:

*&---------------------------------------------------------------------*
*&    包括                  ZIMPORT_EBOM
*&---------------------------------------------------------------------*

    LI = 0.
*
    LOOP AT TAB_3.
      LN_BMENG = TAB_3-BMENG.
   

 
2007-04-28 15:24
*11成本录入
           IF TAB_1-HKMAT <> ''.
             L_HEAD-COST_VIEW = 'X'.           "成本视图
             L_PLANTDATA-VARIANCE_KEY = TAB_1-AWSLS.       "差异码A
        
 
2007-04-28 15:23

*3基本数据录入
          L_CLINETDATA-BASE_UOM = TAB_1-MEINS.        "基本计量单位*_A
          L_CLINETDATA-MATL_GROUP = TAB_1-MATKL.      "物料组*
          L_CLINETDATA-OLD_MAT_NO = TAB_1-BISMT.      "旧物料号
       

 
     


©2009 Baidu