当前位置：首页 > news >正文

SAP FICO工单周毛利报表

news 2025/11/13 6:46:18

一、报表逻辑

二、报表界面

三、报表逻辑

*&---------------------------------------------------------------------*
*& 程序名： ZRPFI_024
*& 创建者(公司)/日期：
*& 程序描述：
*& 工单周毛利报表
*&---------------------------------------------------------------------*
*& 版本/修改者(公司)/日期//修改描述
*&
*&---------------------------------------------------------------------*
REPORT zrpfi_024.

TABLES: aufk,afpo,mara.

TYPES: BEGIN OF ty_alv,
         dwerk      TYPE afpo-dwerk,  "工厂
         matnr      TYPE afpo-matnr,  "物料编号
         maktx      TYPE makt-maktx,  "物料描述
         mtart      TYPE mara-mtart,  "物料类型
         dauat      TYPE afpo-dauat,  "工单类型
         aufnr      TYPE afpo-aufnr,  "生产工单
         idat2      TYPE aufk-idat2,  "关单日期
         psmng      TYPE afpo-psmng,  "工单总数量
         wemng      TYPE afpo-wemng,  "收货数量
         amein      TYPE afpo-amein,  "工单计量单位
         waers      TYPE aufk-waers,  "工单币别
         datab      TYPE a900-datab,  "定价起始日期
         kbetr      TYPE konp-kbetr,  "定价价格
         kpein      TYPE konp-kpein,  "定价价格单位
         konwa      TYPE konp-konwa,  "定价币别
         kmein      TYPE konp-kmein,  "定价计量单位
         jldwzhl    TYPE ekpo-menge,  "计量单位转换率
         rate       TYPE rfcu9-kursp,      "关单日期汇率
         hsl_clcb   TYPE acdoca-hsl,  "材料成本
         hsl_zjrg   TYPE acdoca-hsl,  "直接人工
         hsl_zzmj   TYPE acdoca-hsl,  "制造费用-模具
         hsl_zzqt   TYPE acdoca-hsl,  "制造费用-其他
         hsl_zjrgcy TYPE acdoca-hsl,  "直接人工差异(结算)
         hsl_zzmjcy TYPE acdoca-hsl,  "制造费用-模具差异(结算)
         hsl_zzqtcy TYPE acdoca-hsl,  "制造费用-其他差异(结算)
         zzjrg      TYPE acdoca-hsl,  "总直接人工
         zzzfymj    TYPE acdoca-hsl,  "总制造费用-模具
         zzzfyqt    TYPE acdoca-hsl,  "总制造费用-其他
         gdzcb      TYPE acdoca-hsl,  "工单总成本
         gdsr       TYPE acdoca-hsl,  "工单收入
         gdml       TYPE acdoca-hsl,  "工单毛利
         gdmll      TYPE acdoca-hsl,  "工单毛利率
       END OF ty_alv.
DATA: gt_alv TYPE TABLE OF ty_alv,
      gs_alv TYPE ty_alv.

DATA: gt_fcat TYPE lvc_t_fcat,
      gs_fcat TYPE lvc_s_fcat,
      gs_layo TYPE lvc_s_layo.

DEFINE set_field.

  gs_fcat-fieldname   = &1.     "字段名
  gs_fcat-scrtext_s   = &2.    &nbs