- A+
所属分类：应用系统
事务代码：SMOD
增强：V60A0001
组件：EXIT_SAPLV60A_002
增强写代码的位置：INCLUDE ZXV60AU01.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 |
*---------------------------------------------------------------------* * 包含 ZXV60AU01 * 原则：如果已清账，则不允许直接冲销Billing * 思考：一次只能输入一张单据进行开票、其他开票条件的判断等都可以在此增强 *---------------------------------------------------------------------* DATA: LS_KOMFK TYPE KOMFK, LV_AUGBL TYPE BSEG-AUGBL. CLEAR: LS_KOMFK,LV_AUGBL. LOOP AT XKOMFK INTO LS_KOMFK. CASE SY-TCODE. WHEN 'VF11'. SELECT SINGLE AUGBL INTO LV_AUGBL FROM BSEG WHERE VBELN = LS_KOMFK-VBELN AND BSCHL = '01'. IF LV_AUGBL IS NOT INITIAL . MESSAGE E000 WITH '该Billing已冲销或已清账，不允许直接冲销！'. ELSE. CONTINUE. ENDIF. WHEN OTHERS. ENDCASE. CLEAR: LS_KOMFK,LV_AUGBL. ENDLOOP |
