#include "tf0400a.h"

TOOLBAR "topbar" 0 0 0 2

BUTTON DLG_RECALC 2 2
BEGIN
  PROMPT 1 1 "Aggiorna"
  PICTURE TOOL_CONVERT 
END

BUTTON DLG_SAVEREC 2 2
BEGIN
  PROMPT 1 1 "Salva"
  PICTURE TOOL_SAVEREC 
END

BUTTON DLG_ALL 2 2
BEGIN
  PROMPT 1 1 "Seleziona"
  PICTURE TOOL_MULTISEL 
END

BUTTON DLG_DELREC 2 2
BEGIN
  PROMPT 1 1 "Elimina"
  PICTURE TOOL_DELREC 
END

BUTTON DLG_EDIT 10 2
BEGIN
  PROMPT 3 1 "E~xcel"
  PICTURE TOOL_EXCEL
END

#include <helpbar.h>
ENDPAGE

PAGE "Controlli Trasferimento fatture" 0 2 0 0

LIST F_TIPOCONTROLLO 35 35
BEGIN
  PROMPT 1 0 "Controllo da effettuare"
  ITEM "0|Movimenti ignorati"
  ITEM "1|Differenze Prima Nota/TF"
  ITEM "2|Mostra tutti i movimenti modificati"
  FLAGS ""
END

LIST F_FLAG 35
BEGIN
  PROMPT 1 1 "Stato movimento        "
  ITEM "0|Tutti"
  ITEM "1|Da inviare"
  ITEM "2|Inviati"
  ITEM "3|Disabilitati"
  FLAGS ""
END

DATE F_DATAINI
BEGIN
  PROMPT 65 0 "Data iniziale:"
  VALIDATE DATE_CMP_FUNC <= F_DATAFIN
  WARNING "La data iniziale non puņ essere maggiore della data finale"
END

DATE F_DATAFIN
BEGIN
  PROMPT 65 1 "Data Finale:  "
  VALIDATE DATE_CMP_FUNC >= F_DATAINI
  WARNING "La data finale non puņ essere minore della data iniziale"
  FLAGS "A"
END

RADIOBUTTON F_TIPOCF 15
BEGIN
  PROMPT 1 2 "Tipo C/F"
  ITEM "C|Cliente"
  ITEM "F|Fornitore"
END

NUMBER F_CODCF 6
BEGIN
  PROMPT 18 3 "Codice:"
  USE LF_CLIFO
  INPUT TIPOCF F_TIPOCF SELECT
  INPUT CODCF F_CODCF
  DISPLAY "Codice" CODCF
  DISPLAY "Ragione Sociale@50" RAGSOC
  DISPLAY "Occasionale@C" OCCAS
  DISPLAY "Codice Fiscale@16" COFI
  DISPLAY "Partita IVA@15" PAIV
  OUTPUT F_CODCF CODCF
  OUTPUT F_RAGSOC RAGSOC
  CHEKTYPE NORMAL
  GROUP 1
  FLAGS ""
END

STRING F_RAGSOC 50 49
BEGIN
  PROMPT 18 5 "R.Soc: "
  USE LF_CLIFO KEY 2
  INPUT TIPOCF F_TIPOCF SELECT
  INPUT RAGSOC F_RAGSOC
  DISPLAY "Ragione Sociale@50" RAGSOC
  DISPLAY "Codice" CODCF
  DISPLAY "Codice Fiscale@16" COFI
  DISPLAY "Partita IVA@15" PAIV
  COPY OUTPUT F_CODCF
  ADD RUN CG0 -1
  GROUP 1
  FLAGS ""
END

SPREADSHEET F_RIGHE
BEGIN
  PROMPT 0 8 "Righe movimenti"
  ITEM "Elimina@1F"
  ITEM "Data\n Reg.@8F"
  ITEM "Tipo\nDocum.@2F"
  ITEM "Tipo\nDoc. AE@5F"
  ITEM "Numero\nDocum.@5F"
  ITEM "Data\nDocum.@10"
  ITEM "Aliquota@4"
  ITEM "Imponibile@10"
  ITEM "Imposta@10"
  ITEM "Natura\nIVA@4"
  ITEM "% Detr.@6"
  ITEM "C/F@2"
  ITEM "Codice@6"
  ITEM "Occas.@16"
  ITEM "Ragione Sociale@35"
  ITEM "RF/SO@16"
  ITEM "Rag. Soc. RF/SO@35"
  ITEM "Partita IVA@11"
  ITEM "Codice Fiscale@15"
  ITEM "Rev.\nCharge@4"
  ITEM "Auto\nfatt.@3"
  ITEM "Spedita@5"
  ITEM "N.\nRegistraz.@10"
  DEFAULT "*"  // Impedisce il salvataggio su profilo .ini
END

ENDPAGE
ENDMASK

PAGE "Riga" -1 -1 69 14
BOOLEAN A_ELIMINA
BEGIN
  PROMPT 52 10 "Elimina"
  FIELD SPEDITA
  FLAGS "D"
END

BOOLEAN A_SPEDITA
BEGIN
  PROMPT 52 10 "Gia' spedita"
  FLAGS "D"
END

NUMBER A_NUMERO 10
BEGIN
  PROMPT 1 0 "N.Movimento"
  FLAGS "D"
END

DATE A_DATAREG
BEGIN
  PROMPT 26 0 "Data reg."
  FLAGS "D"
  CHEKTYPE REQUIRED
END

LIST A_TIPOCF 1 10
BEGIN
  PROMPT 1 1 "Tipo C/F   "
  ITEM "C|Cliente"
  ITEM "F|Fornitore"
  FIELD TIPOCF
  FLAGS "D"
END

NUMBER A_CODCF 6
BEGIN
  PROMPT 26 1 "Cod. C/F"
  USE LF_CLIFO
  INPUT TIPOCF A_TIPOCF SELECT
  INPUT CODCF A_CODCF
  DISPLAY "Codice" CODCF
  DISPLAY "Ragione Sociale@50" RAGSOC
  DISPLAY "Occasionale@C" OCCAS
  DISPLAY "Partita IVA" PAIV
  DISPLAY "Codice fiscale@16" COFI
  OUTPUT A_CODCF	CODCF
  OUTPUT A_RAGSOC	RAGSOC
  OUTPUT A_PAIV		PAIV
  OUTPUT A_COFI		COFI
  ADD RUN cg0 -1
  FIELD CODCF
END

STRING A_OCFPI 16
BEGIN
  PROMPT 44 1 "Occas."
  USE LF_OCCAS
  INPUT CFPI A_OCFPI
  DISPLAY "Codice@16" CFPI
  DISPLAY "Ragione Sociale@50" RAGSOC
  DISPLAY "Partita IVA" PAIV
  DISPLAY "Codice fiscale@16" COFI
  OUTPUT A_OCFPI CFPI
  OUTPUT A_RAGSOC	RAGSOC
  OUTPUT A_PAIV		PAIV
  OUTPUT A_COFI		COFI
  CHEKTYPE NORMAL
  GROUP 3
  ADD RUN cg0 -6
END

STRING A_RAGSOC 50 47
BEGIN
  PROMPT 1 2 "Ragione Sociale"
  FLAGS "D"
END

STRING A_RFSO 6
BEGIN
  PROMPT 1 4 "Codice RF/SO:  "
  HELP "Codice Rappresentante Fiscale o Stabile Organizzazione"
  FLAGS "D"
END

STRING A_RAGSOCRFSO 50 47
BEGIN
  PROMPT 1 5 "Rag. Soc. RF/SO"
  HELP "Ragione Sociale RF/SO"
  FLAGS "D"
END

STRING A_TIPODOC 2
BEGIN
  PROMPT 23 6 "Tipo doc. "
  FIELD TIPODOC
  USE %TPD
  INPUT CODTAB A_TIPODOC
  DISPLAY "Tipo " CODTAB
  DISPLAY "Descrizione @50" S0
  OUTPUT A_TIPODOC CODTAB
  WARNING "Tipo documento errato"
  CHECKTYPE REQUIRED
  FLAGS "HUD"
  ADD NONE
END

LIST A_TIPODOCAE 6
BEGIN
  PROMPT 23 6 "Tipo doc. "
  ITEM "TD01|TD01"
  ITEM "TD04|TD04"
  ITEM "TD05|TD05"
  ITEM "TD07|TD07"
  ITEM "TD08|TD08"
  ITEM "TD10|TD10"
  ITEM "TD11|TD11"
  ITEM "ERR0|Errore"
END


STRING A_NUMDOC 7
BEGIN
  PROMPT 42 6 "Num. doc. "
  FLAGS "D"
  CHEKTYPE REQUIRED
END

DATE A_DATADOC
BEGIN
  PROMPT 1 6 "Data doc."
  FLAGS "D"
  CHEKTYPE REQUIRED
END

LIST A_NATURA 1 35
BEGIN
  PROMPT 20 7 "Natura IVA"
  ITEM "|IVA ordinaria"
  ITEM "N1|N1 - IVA esclusa ex art 15"
  ITEM "N2|N2 - IVA non soggetta"
  ITEM "N3|N3 - IVA non imponibile"
  ITEM "N4|N4 - IVA esente"
  ITEM "N5|N5 - IVA in regime del margine"
  ITEM "N6|N6 - IVA in reverse charge"
  ITEM "N7|N7 - IVA assolta in altro stato U3"
END

STRING A_ALIQUOTA 4
BEGIN
 PROMPT 1 7 "Aliquota "
  HELP "Codice aliquota"
  FIELD CODTAB
  KEY 1
  USE %IVA
  FLAGS "U"
  INPUT CODTAB A_ALIQUOTA
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  DISPLAY "Tipo" S1
  DISPLAY "%@5" R0
  DISPLAY "Vent." S6
  DISPLAY "Sospeso" B2
  OUTPUT A_ALIQUOTA CODTAB
  CHECKTYPE REQUIRED
  VALIDATE ZEROFILL_FUNC 2
END

STRING A_DETRAIB 6
BEGIN
  PROMPT 1 8 "% Detraibilita'"
  HELP "Percentuale di detraibilita'"
  FLAGS "D"
END

NUMBER A_IMPONIBILE 12 2
BEGIN
  PROMPT 42 8 "Imponibile"
  FLAGS "D"
END

NUMBER A_IMPOSTA 12 2
BEGIN
  PROMPT 42 9 "Imposta   "
  FLAGS "D"
END

BOOLEAN A_REVERSE
BEGIN
  PROMPT 1 9 "Reverse charge"
  FLAGS "D"
END

BOOLEAN A_AUTOFATT
BEGIN
 PROMPT 25 9 "Autofattura"
  FLAGS "D"
END

STRING A_PAIV 12
BEGIN
  PROMPT 1 3 "Partita IVA    "
  FLAGS "D"
END

STRING A_COFI 16
BEGIN
  PROMPT 33 3 "Codice Fiscale"
  FLAGS "D"
END

ENDPAGE

TOOLBAR "topbar" 0 0 0 2

BUTTON DLG_OK 2 2
BEGIN
  PROMPT 1 1 ""
END

BUTTON DLG_USER 2 2
BEGIN
  PROMPT 2 1 "Collega"
  PICTURE TOOL_LINK
END

BUTTON DLG_DELREC 2 2
BEGIN
  PROMPT 2 1 "Elimina"
  PICTURE TOOL_DELREC
END

BUTTON DLG_CANCEL 2 2
BEGIN
  PROMPT 4 1 ""
END

ENDPAGE

ENDMASK