#include "batbind.h"

TOOLBAR "" 0 18 0 3

#include <toolbar.h>

ENDPAGE

PAGE "Tabella ditte per invio" -1 -1 78 18

NUMBER F_DITTAINV 5
BEGIN
  PROMPT 2 1 "Codice ditta inviante "
  FIELD %IND->CODTAB
  FLAGS "Z"
  KEY 1     
  USE %IND
  INPUT CODTAB[1,5] F_DITTAINV
  DISPLAY "Codice ditta inviante" CODTAB
  DISPLAY "Ultimo numero invio" I0
  DISPLAY "Ultima data invio" D0
  DISPLAY "Stato ultimo tras." S6 
  OUTPUT F_DITTAINV CODTAB
  OUTPUT F_NUMULINV I0
  OUTPUT F_DATAULIN D0
  OUTPUT F_STATO S6
  CHECKTYPE REQUIRED
END

STRING F_RAGSOC 50
BEGIN
  PROMPT 2 2 "Ragione sociale       "
  FLAGS "D"
END

GROUPBOX DLG_NULL 76 8
BEGIN
  PROMPT 1 4 "Archivi da inviare"
END

BOOLEAN F_CAUSALI
BEGIN
  PROMPT 2 5 "Tabella causali"
  FIELD %IND->B0
END

BOOLEAN F_CLIFO
BEGIN
  PROMPT 2 6 "Anagrafico Clienti/Fornitori"
  FIELD %IND->B1
END

BOOLEAN F_PCON
BEGIN
  PROMPT 2 7 "Anagrafico Piano dei Conti"
  FIELD %IND->B2
END

BOOLEAN F_MOV
BEGIN
  PROMPT 2 8 "Movimenti Prima Nota"
  FIELD %IND->B3
END

BOOLEAN F_IVA
BEGIN
  PROMPT 2 9 "Movimenti Iva"
  FIELD %IND->B4
END

BOOLEAN F_FATT
BEGIN
  PROMPT 2 10 "Scadenze Fattura / Pagamento Rate"
  FIELD %IND->B5
//  FLAGS "D"
END

NUMBER F_NUMULINV 3
BEGIN
  PROMPT 2 13 "Numero ultimo invio  "
  FIELD %IND->I0
  FLAGS "RG"
END

DATE F_DATAULIN 
BEGIN
  PROMPT 44 13 "Data ultimo invio   "
  FIELD %IND->D0
  FLAGS "G"
END
            
STRING F_STATO 1
BEGIN
  PROMPT 2 14 "Stato ultimo invio   "
  FIELD %IND->S6
  FLAGS "G"
END             

STRING F_USELAB 1
BEGIN
  PROMPT 26 14 ""
  FLAGS "G"
END

STRING F_CHIAVE 15
BEGIN
  PROMPT 29 14 ""
  FLAGS "G"
END

STRING F_GHOST_FIELD 1
BEGIN
  PROMPT -1 -30 ""
END
                  
ENDPAGE

ENDMASK