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.
154 lines
2.3 KiB
Plaintext
154 lines
2.3 KiB
Plaintext
#include "f90200a.h"
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
|
|
BUTTON DLG_OK 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Regi~stra"
|
|
PICTURE TOOL_SAVEREC
|
|
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 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
|
|
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 "Classi Documentali" 0 2 0 0
|
|
|
|
SPREADSHEET S_CLASSDOC -1 -1
|
|
BEGIN
|
|
PROMPT 0 0 "Classi Documentali"
|
|
ITEM " "
|
|
ITEM "Categoria\nDocumento (Codice)@15"
|
|
ITEM "Descrizione\nDocumento@26"
|
|
ITEM "Classe Documentale\nSostitutiva@18"
|
|
ITEM "Causale per\nSostitutiva (TD01...)@25"
|
|
ITEM "Causale\nContabile@8"
|
|
ITEM "Tipo\nDocumento@6"
|
|
END
|
|
|
|
ENDPAGE
|
|
ENDMASK
|
|
|
|
|
|
PAGE "class doc" -1 -1 78 13
|
|
|
|
BOOLEAN F_SELCLASS
|
|
BEGIN
|
|
PROMPT 1 1 "Seleziona"
|
|
END
|
|
|
|
STRING F_CATDOC 10
|
|
BEGIN
|
|
PROMPT 1 2 "Categoria Documento"
|
|
END
|
|
|
|
STRING F_DESCRDOC 30
|
|
BEGIN
|
|
PROMPT 1 3 "Descrizione Documento"
|
|
END
|
|
|
|
LIST F_CLASDOCSOS 3 24
|
|
BEGIN
|
|
PROMPT 1 4 ""
|
|
FLAGS ""
|
|
ITEM "FTA|FTA - Fattura Acquisti"
|
|
ITEM "FTV|FTV - Fattura di Vendita"
|
|
END
|
|
|
|
LIST F_CAUSSOS 4 33
|
|
BEGIN
|
|
PROMPT 1 5 "Causale per sostitutiva"
|
|
FLAGS ""
|
|
ITEM ""
|
|
ITEM "TD01|TD01 Fattura"
|
|
ITEM "TD02|TD02 Acconto/Anticipo su fattura"
|
|
ITEM "TD03|TD03 Acconto/Anticipo su parcella"
|
|
ITEM "TD04|TD04 Nota di credito"
|
|
ITEM "TD05|TD05 Nota di debito"
|
|
ITEM "TD06|TD06 Parcella"
|
|
ITEM "TD20|TD20 Autofattura"
|
|
END
|
|
|
|
STRING F_CAUSCONT 6
|
|
BEGIN
|
|
PROMPT 1 6 "Causale Contabile"
|
|
USE 26
|
|
INPUT CODCAUS F_CAUSCONT
|
|
DISPLAY "Codice" CODCAUS
|
|
DISPLAY "Descrizione@50" DESCR
|
|
OUTPUT F_CAUSCONT CODCAUS
|
|
CHECKTYPE NORMAL
|
|
FLAG "U"
|
|
END
|
|
|
|
STRING F_TIPOCAUSCONT 2
|
|
BEGIN
|
|
PROMPT 1 7 "Tipo Documento"
|
|
USE %TPD
|
|
INPUT CODTAB F_TIPOCAUSCONT
|
|
DISPLAY "Tipo " CODTAB
|
|
DISPLAY "Descrizione @50" S0
|
|
OUTPUT F_TIPOCAUSCONT CODTAB
|
|
WARNING "Tipo documento errato"
|
|
CHECKTYPE NORMAL
|
|
FLAG "U"
|
|
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
|