Ansicht
Dokumentation
CBIH_LB13_FATYPE_FAID_CHECK - EHS: User-Exit zur Prüfung der IDs von AmbulanzBEinträgen
CPI1466 during Backup rdisp/max_wprun_time - Maximum work process run timeDiese Dokumentation steht unter dem Copyright der SAP AG.
Funktionalität
Dieser Funktionsbaustein dient als Vorlage für Prüf- und Aufbereitungsfunktionen, die Sie für Ambulanzbuchschlüssel in Abhängigkeit von der Art des Ambulanzbucheintrags definieren können.
Außerdem steht Ihnen der Funktionsbaustein als Referenzfunktionsbaustein für die Definition der Schnittstelle des User-Exit-Typs FAL_SCATCH zur Verfügung.
Beispiel
Das nachfolgende Implementierungsbeispiel arbeitet mit folgenden Nummernkreisintervallen:
00001000000000000000 bis 00009999999999999999 (intern)
A bis ZZZZZZZZZZZZZZZZZZZZ (extern)
*"*"Lokale Schnittstelle:
*" IMPORTING
*" VALUE(I_FAID_TO_CHK) LIKE CCIHT_FAL-FAID
*" VALUE(I_FATYPE) LIKE CCIHT_FAL-FATYPE
*" VALUE(I_PLANT) LIKE CCIHT_FAL-FAPLANT OPTIONAL
*" VALUE(I_FLG_WANT_KEY_FORMAT) TYPE ESP1_BOOLEAN
*" DEFAULT ESP1_FALSE
*" EXPORTING
*" VALUE(E_FAID_CHKD_AND_FORMD) LIKE CCIHT_FAL-FAID
*" VALUE(E_FLG_SYNTAX_OK) TYPE ESP1_BOOLEAN
*" VALUE(E_ERROR_MESSAGE)
*"----------------------------------------------------------------------
* ----------------------------------------------------------------------
* Local data
* ----------------------------------------------------------------------
* for example the length of the table field for FAL-ID is 20
* to insert 4 format characters input must have a max. length of 16
CONSTANTS: LC_MAX_EDIT_LENGTH TYPE I VALUE 16.
* var to store length of given FAL-ID
DATA: L_STR_LENGTH TYPE I VALUE 0.
* temporary FAL-ID
DATA: L_FAID_TEMP LIKE I_FAID_TO_CHK VALUE IS INITIAL.
* ----------------------------------------------------------------------
* Function body
* ----------------------------------------------------------------------
* init
E_FLG_SYNTAX_OK = TRUE.
E_FAID_CHKD_AND_FORMD = I_FAID_TO_CHK.
IF ( I_FLG_WANT_KEY_FORMAT = TRUE ).
SHIFT I_FAID_TO_CHK LEFT DELETING LEADING '0'.
L_STR_LENGTH = STRLEN( I_FAID_TO_CHK ).
IF ( L_STR_LENGTH LE LC_MAX_EDIT_LENGTH ).
CONCATENATE I_FATYPE I_FAID_TO_CHK INTO L_FAID_TEMP.
WRITE L_FAID_TEMP
USING EDIT MASK '___-________________'
TO E_FAID_CHKD_AND_FORMD.
ELSE.
* signal that check hasn't been successful
E_FLG_SYNTAX_OK = FALSE.
E_ERROR_MESSAGE
= 'Max. Zeichenanzahl von 18 überschritten'. "#EC *
ENDIF.
ENDIF. " i_flg_want_key_format = true
ENDFUNCTION.
Hinweise
Im Customizing der Arbeitsmedizin können Sie in der Aktivität Arten von Ambulanzbucheinträgen festlegen zu jeder Art von Ambulanzbucheintrag einen User-Exit-Namen vergeben. Diesen User-Exit-Namen müssen Sie zuvor im Customizing der Grunddaten und Werkzeuge unter User-Exits verwalten angelegt und einem Funktionsbaustein zugeordnet haben.
Daneben können Sie unter Arten von Ambulanzbucheinträgen festlegen zu jeder Art von Ambulanzbucheintrag ein internes bzw. externes Nummernkreisintervall des Nummernkreisobjekts CBIHN_FAID vergeben.
Beachten Sie bei Verwendung einer Aufbereitungsroutine, daß diese mit der Definition der Nummernkreisintervalle verträglich sein muß.
Wenn Sie eine eigene Prüffunktion schreiben, muß diese in der Schnittstelle mit dem Referenzfunktionsbaustein übereinstimmen.
Parameter
E_ERROR_MESSAGEE_FAID_CHKD_AND_FORMD
E_FLG_SYNTAX_OK
I_FAID_TO_CHK
I_FATYPE
I_FLG_WANT_KEY_FORMAT
I_PLANT
Ausnahmen
Funktionsgruppe
CBIH_LB13ROGBILLS - Synchronize billing plans Vendor Master (General Section)
Diese Dokumentation steht unter dem Copyright der SAP AG.
Length: 4393 Date: 20240606 Time: 093734 sap01-206 ( 46 ms )
