#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"
	ITEM "3|Movimenti non inviati"
  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

SPREADSHEET F_NOTSEND
BEGIN
  PROMPT 0 8 "Righe movimenti non inviati"
  ITEM "Numero\n Reg.@7"
  ITEM "Data\nReg.@8"
  ITEM "Anno\nEs.@4"
	ITEM "Numero\nDocumento@8"
  ITEM "Numero\nDocum. Esteso@20"
  ITEM "Tipo\nDocum.@5"
  ITEM "Descrizione@40"
  ITEM "Cod. C/F@6"
  ITEM "Totale\nDocum.@18"
	ITEM "Reverse\ncharge@5"
  ITEM "INVIO@5"
	FLAG "H"
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 "TD02|TD02"
  ITEM "TD03|TD03"
  ITEM "TD04|TD04"
  ITEM "TD05|TD05"
  ITEM "TD06|TD06"
  ITEM "TD16|TD16"
  ITEM "TD17|TD17"
  ITEM "TD18|TD18"
  ITEM "TD19|TD19"
  ITEM "TD20|TD20"
  ITEM "TD21|TD21"
  ITEM "TD22|TD22"
  ITEM "TD23|TD23"
  ITEM "TD24|TD24"
  ITEM "TD25|TD25"
  ITEM "TD26|TD26"
  ITEM "TD27|TD27"
  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 4 81
BEGIN
  PROMPT 20 7 "Natura IVA"
  ITEM "|IVA ordinaria"
  ITEM "N1|N1 IVA esclusa ex art 15"
  ITEM "N2|N2 IVA non soggetta (DEPRECATA)"
  ITEM "N2.1|N2.1 Non soggette ad IVA ai sensi degli artt. da 7 a 7-septies del DPR 633/72"
  ITEM "N2.2|N2.2 Non soggette - altri casi"
  ITEM "N3|N3 IVA non imponibile (DEPRECATA)"
  ITEM "N3.1|N3.1 Non impon. - esportazioni"
  ITEM "N3.2|N3.2 Non impon. - cessioni intracomunitarie"
  ITEM "N3.3|N3.3 Non impon. - cessioni verso San Marino"
  ITEM "N3.4|N3.4 Non impon. - operazioni assimilate alle cessioni all'esportazione"
  ITEM "N3.5|N3.5 Non impon. - a seguito di dichiarazioni d'intento"
  ITEM "N3.6|N3.6 Non impon. - altre operazioni che non concorrono alla formazioni del plafond"
  ITEM "N4|N4 IVA esente"
  ITEM "N5|N5 IVA in regime del margine"
  ITEM "N6|N6 IVA in reverse charge (DEPRECATA)"
  ITEM "N6.1|N6.1 Invers. cont. - cessione di rottami e altri materiali di recupero"
  ITEM "N6.2|N6.2 Invers. cont. - cessione di oro e argento puro"
  ITEM "N6.3|N6.3 Invers. cont. - subappalto nel settore edile"
  ITEM "N6.4|N6.4 Invers. cont. - cessione di fabbricati"
  ITEM "N6.5|N6.5 Invers. cont. - cessione di telefoni cellulari"
  ITEM "N6.6|N6.6 Invers. cont. - cessione di prodotti elettronici"
  ITEM "N6.7|N6.7 Invers. cont. - prestazioni comparto edile e settori connessi"
  ITEM "N6.8|N6.8 Invers. cont. - operazioni settore energetico"
  ITEM "N6.9|N6.9 Invers. cont. - altri casi"
  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


PAGE "NOTSEND" -1 -1 69 14

NUMBER B_NUMREG 7 0
BEGIN
	PROMPT 0 0 "Numero Reg."
	FLAG "D"
END

DATE B_DATAREG
BEGIN
	PROMPT 0 1 "Data Reg."
	FLAG "D"
END

NUMBER B_ANNOES 4 0
BEGIN
	PROMPT 0 2 "Anno Es."
	FLAG "D"
END

NUMBER B_NUMDOC 7 0
BEGIN
	PROMPT 0 3 "Numero Documento"
	FLAG "D"
END

NUMBER B_NUMDOCEXT 50 0
BEGIN
	PROMPT 0 4 "Numero Docum. Esteso"
	FLAG "D"
END

STRING B_TIPODOC 2
BEGIN
	PROMPT 0 5 "Tipo Docum."
	FLAG "D"
END

STRING B_DESC 50
BEGIN
	PROMPT 0 6 "Descrizione"
	FLAG "D"
END

NUMBER B_CODCF 6 0
BEGIN
	PROMPT 0 7 "Cod. C/F"
	FLAG "D"
END

NUMBER B_TOTDOC 18 3
BEGIN
	PROMPT 0 8 "Totale Docum."
	FLAG "D"
END

BOOLEAN B_REVCHARGE
BEGIN
	PROMPT 0 9 "Reverse charge"
	FLAG "D"
END

STRING B_TFINVIO 1
BEGIN
	PROMPT 0 10 "INVIO"
	FLAG "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