d6bef9b4e2
Files correlati : ba0.exe f90.exe f90100d.msk f90200a.msk f90300a.msk f90300b.msk f181.dir f181.trr f181.des f183.dir f183.trr f183.des Commento : - Aumentato campo FILENAME nelle tabelle. - Aggiunto alle cat. annessi se obbligatorio. - Aggiunto controllo annessi obbligatori in diagnostica. - Corretta esportazione IVA per categorie annessi: ora prende il nome della cat. - Implementati nuovi metodi per le categorie doc. - Modificati sheet categorie e annessi - Dopo la conferma del nuovo annesso la maschera non usciva. - Ora gli annessi sono univoci per ogni categoria "padre" - Aggiunto controllo univocita' annesso in inserimento - Modificata finestra nuovo annesso utilizzata anche per modificare una cat. annesso esistente - Semplificato notevolmente riempimento sheet annessi - Tolta colonna inutilizzata nelle categorie documentali - Aggiunta possibilita' di modificare i file e annessi (solo alcuni campi) - Durante l'inserimento di un file annesso non viene piu' richiesta la cat. padre poiche' non avrebbe senso, visto che e' il programma che deve riconoscere a quale cat. appartiene, quindi viene presa in automatico, e caricati autom. le cat annessi. - Aggiunto controllo esistenza file annessi come per i doc. - Aggiunti test sulle classi per le categorie documentali.
289 lines
4.0 KiB
Plaintext
289 lines
4.0 KiB
Plaintext
#include "f90300a.h"
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
|
|
BUTTON B_IMPORT 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Impo~rta"
|
|
PICTURE TOOL_IMPORT
|
|
END
|
|
|
|
BUTTON B_DELETE 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Eli~mina"
|
|
PICTURE TOOL_DELREC
|
|
END
|
|
|
|
BUTTON DLG_NULL 2 2
|
|
BEGIN
|
|
PROMPT -1 1 ""
|
|
PICTURE 0
|
|
END
|
|
|
|
BUTTON B_CONFIG 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Settin~gs"
|
|
PICTURE TOOL_CONFIG
|
|
FLAGS ""
|
|
END
|
|
|
|
BUTTON DLG_NULL 2 2
|
|
BEGIN
|
|
PROMPT -1 1 ""
|
|
PICTURE 0
|
|
END
|
|
|
|
BUTTON DLG_INFO 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Info"
|
|
MESSAGE EXIT,K_F2
|
|
PICTURE TOOL_INFO
|
|
END
|
|
|
|
BUTTON DLG_HELP 2 2
|
|
BEGIN
|
|
PROMPT 2 1 "Help"
|
|
MESSAGE EXIT,K_F1
|
|
PICTURE TOOL_HELP
|
|
FLAG "H"
|
|
END
|
|
|
|
BUTTON DLG_NULL 2 2
|
|
BEGIN
|
|
PROMPT -1 0 ""
|
|
PICTURE 0
|
|
END
|
|
|
|
BUTTON DLG_CANCEL 2 2
|
|
BEGIN
|
|
PROMPT 3 1 "Annulla"
|
|
MESSAGE EXIT,K_ESC
|
|
PICTURE TOOL_CANCEL
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Lista Documenti Cartacei" 0 2 0 0
|
|
|
|
SPREADSHEET S_IMPORTED -1 -1
|
|
BEGIN
|
|
PROMPT 0 0 "Doc Importati"
|
|
ITEM ""
|
|
ITEM "Nome File@25"
|
|
ITEM "Movimento\nContabile N.@7"
|
|
ITEM "Data\nMovimento@10"
|
|
ITEM "Causale@7"
|
|
ITEM "Num. Doc.@7"
|
|
ITEM "Reg./Prot. IVA@10"
|
|
ITEM "Descrizione@20"
|
|
ITEM "Data\nCaricamento@10"
|
|
ITEM "Info (Errori)@25"
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
PAGE "Lista Annessi Importati" 0 2 0 0
|
|
|
|
SPREADSHEET S_ANNESSI -1 -1
|
|
BEGIN
|
|
PROMPT 0 0 "Annessi Importati"
|
|
ITEM ""
|
|
ITEM "Nome File@25"
|
|
ITEM "Categoria di\nappartenenza@10"
|
|
ITEM "Classe doc.\nannesso@10"
|
|
ITEM "Movimento\nContabile N.@7"
|
|
ITEM "Data\nMovimento@10"
|
|
ITEM "Causale@7"
|
|
ITEM "Num. Doc.@7"
|
|
ITEM "Reg./Prot. IVA@10"
|
|
ITEM "Descrizione@20"
|
|
ITEM "Data\nCaricamento@10"
|
|
ITEM "Info (Errori)@25"
|
|
END
|
|
|
|
ENDPAGE
|
|
ENDMASK
|
|
|
|
|
|
|
|
PAGE "DOC CARTACEO" -1 -1 78 13
|
|
|
|
BOOLEAN F_SEL
|
|
BEGIN
|
|
PROMPT 0 0 "Selezionato"
|
|
END
|
|
|
|
STRING F_FILENAME 256
|
|
BEGIN
|
|
PROMPT 0 1 "Nome del file"
|
|
END
|
|
|
|
DATE F_DATACARIC
|
|
BEGIN
|
|
PROMPT 0 2 "Data Caricamento File"
|
|
END
|
|
|
|
NUMBER F_NUMREG 7
|
|
BEGIN
|
|
PROMPT 0 3 "Numero registrazione"
|
|
USE MOV
|
|
INPUT NUMREG F_NUMREG
|
|
DISPLAY "Numero" NUMREG
|
|
DISPLAY "Data " DATAREG
|
|
DISPLAY "Causale" CODCAUS
|
|
DISPLAY "Num. Doc." NUMDOC
|
|
DISPLAY "N. esteso" NUMDOCEXT
|
|
DISPLAY "Prot. IVA" PROTIVA
|
|
DISPLAY "Descrizione" DESCR
|
|
OUTPUT F_NUMREG NUMREG
|
|
CHECKTYPE NORMAL
|
|
FLAG "U"
|
|
END
|
|
|
|
DATE F_DATAMOV
|
|
BEGIN
|
|
PROMPT 0 4 "Data movimento"
|
|
END
|
|
|
|
STRING F_CAUS 3
|
|
BEGIN
|
|
PROMPT 0 5 "Codice causale"
|
|
END
|
|
|
|
STRING F_NUMDOC 18
|
|
BEGIN
|
|
PROMPT 0 6 "Numero documento"
|
|
END
|
|
|
|
STRING F_NPROTOCOL 10
|
|
BEGIN
|
|
PROMPT 0 7 "Numero Protocollo IVA"
|
|
END
|
|
|
|
STRING F_DESCRMOV 50
|
|
BEGIN
|
|
PROMPT 0 8 "Descrizione mov."
|
|
END
|
|
|
|
STRING F_INFO 50
|
|
BEGIN
|
|
PROMPT 0 9 "Informazione file."
|
|
END
|
|
|
|
|
|
ENDPAGE
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
|
|
BUTTON DLG_USER 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Annessi"
|
|
PICTURE TOOL_LINK
|
|
END
|
|
|
|
BUTTON DLG_QUIT 2 2
|
|
BEGIN
|
|
PROMPT 2 1 "Fine"
|
|
MESSAGE EXIT,K_QUIT
|
|
PICTURE TOOL_QUIT
|
|
END
|
|
|
|
ENPAGE
|
|
ENDMASK
|
|
|
|
|
|
|
|
PAGE "ANNESSO" -1 -1 78 13
|
|
|
|
BOOLEAN F_ASEL
|
|
BEGIN
|
|
PROMPT 0 0 "Selezionato"
|
|
END
|
|
|
|
STRING F_AFILENAME 256
|
|
BEGIN
|
|
PROMPT 0 1 "Nome del file"
|
|
END
|
|
|
|
DATE F_ADATACARIC
|
|
BEGIN
|
|
PROMPT 0 2 "Data Caricamento File"
|
|
END
|
|
|
|
STRING F_ACATPADRE 10
|
|
BEGIN
|
|
PROMPT 0 10 "Categoria di appartenenza"
|
|
END
|
|
|
|
STRING F_ACATANN 10
|
|
BEGIN
|
|
PROMPT 0 11 "Classe doc. annesso"
|
|
END
|
|
|
|
NUMBER F_ANUMREG 7
|
|
BEGIN
|
|
PROMPT 0 3 "Numero registrazione"
|
|
USE MOV
|
|
INPUT NUMREG F_ANUMREG
|
|
DISPLAY "Numero" NUMREG
|
|
DISPLAY "Data " DATAREG
|
|
DISPLAY "Causale" CODCAUS
|
|
DISPLAY "Num. Doc." NUMDOC
|
|
DISPLAY "N. esteso" NUMDOCEXT
|
|
DISPLAY "Prot. IVA" PROTIVA
|
|
DISPLAY "Descrizione" DESCR
|
|
OUTPUT F_ANUMREG NUMREG
|
|
CHECKTYPE NORMAL
|
|
FLAG "U"
|
|
END
|
|
|
|
DATE F_ADATAMOV
|
|
BEGIN
|
|
PROMPT 0 4 "Data movimento"
|
|
END
|
|
|
|
STRING F_ACAUS 3
|
|
BEGIN
|
|
PROMPT 0 5 "Codice causale"
|
|
END
|
|
|
|
STRING F_ANUMDOC 18
|
|
BEGIN
|
|
PROMPT 0 6 "Numero documento"
|
|
END
|
|
|
|
STRING F_ANPROTOCOL 10
|
|
BEGIN
|
|
PROMPT 0 7 "Numero Protocollo IVA"
|
|
END
|
|
|
|
STRING F_ADESCRMOV 50
|
|
BEGIN
|
|
PROMPT 0 8 "Descrizione mov."
|
|
END
|
|
|
|
STRING F_AINFO 50
|
|
BEGIN
|
|
PROMPT 0 9 "Informazione file."
|
|
END
|
|
|
|
|
|
ENDPAGE
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
|
|
BUTTON DLG_USER 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Annessi"
|
|
PICTURE TOOL_LINK
|
|
END
|
|
|
|
BUTTON DLG_QUIT 2 2
|
|
BEGIN
|
|
PROMPT 2 1 "Fine"
|
|
MESSAGE EXIT,K_QUIT
|
|
PICTURE TOOL_QUIT
|
|
END
|
|
|
|
ENPAGE
|
|
ENDMASK |