#include "tc1100a.h"

TOOLBAR "topbar" 0 0 0 2

BUTTON DLG_ELABORA 10 2
BEGIN
  PROMPT -12 -11 "~Elabora"
  PICTURE BMP_ELABORA
  MESSAGE EXIT,K_ENTER
END

#include <helpbar.h>

ENDPAGE

PAGE "Invio dati contabilita' a Zucchetti" 0 2 0 0

GROUPBOX DLG_NULL 76 3
BEGIN
  PROMPT 2 1 "@bDitta corrente"
END

NUMBER F_CODDITTA 5
BEGIN
  PROMPT 3 2 "Codice      "
  FLAGS "FD"
  USE LF_NDITTE
  INPUT CODDITTA F_CODDITTA
  OUTPUT F_RAGSOC RAGSOC
  CHECKTYPE REQUIRED
END

STRING F_RAGSOC 50
BEGIN
  PROMPT 23 2 ""
  FLAGS "D"
END

GROUPBOX DLG_NULL 76 6
BEGIN
        PROMPT 2 4 "Dati da inviare"
END

BOOLEAN F_CAUSALI
BEGIN
  PROMPT 3 5 "Causali"
  FLAGS "D"
END

BOOLEAN F_CONTI
BEGIN
  PROMPT 3 6 "Conti"
END

BOOLEAN F_CLIFOR
BEGIN
  PROMPT 3 7 "Clienti/Fornitori"
END

BOOLEAN F_MOVCONT
BEGIN
  PROMPT 3 8 "Movimenti contabili"
  MESSAGE TRUE,ENABLE F_DATAFIN
END

BOOLEAN F_MOVIVA
BEGIN
  PROMPT 40 5 "Movimenti IVA"
  MESSAGE TRUE,ENABLE F_DATAFIN
END

BOOLEAN F_CORRISP
BEGIN
  PROMPT 40 6 "Corrispettivi"
  MESSAGE TRUE,ENABLE F_DATAFIN
END

BOOLEAN F_SALDACONTO
BEGIN
  PROMPT 40 7 "Saldaconto"
  FLAGS "D"
END

LISTBOX F_TIPOINVIO 20
BEGIN
  PROMPT 2 10 "Invio a      "
  ITEM "Z|Zucchetti"
END

STRING F_DESTINAZIONE 20
BEGIN
  PROMPT 2 11 "Destinazione "
END

NUMBER F_NUMEROINVIO 2
BEGIN
  PROMPT 2 12 "Numero invio "
END

DATE F_DATAINI
BEGIN
  PROMPT 20 12 "Data iniz. "
END

DATE F_DATAFIN
BEGIN
  PROMPT 44 12 "Data fin. "
END

BUTTON F_RIPRISTINA 20
BEGIN
  PROMPT 2 14 "Annulla invio"
  MESSAGE SHOW,F_DATARIPRISTINO|ENABLE,F_DATARIPRISTINO
END

DATE F_DATARIPRISTINO
BEGIN
  PROMPT 25 14 "Annulla invio fino al "
  FLAGS "HD"
END

ENDPAGE

ENDMASK