Debug 发现,只有Free of Charge订单类型是才会显示成本中心字段。
Include: FV45PF0C_COBL_SEND_PBO_VBAK的form. COBL_SENG_PBO_VBAK下列代码
* Geschäftsbereich
int_coblf-fdnam = 'GSBER'.
int_coblf-output = char1.
int_coblf-active = char1.
append int_coblf.
clear int_coblf.
* Kostenstelle
if not vbak-kostl is initial or
vbak-vbtyp ca vbtyp_kl.
int_coblf-fdnam = 'KOSTL'.
if t180-trtyp ne chara.如果
int_coblf-input = char1.
说明:char1值为1。
说明:vbak-vbtyp为order type,vbtyp_kl(值为I,代表order type为free of charge类型)
如果在还未输入cost center的情况下,kostl即cost center已有值,或者order type为free of charge类型的 ,则将int_coblf-fdnam栏位的值置为’KOSTL’,后面相应的程序会根据int_coblf这个内表中是否有’KOSTL’来对内表SCREEN进行modify,从而控制屏幕中’KO
* Geschäftsbereich
int_coblf-fdnam = 'GSBER'.
int_coblf-output = char1.
int_coblf-active = char1.
append int_coblf.
clear int_coblf.
* Kostenstelle
if not vbak-kostl is initial or
vbak-vbtyp ca vbtyp_kl.
int_coblf-fdnam = 'KOSTL'.
if t180-trtyp ne chara.如果
int_coblf-input = char1.
说明:char1值为1。
说明:vbak-vbtyp为order type,vbtyp_kl(值为I,代表order type为free of charge类型)
如果在还未输入cost center的情况下,kostl即cost center已有值,或者order type为free of charge类型的 ,则将int_coblf-fdnam栏位的值置为’KOSTL’,后面相应的程序会根据int_coblf这个内表中是否有’KOSTL’来对内表SCREEN进行modify,从而控制屏幕中’KO