| 1234567891011121314151617181920212223242526272829303132333435363738394041424344 |
- /*------------------------------------------------------------------------
- File : tBarcode
- Purpose :
- Syntax :
- Description :
- Author(s) : walter.riechsteiner
- Created : Tue Jul 27 16:25:09 CEST 2021
- Notes :
- ----------------------------------------------------------------------*/
- /* *************************** Definitions ************************** */
- /* ******************** Preprocessor Definitions ******************** */
- /* *************************** Main Block *************************** */
- DEFINE TEMP-TABLE tBarcode
- FIELD Firma AS CHARACTER
- FIELD sc1 AS CHARACTER
- FIELD sc2 AS CHARACTER
- FIELD Strichcode AS CHARACTER
- FIELD lSSCC AS LOG
- FIELD lArtnr AS LOG
- FIELD lVerfall AS LOG
- FIELD lLotnr AS LOG
- FIELD Verfall AS DATE
- FIELD Lotnr AS CHARACTER
- FIELD KGeb_Me AS INTEGER
- FIELD VGeb_Me AS INTEGER
- FIELD GGeb_Me AS INTEGER
- FIELD Menge AS INTEGER
- FIELD rArtst AS RECID EXTENT 10
- FIELD Artnr AS INTEGER
- FIELD Inhalt AS INTEGER
- FIELD Jahr AS INTEGER
- .
- DEFINE VARIABLE htBarcode AS HANDLE NO-UNDO.
- htBarcode = TEMP-TABLE tBarcode:DEFAULT-BUFFER-HANDLE.
|
