标签：form nbsp and log lfs har cas 代码 try
函数：PR_WF_PAYMENT_BLOCK_CHECK
CALL FUNCTION ‘FI_F4_ZTERM‘
F061 支付的过程条件
FI_CHANGE_PAYMENT_CONDITIONS New Entry for Terms of Payment: Interpretation, Check
FI_FIND_PAYMENT_CONDITIONS Determine cash discount using ZTERM and document, posting, CPU, base d
FI_TERMS_OF_PAYMENT_CHECKING
DATA: BEGIN OF f4hlp OCCURS 1. INCLUDE STRUCTURE dynpread. DATA: END OF f4hlp. DATA: zah_korrp LIKE t043k-kmres, " Korresp. zum Diffgr. zah_sknto LIKE bseg-sknto, " Skonto bei Zahlung zah_sknt2 LIKE bseg-sknt2, " Skonto bei Zahlung zah_sknt3 LIKE bseg-sknt3, " Skonto bei Zahlung zah_wskto LIKE bseg-wskto, " Skonto bei Zahlung zterm LIKE bseg-zterm. " Hilfsfeld f. Zahl.bed **& FI_F4_ZTERM CALL FUNCTION ‘FI_F4_ZTERM‘ EXPORTING I_KOART = CHAR(1) I_ZTERM = BSEG-ZTERM I_XSHOW = f4hlp-fieldinp IMPORTING E_ZTERM = ZTERM. IF NOT ZTERM IS INITIAL. BSEG-ZTERM = ZTERM. ENDIF. **更多代码 *------- BSEG-ZTERM Eingabe- oder Anzeigefeld? -----------------------* * LOOP AT SCREEN. * CHECK SCREEN-NAME = ‘BSEG-ZTERM‘. * IF SCREEN-INPUT = ‘1‘. * XSHOW = SPACE. * ELSE. * XSHOW = ‘X‘. * ENDIF. * EXIT. * ENDLOOP. *------- Eingabewert für generische Suche besorgen --------------------- PERFORM DYNP_VALUES_READ USING ‘BSEG-ZTERM‘ F4RC. IF F4RC = 0. READ TABLE F4HLP INDEX 1. BSEG-ZTERM = F4HLP-FIELDVALUE. ENDIF. * check if dynpro field is currently in change or display mode. translate f4hlp-fieldinp using ‘ XX ‘. CALL FUNCTION ‘FI_F4_ZTERM‘ EXPORTING I_KOART = CHAR(1) I_ZTERM = BSEG-ZTERM I_XSHOW = f4hlp-fieldinp IMPORTING E_ZTERM = ZTERM. IF NOT ZTERM IS INITIAL. BSEG-ZTERM = ZTERM. ENDIF. *------- BSEG-ZTERM Eingabe- oder Anzeigefeld? -----------------------*
标签：form nbsp and log lfs har cas 代码 try
原文地址：http://www.cnblogs.com/rainysblog/p/6911242.html
