campo-sirio/src/fp/fp0100a.uml
Tolla 9ecb4550b5 Patch level : 12.0 704
Files correlati     : fp
Commento            :
- Aggiunto piccolo controllo preventivo durante l'esportazione degli XML
- Aggiunto flag per non rendere il controllo bloccante
- Sistemata banca di appoggio
- Aggiunta gestione casse professionali
2019-02-21 17:44:31 +01:00

218 lines
2.9 KiB
Plaintext

#include "fp0100a.h"
TOOLBAR "topbar" 0 0 0 2
#include <stdbar.h>
ENDPAGE
PAGE "Configurazione FP" 0 2 0 0
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 1 1 "@BDatabase"
END
STRING F_INDIRIZZO 50
BEGIN
PROMPT 2 2 "Indirizzo "
FLAGS ""
CHECKTYPE REQUIRED
END
STRING F_DATABASE 15
BEGIN
PROMPT 2 3 "Nome "
FLAGS ""
CHECKTYPE REQUIRED
END
STRING F_USER 15
BEGIN
PROMPT 2 4 "Utente "
FLAGS ""
CHECKTYPE REQUIRED
END
STRING F_PASSWORD 15
BEGIN
PROMPT 2 5 "Password "
FLAGS "*"
CHECKTYPE REQUIRED
END
GROUPBOX DLG_NULL 78 3
BEGIN
PROMPT 1 7 "@BTrasmittente"
END
STRING F_COFI 16
BEGIN
PROMPT 2 8 "Codice fiscale trasmittente "
CHECKTYPE REQUIRED
END
BOOLEAN F_F8
BEGIN
PROMPT 50 8 "Gestione F8"
END
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 1 10 "@BConfigurazione Allegati"
END
BOOLEAN F_ESPORTAALLEG
BEGIN
PROMPT 2 11 "Abilita esportazione allegati"
END
BOOLEAN F_ESPORTADOC
BEGIN
PROMPT 2 12 "Allega pdf documento nell'XML"
FLAGS "D"
MODULE RS
END
STRING F_FLDDEST 250 50
BEGIN
PROMPT 2 13 "Destinazione Server "
FLAGS ""
END
STRING F_FLDUSRDEST 250 50
BEGIN
PROMPT 2 14 "Destinazione User "
DSELECT
FLAGS ""
END
ENDPAGE
PAGE "Configurazione (2) " 0 2 0 0
SPREADSHEET F_FORMPERS 60 6
BEGIN
PROMPT 1 1 "Personalizzazioni calcolo tipi righe "
ITEM "Tipo\nDoc@4"
ITEM "Tipo\nRiga@4"
ITEM "Qta"
ITEM "Prezzo"
ITEM "Imponibile"
END
GROUPBOX DLG_NULL 78 2
BEGIN
PROMPT 1 8 "@BControlli preventivi"
END
BOOLEAN F_CHECK_NOT_BLOCK
BEGIN
PROMPT 2 11 "Rendi controlli XML non bloccanti"
END
ENDPAGE
PAGE "Assistenza FP" 0 2 0 0
BUTTON F_SETPATCH 15 2
BEGIN
PROMPT 1 1 "Imposta livello patch"
FLAGS "D"
END
BUTTON F_ENPTYTABLE 15 2
BEGIN
PROMPT 20 1 "Svuota Tabelle"
FLAGS "D"
END
BUTTON F_DROPTABLE 15 2
BEGIN
PROMPT 40 1 "Cancella Tabelle"
FLAGS "D"
END
BUTTON F_REBORNDB 15 2
BEGIN
PROMPT 60 1 "Ricrea DB"
FLAGS "D"
END
ENDPAGE
ENDMASK
PAGE "Elementi spredsheet" 0 2 0 0
STRING S_TIPODOC 4
BEGIN
PROMPT 15 1 "Tipo doc "
HELP "Lasciare libero per tutti i tipo documento"
USE %TIP
SELECT S3[37,40]!=""
INPUT CODTAB S_TIPODOC
DISPLAY "Codice@10" CODTAB
DISPLAY "Descrizione@50" S0
DISPLAY "Tipo SDI@10" S3[37,40]
OUTPUT S_TIPODOC CODTAB
FLAG "UPA"
END
STRING S_TIPORIGA 4
BEGIN
PROMPT 15 1 "Tipo riga "
USE %TRI
INPUT CODTAB S_TIPORIGA
DISPLAY "Codice@10" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT S_TIPORIGA CODTAB
CHECKTYPE REQUIRED
END
STRING S_QTA 10
BEGIN
PROMPT 0 2 "Qta"
END
STRING S_PREZZO 10
BEGIN
PROMPT 0 2 "Prezzo"
USE %FRR
INPUT CODTAB S_PREZZO
DISPLAY "Codice@10" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT S_PREZZO CODTAB
END
STRING S_IMPONIBILE 10
BEGIN
PROMPT 0 2 "Imponibile"
USE %FRR
INPUT CODTAB S_IMPONIBILE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT S_IMPONIBILE CODTAB
END
ENDPAGE
TOOLBAR "Riga" 0 0 0 2
BUTTON DLG_OK 2 2
BEGIN
PROMPT 1 1 ""
END
BUTTON DLG_CANCEL 2 2
BEGIN
PROMPT 1 1 ""
END
ENDPAGE
ENDMASK