*&---------------------------------------------------------------------*
*& Report ZSDR010
*&
*&---------------------------------------------------------------------*
*&程序名称：承运路单
*&事物代码：ZSD030
*&导入模板：无
*&作者：
*&时间：2016/3/2
*&更新时间：2016/3/2
*&--------------------------------------------------------------------
REPORT zsdr010.
INCLUDE zsdr010_inc.
TYPE-POOLS: slis.
TABLES:likp, kna1, lips ,vttp ,vttk.
TYPES: BEGIN OF ty_all,
tknum LIKE vttk-tknum, "运单号
tplst LIKE vttk-tplst, "装运点
tdlnr LIKE vttk-tdlnr, "物流公司
erdat LIKE vttk-erdat, "装运日期
route LIKE vttk-route, "路线
distz LIKE vttk-distz, "里程
add01 LIKE vttk-add01, "车主、车号
add02 LIKE vttk-add02, "司机
bfart LIKE vttk-bfart, "车型
ernam LIKE vttk-ernam, "创建者
shtyp LIKE vttk-shtyp, "装运类型
btgew_sum LIKE likp-btgew, "总重量
tpnum LIKE vttp-tpnum, "项目号
vbeln LIKE vttp-vbeln, "交货单号
kunnr LIKE likp-kunnr, "客户代码
name1 LIKE kna1-name1, "客户名称
btgew LIKE likp-btgew, "重量
gewei LIKE likp-gewei, "重量单位
volum LIKE likp-volum, "体积
voleh LIKE likp-voleh, "体积单位
beizhu(20) TYPE c , "备注
END OF ty_all.
TYPES:BEGIN OF ty_header,
tknum LIKE vttk-tknum, "运单号
tplst LIKE vttk-tplst, "装运点
tplst_text LIKE ttdst-bezei,"装运点描述
tdlnr LIKE vttk-tdlnr, "物流公司
tdlnr_text LIKE lfa1-name1, "物流公司描述
erdat LIKE vttk-erdat, "装运日期
route LIKE vttk-route, "路线
route_text LIKE tvrot-bezei,"路线描述
distz LIKE vttk-distz, "里程
add01 LIKE vttk-add01, "车主、车号
add02 LIKE vttk-add02, "司机
bfart LIKE vttk-bfart, "车型
ernam LIKE vttk-ernam, "创建者
shtyp LIKE vttk-shtyp, "装运类型
btgew_sum LIKE likp-btgew, "总重量
beizhu(20) TYPE c , "备注
END OF ty_header.
TYPES:BEGIN OF ty_items,
tknum LIKE vttk-tknum, "运单号
tpnum LIKE vttp-tpnum, "项目号
vbeln LIKE vttp-vbeln, "交货单号
kunnr LIKE likp-kunnr, "客户代码
name1 LIKE kna1-name1, "客户名称
btgew LIKE likp-btgew, "重量
gewei LIKE likp-gewei, "重量单位
volum LIKE likp-volum, "体积
voleh LIKE likp-voleh, "体积单位
beizhu(20) TYPE c , "备注
END OF ty_items