campo-sirio/bs/bs0200a.uml

TOOLBAR "topbar" 0 0 0 2
#include <elabar.h>
ENDPAGE

PAGE "Sincronizzazione Bee Store" 0 2 0 0

GROUPBOX DLG_NULL 78 9
BEGIN
  PROMPT 1 1 "@bArchivi"
END

BOOLEAN 103
BEGIN
  PROMPT 2 2 "Unit<69> di misura    "
  FIELD SyncUMS
END

BOOLEAN 104
BEGIN
  PROMPT 2 3 "Codici IVA         "
  FIELD SyncIVA
END

BOOLEAN 105
BEGIN
  PROMPT 2 4 "Linee Articolo    "
  FIELD SyncLinee
END

BOOLEAN 106
BEGIN
  PROMPT 2 5 "Categorie Merceologiche"
  FIELD SyncCatMer
END

BOOLEAN 147
BEGIN
  PROMPT 2 6 "Articoli          "
  FIELD SyncAnamag
END

STRING 148 3
BEGIN
  PROMPT 40 6 "Listino "
  USE LF_CONDV 
  INPUT TIPO "L"
  INPUT CATVEN ""
  INPUT TIPOCF ""
  INPUT CODCF ""
  INPUT COD 148
  DISPLAY "Codice" COD
  DISPLAY "Descrizione@50" DESCR
  DISPLAY "Valuta@5" CODVAL
  DISPLAY "Inizio@10" VALIN
  DISPLAY "Fine@10" VALFIN
  OUTPUT 148 COD
  FIELD SyncListino
END

BOOLEAN 149
BEGIN
  PROMPT 2 7 "Scontrini         "
  FIELD SyncScontr
END

BOOLEAN 150
BEGIN
  PROMPT 2 8 "Corrispettivi     "
  FIELD SyncCorr
END

BOOLEAN 151
BEGIN
  PROMPT 40 2 "Valute"
  FIELD SyncVAL
END

BOOLEAN 152
BEGIN
  PROMPT 40 3 "Clienti"
  FIELD SyncClienti
END

BOOLEAN 153
BEGIN
  PROMPT 40 4 "Fornitori "
  FIELD SyncFornitori
END

BOOLEAN 154
BEGIN
  PROMPT 40 5 "Codici a barre"
  FIELD SyncBarCode
END


GROUPBOX DLG_NULL 78 8
BEGIN
  PROMPT 1 10 "@bFiltri"
END

DATE 100 
BEGIN
  PROMPT 2 11 "Dalla data di modifica "
  FIELD SyncDateFrom
END

DATE 101
BEGIN
  PROMPT 42 11 " al "
  FIELD SyncDateTo
END

ENDPAGE

PAGE "Parametri" 0 2 0 0

GROUPBOX DLG_NULL 78 4
BEGIN
  PROMPT 1 1 "@bScontrini"
END

STRING 201 4
BEGIN
  PROMPT 2 2 "Causale magazzino "
  USE %CAU SELECT (S2[8,8]=1)&&(S6="P")
  INPUT CODTAB 201
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT 201 CODTAB
  OUTPUT 202 S0
  CHECKTYPE NORMAL
  FIELD CODCAUS
  ADD RUN mg0 -0 %CAU 
END

STRING 202 50 46
BEGIN
  PROMPT 30 2 ""
  FLAGS "D"
END

GROUPBOX DLG_NULL 78 4
BEGIN
  PROMPT 1 5 "@bCorrispettivi"
END

STRING 301 4
BEGIN
  PROMPT 2 6 "Causale contabile "
  USE LF_CAUSALI SELECT TIPODOC="CR"
  INPUT CODCAUS 301
  DISPLAY "Codice" CODCAUS
  DISPLAY "Descrizione@50" DESCR
  OUTPUT 301 CODCAUS
  OUTPUT 302 DESCR
  CHECKTYPE NORMAL
  FIELD CODCAUSC
  ADD RUN cg0 -4
END

STRING 302 50 46
BEGIN
  PROMPT 30 6 ""
  FLAGS "D"
END

ENDPAGE

ENDMASK