Штрих-код на почтовом ящике
Я новичок на сайте. У меня есть Delphi POS, и я хочу добавить штрих-код в шаблон накладной, штрих-код должен быть внизу страницы, и это будет идентификатор документа, штрих-код должен быть EAN 128
ЗАГОЛОВОК] ВЫБРАТЬ * ИЗ SALES_TRANSACTION_HEADER СОЕДИНЯЕТ МАГАЗИНЫ ВКЛЮЧЕНЫ (ST_ID=TH_STORE_ID) ВНЕШНИЙ ВНЕШНИЙ ПОЛЬЗОВАТЕЛЬ ПОЛЬЗОВАТЕЛЕЙ ВКЛЮЧЕН (US_STORE_ID=TH_STORE_ID И US_ID=TH_USER_ID) ГДЕ TH_ID=?DOCUMENT_ID И ВЫБИРАЕТ DOCUM_DING PRINTER_CATEGORY ВКЛ (PRC_STORE_ID=?THIS_STORE_ID И PRC_WORKSTATION_ID =? THIS_WORKSTATION_ID И PRC_PRINTER_ID =? THIS_PRINTER_ID И PRC_CATEGORY_ID=TD_CATEGORY_ID1) РЕГИСТРИРУЙТЕСЬ магазинах (ST_ID=TD_STORE_ID)
LEFT OUTER JOIN SALES_REPS ON (SR_ID=TD_SALESREP_ID И ((ST_GLOBAL_REPS = 0 и SR_STORE_ID=TD_STORE_ID) ИЛИ (ST_GLOBAL_REPS 0 И SR_STORE_ID=(ВЫБЕРИТЕ ST_ID ИЗ ХРАНИЛИЩА, ГДЕ ST_TYPE = 2)))) ГДЕ TD_DOCUMENT_ID=?DOCUMENT_ID И TD_STORE_ID=?STORE_ID И TD_TYPE=? ДОКУМЕНТАЦИЯ ДЛЯ ДОКУМЕНТАЛЬНОГО ОБЪЯВЛЕНИЯ ДЛЯ ДОКУМЕНТАЛЬНОГО ОБЪЯВЛЕНИЯ ДЛЯ ДОКУМЕНТАЛЬНОГО ВНЕШНЕГО ЗНАЧЕНИЯ (ВЫБОР СОСТОЯНИЯ ДЛЯ ДОКУМЕНТАЦИИ) = ВЫБОР СОСТОЯНИЯ ЗАДНЕГО ВРЕМЕНИ ДЛЯ СОБЫТИЯ ДЛЯ ДОКУМЕНТАЛЬНОГО ОБЪЯВЛЕНИЯ (ДОКУМЕНТАЦИЯ ДЛЯ ДОКУМЕНТАЦИИ): ИМЯ (ST_GLOBAL_REPS 0 И SR_STORE_ID=(ВЫБРАТЬ ST_ID ИЗ ХРАНИЛИЩА, ГДЕ ST_TYPE = 2)))) TP_TENDER_ID)
WHERE TP_DOCUMENT_ID=?DOCUMENT_ID И TP_STORE_ID=?STORE_ID AND TP_TYPE=?DOCUMENT_TYPE
[HEADER]
+
+[PRINTLOGO]
+
+ TAX INVOICE
+
+ НАЛИЧНАЯ ПРОДАЖА + ID документа: ~0ddddddd;!TH_ID
@IF!TH_PRINTED_COUNT ТО + COPY ~D!TH_PRINTED_COUNT
@ELSE
+
@ENDIF
+~SSSSSSSSS ~SSSSSSS!TH_TRANSACTION_DATE,!TH_TRANSACTION_TIME
+
+~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!ST_COMPANYNAME
@IF!ST_PHYSICALADDR1 ТО +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!ST_PHYSICALADDR1
@ENDIF
@IF!ST_PHYSICALADDR2 ТОГДА +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!ST_PHYSICALADDR2
@ENDIF
@IF!ST_PHYSICALADDR3 ТО +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!ST_PHYSICALADDR3
@ENDIF
@IF!ST_PHYSICALADDR4 ТО +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!ST_PHYSICALADDR4
@ENDIF
@IF!ST_PHYSICALADDR5 ТО +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!ST_PHYSICALADDR5
@ENDIF
@IF!ST_TELEPHONE1 ТО + + Телефон: ~SSSSSSSSSSSSSSSSSSS!ST_TELEPHONE1
@ENDIF
@IF!ST_FAX THEN
+ Факс: ~SSSSSSSSSSSSSSSSSSS!ST_FAX
@ENDIF
@IF!ST_TAX_NUMBER THEN
+ НДС, рег.!TH_CUSTOMER_NAME
@ENDIF
@IF!TH_ADDRESS_1 ТО + ~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!TH_ADDRESS_1
@ENDIF
@IF!TH_ADDRESS_2 ТО + ~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!TH_ADDRESS_2
@ENDIF
@IF!TH_ADDRESS_3 ТО + ~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!TH_ADDRESS_3
@ENDIF
@IF!TH_ADDRESS_4 ТО + ~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!TH_ADDRESS_4
@ENDIF
@IF!TH_ADDRESS_5 ТОГДА нет! + ~ SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS TH_ADDRESS_5
@ENDIF
@IF TH_TELEPHONE ТОГДА + Телефон:! ~ SSSSSSSSSSSSSSSSSSS TH_TELEPHONE @ENDIF @IF TH_ACCOUNTCODE ТОГДА + Номер счета:! ~ SSSSSSSSSSSSSSSSSSS TH_ACCOUNTCODE @ENDIF @IF TH_EXEMPT_TAX_NUMBER ТОГДА + Налоговый номер: ~SSSSSSSSSSSSSSSSSSSS TH_EXEMPT_TAX_NUMBER
@ENDIF
@IF!TH_ORDER_NUMBER THEN
+ номер заказа:~SSSSSSSSSSSSSSSSSSSS!TH_ORDER_NUMBER
@ENDIF
+
+ Описание Единица + Код товара Цена Кол-во нетто - ---------------------------------------
[ДЕТАЛИ]
@IF (!TD_ITEMTYPE 3) THEN
+~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!TD_DESCRIPTION
@ELSE
+~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!TD_DESCRIPTION
@ENDIF
+~SSSSSSSSSSSSSSS ~fff.ff ~ff.q ~ffff.ff;!TD_PRODUCTCODE,!TD_RETAIL_PRICE,!TD_QTY,!TD_LINE_VALUE
@IF!TD_LINE_TAX_ID = 0 THEN
+*;
@ELSEIF!TD_LINE_TAX_ID = 2 THEN
+#;
@ENDIF
+
@IF!TD_DISCOUNT_AMOUNT 0 THEN
+ Скидка на вышеуказанную строку ~ffff.ff!TD_DISCOUNT_AMOUNT
@ENDIF
@IF (!TD_ITEMTYPE = 2) И (!TD_COLOUR_PACK_SERIAL '') THEN
+Color/Size @ ~ SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS ЕСЛИ (!TD_ITEMTYPE = 3) И (!TD_COLOUR_PACK_SERIAL '') THEN
+Serial #:~SSSSSSSSSSSSSSSSSSSSSSSSSSSS!TD_COLOUR_PACK_SERIAL
@ENDIF
$COUNT=0
@WHILE $COUNT
[РЕЗЮМЕ]
+-------------------------------------- @IF!TH_TRANSACTION_TAX_TYPE THEN
+ SUB-ИТОГО: ~ffffffff.ff!TH_TRANSACTION_TOTAL -!TH_TRANSACTION_TAX -!TH_ADMIN_FEE +!TH_OVERALL_DISCOUNT +!TH_ROUNDING_LOSS
@ELSEIF (!TH_ADMIN_FEE 0) ИЛИ (!TH_OVERALL_DISCOUNT 0) ИЛИ (!TH_ROUNDING_LOSS 0) THEN
+ SUB-TOTAL: ~ffffffff.ff! THEN
+ ~sssssssssssssssssss: ~ffffffff.ff
'DISCOUNT (' +!TH_OVERALL_PERCENT + '%)', -!TH_OVERALL_DISCOUNT
@ENDIF
@IF!TH_ADMIN_FEE THEN
+ ADMIN CHARGE: ~ffffffff.ff!TH_AD @ENDIF
@IF!TH_TRANSACTION_TAX_TYPE THEN
+ НДС: ~ffffffff.ff!TH_TRANSACTION_TAX
@ELSE
+ НДС ВКЛЮЧЕНО: ~ffffffff.ff!TH_TRANSACTION_TAX
@ENDIF
@IF!TH_ROUNDING_LOSS 0 THEND + THUNDING Потеря: ~ fffing Потеря: ЕСЛИ (!TH_TRANSACTION_TAX_TYPE > 0) ИЛИ (! TH_ADMIN_FEE 0) ИЛИ (!TH_OVERALL_DISCOUNT 0) ИЛИ (!TH_ROUNDING_LOSS 0) THEN
+ ------------
@ENDIF
+ TOTAL: ~ffffffff.ff!TH_TRANSACTION_TOTAL
@IF!TH_DEPOSIT_AMOUNT THEN
+ МЕНЬШИЙ ДЕПОЗИТ: ~ffffffff.ff
-!TH_DEPOSIT_AMOUNT
+ ВСЕГО ПОСЛЕ ДЕПОЗИТА: ~ffffffff.ff!TH_TRANSACTION_TOTAL -!TH_DEPOSIT_AMOUNT
@ENDIF
+ --AYCO @ 0 THEN
$CHANGE = 0
$COUNTER = 0
&FIRSTPAYMENT
@WHILE $COUNTER 0 THEN
+~ssssssssssssssssssssssss: ~ffffffff.ff!TT_NAME + ' CHANGE', -!TP_AMOUNT
@IF!TP_NUMBER THEN
+~sssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss: +!TP_NUMBER
@ENDIF
@ENDIF
$COUNTER = $COUNTER + 1
&NEXTPAYMENT
@ENDWHILE
@ENDIF
[FOOTER]
+---------------------------------------
+ Пользователь: ~SSSSSSSSSSSSSSSSSSSSSSS Wks: ~DD!US_NAME,!TH_WORKSTATION_ID
+ Rep: ~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS!DETAIL.SR_NAME
@IF!TH_OUR_REFERENCE " ЕСЛИ $ Сообщение1 ТО +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS
$ Сообщение1
@ENDIF
@IF $ message2 ТОГДА +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS
$ message2
@ENDIF
@IF $MESSAGE3 ТОГДА +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS
$MESSAGE3
@ENDIF
@IF $MESSAGE4 ТОГДА +~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS
$MESSAGE4
@ENDIF
@IF $ СООБЩЕНИЕ 5 THEN
+~SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSSS
$MESSAGE5
@ENDIF