SAP查询指定工作中心的产能负荷-报表

最新推荐文章于 2024-08-05 15:19:22 发布

小啊曼

最新推荐文章于 2024-08-05 15:19:22 发布

阅读量408

点赞数 7

分类专栏： SAP-ABAP 文章标签：运维

本文链接：https://blog.csdn.net/qq_32198063/article/details/135987502

版权

SAP-ABAP 专栏收录该内容

28 篇文章 2 订阅

订阅专栏

2.	程序实现
本程序的主体部分是在拷贝tcode CM03
（1）	.参数准备
  PERFORM FRM_FILL_INDI
  CHANGING GS_CYINDI.

  PERFORM FRM_APPEND_RC65A
  CHANGING GS_RC65A.

  PERFORM FRM_APPEND_AVER
  CHANGING GT_CYAVER.

  PERFORM FRM_GET_KEYS
  CHANGING GT_KEYS.

  以上这些参数的设置不必深究，只要知道为的是调用后面的FM就可以了



（2）	取得能力 工作中心级别PERFORM FRM_GET_DATA1.
 
  LOOP AT GT_KEYS INTO LS_KEYS.
    CALL FUNCTION 'ZCY_FILL_VER_KBED'
    CALL FUNCTION 'ZCY_FILL_KAPAN_IN_KUBEL'
    CALL FUNCTION 'ZCY_FILL_VER_KBED_IN_KUBEL'
    CALL FUNCTION 'ZCY_GET_PERIOD_KTEXT'
    LOOP AT LT_CYKUBEL INTO LS_CYKUBEL.

      MOVE-CORRESPONDING LS_CYKUBEL TO LS_DATA1.
…………………………
APPEND LS_DATA1 TO GT_DATA1.
ENDLOOP.
ENDLOOP.

（3）	取得需求(负荷） 计划订单-工序级别 FRM_GET_DATA2.
   LOOP AT GT_KEYS INTO LS_KEYS.
…………………….
    APPEND LS_CYHIECAP TO LT_CYHIECAP.
  ENDLOOP.

 CALL FUNCTION 'ZCY_FILL_DET_LIST'
LOOP AT LT_CYDETALL INTO LS_CYDETALL.
    MOVE-CORRESPONDING LS_CYDETALL TO LS_DATA2.
    LS_DATA2-KTEXT = LS_CYDETALL-PERIOD.
    LS_DATA2-MAKTX = LS_CYDETALL-KTEXT.
    APPEND LS_DATA2 TO GT_DATA2.

  ENDLOOP.

（4）	把同一订单的需求(负荷）  能力匹配在一起 PERFORM FRM_EDT_OUT.
 
  LOOP AT GT_DATA2 INTO LS_DATA2.
    MOVE-CORRESPONDING LS_DATA2 TO LS_OUT.
……………
READ TABLE GT_DATA1 INTO LS_DATA1
…………………..
    APPEND LS_OUT TO LT_OUT.
  ENDLOOP. 
…………………….

  LOOP AT LT_OUT INTO LS_OUT.
……………………….
    APPEND LS_OUT TO GT_OUT.
  ENDLOOP.
 LT_OUT_TMP = GT_OUT.
 LOOP AT LT_OUT_TMP INTO LS_OUT_TMP.
…………………….
    AT END OF VORNR.
……………………
      APPEND LS_ALV_FH TO GT_ALV.
      APPEND LS_ALV_CN TO GT_ALV.
      APPEND LS_ALV_LV TO GT_ALV.
  ……………………….
    ENDAT.
  ENDLOOP.


（5）	  PERFORM FRM_OUTPUT_OUT REUSE_ALV_GRID_DISPLAY_LVC GT_ALV