Code: Alles auswählen.
*&---------------------------------------------------------------------*
*& Form SCAN_HU_SSCC
*&---------------------------------------------------------------------*
* interprets a string as EAN128-barcode and tries to find the sscc
* This is the HUM variant
*----------------------------------------------------------------------*
* --> IF_BARCODE scanned string
* <-- EF_HU found HU number or copy of IF_BARCODE
* <-- EF_RC return code
*----------------------------------------------------------------------*
form scan_hu_sscc using if_barcode type barcode
changing ef_exidv type exidv
ef_rc type i.
data:
lt_barcode type barcode_t2
,ls_ean128_data type ean128
.
field-symbols:
<ls_bc_plus_error> type barcode_plus_errors
,<ls_bc_error> type barcode_error
.
clear ef_rc.
append if_barcode to lt_barcode.
call function 'LE_EAN128_DECODE'
exporting
it_barcode = lt_barcode "Tabelle der Strichcodes
* IF_MEASURE_UNIT =
* IF_AREA_UNIT =
* IF_VOLUME_UNIT =
* IF_WEIGHT_UNIT =
importing
es_ean128_data = ls_ean128_data
* EF_VARIABLE_SC =
exceptions
no_barcode_definition = 01
error_in_subfunctions = 02
barcode_not_ean128 = 03
no_ai_relation = 04
no_ai_information = 05
general_customizing_error = 06
others = 99
.
........
........