Code: Alles auswählen.
PFUNCTION z_test_cond( )
oder mit Übergabe von Merkmalen
PFUNCTION z_test_cond
(z_merkmal = $root.z_merkmal)
alternativ:
FUNCTION z_test_cond( )
oder mit Übergabe von Merkmalen
FUNCTION z_test_cond
(z_merkmal = $root.z_merkmal)
Code: Alles auswählen.
FUNCTION z_vgw_test_cond_olse.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*" REFERENCE(GLOBALS) TYPE CUOV_00
*" TABLES
*" QUERY STRUCTURE CUOV_01
*" MATCH STRUCTURE CUOV_01
*" EXCEPTIONS
*" FAIL
*" INTERNAL_ERROR
*"----------------------------------------------------------------------
TYPE-POOLS: cullt.
DATA: lv_val TYPE cullt_usr_val.
CALL FUNCTION 'CULR_GET_VAL'
EXPORTING
instance = globals-root
characteristic = 'Z_MERKMAL'
IMPORTING
val = lv_val
EXCEPTIONS
unknown_instance = 1
unknown_characteristic = 2
multivalued_characteristic = 3
not_found = 4
internal_error = 5
OTHERS = 6.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
* Auswahlbedingung soll fehlschlagen, weil Bedingungen nicht erfüllt
* -> Exception auslösen...
RAISE FAIL.
Code: Alles auswählen.
FUNCTION z_test_cond
(z_merkmal = $self.z_merkmal)
oder
FUNCTION z_test_cond
(z_merkmal = $parent.z_merkmal)
oder
FUNCTION z_test_cond
(z_merkmal = $root.z_merkmal)