root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Spostati alcuni campi

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2352 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-12-23 09:38:49 +00:00
parent 7cb1f8a1de
commit 10f904dd5a
1 changed files with 22 additions and 73 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

95
ba/ba3700a.uml
View File

@ -96,20 +96,13 @@ BEGIN
FLAGS "R"
END
LIST F_TIPO_RATA 25
LIST F_RATE_DIFF 1 28
BEGIN
PROMPT 5 6 "Tipo rata "
HELP "Tipo rata da utilizzare per le scadenze"
ITEM "1|Rimessa diretta o contanti"
ITEM "2|Tratta"
ITEM "3|Ricevuta bancaria"
ITEM "4|Cessione"
ITEM "5|Paghero'"
ITEM "6|Lettera di credito"
ITEM "7|Tratta accettata"
ITEM "8|Rapporti interban. diretti"
ITEM "9|Bonifici"
FIELD S4
PROMPT 5 6 "Rate "
ITEM "1|Differenziate" MESSAGE "X",909|DISABLE,F_NUM_RATE
ITEM "2|Uguali (obbligate dalla 2a)" MESSAGE "",909|ENABLE,F_NUM_RATE
ITEM "3|Uguali dalla prossima modifica" MESSAGE "X",909|DISABLE,F_NUM_RATE
ITEM "4|Uguali finche' possibile" MESSAGE "X",909|DISABLE,F_NUM_RATE
END
NUMBER F_INT_RATE 3
@ -119,20 +112,25 @@ BEGIN
FLAGS "R"
END
LIST F_RATE_DIFF 25
LIST F_TIPO_RATA 1 28
BEGIN
PROMPT 5 7 "Rate "
HELP "Descrizione del meccanismo di generazione rate "
ITEM "1|Differenziate" MESSAGE "X",909|DISABLE,F_NUM_RATE
ITEM "2|Uguali (obbligate dalla 2a)" MESSAGE "",909|ENABLE,F_NUM_RATE
ITEM "3|Uguali dalla prossima modifica" MESSAGE "X",909|DISABLE,F_NUM_RATE
ITEM "4|Uguali finche' possibile" MESSAGE "X",909|DISABLE,F_NUM_RATE
PROMPT 5 7 "Tipo rata "
ITEM "1|Rimessa diretta o contanti"
ITEM "2|Tratta"
ITEM "3|Ricevuta bancaria"
ITEM "4|Cessione"
ITEM "5|Paghero'"
ITEM "6|Lettera di credito"
ITEM "7|Tratta accettata"
ITEM "8|Rapporti interban. diretti"
ITEM "9|Bonifici"
FIELD S4
END
STRING F_ULT_CLASS 1
BEGIN
PROMPT 53 7 "Ult. class. "
FLAGS "U"
USE %CLR
INPUT CODTAB[1,1] F_TIPO_RATA SELECT
INPUT CODTAB[2,2] F_ULT_CLASS
@ -141,53 +139,9 @@ BEGIN
DISPLAY "Descrizione@50" S0
OUTPUT F_ULT_CLASS CODTAB[2,2]
CHECKTYPE NORMAL
HELP "Codice default per ulteriore classificazione della data"
FIELD S5
END
/**********************************************************************
* nuova versione, forse inutile; per ora teniamo la vecchia e vediamo
* cosa dicono
LIST F_RATE_DIFF 12
BEGIN
PROMPT 5 7 "Rate "
HELP "Descrizione delle rate "
ITEM "1|Differenziate" MESSAGE DISABLE,F_EQUAL_FROM
ITEM "2|Uguali" MESSAGE ENABLE,F_EQUAL_FROM
// ITEM "3|Uguali dall'ultima modificata"
// ITEM "4|Uguali finche' possibile"
END
LIST F_EQUAL_FROM 14
BEGIN
PROMPT 35 7 "a partire da"
ITEM "1|Rata numero... " MESSAGE ENABLE,F_START_RATA
ITEM "2|Ultima modificata" MESSAGE DISABLE,F_START_RATA
END
NUMBER F_START_RATA 2
BEGIN
PROMPT 65 7 ""
END
STRING F_ULT_CLASS 3
BEGIN
PROMPT 5 9 "Ulteriore classificazione"
USE %CLR
INPUT CODTAB[1,1] F_TIPO_RATA SELECT
INPUT CODTAB[2,2] F_ULT_CLASS
DISPLAY "Tipo pagamento" CODTAB[1,1]
DISPLAY "Classificazione" CODTAB[2,2]
DISPLAY "Descrizione@50" S0
OUTPUT F_ULT_CLASS CODTAB[2,2]
CHECKTYPE NORMAL
HELP "Codice default per ulteriore classificazione della data"
END
********************************************************************/
NUMBER F_FIXSCAD_1 2
BEGIN
PROMPT 5 9 "Giorni scadenza fissi (1) "
@ -227,8 +181,8 @@ BEGIN
PROMPT 0 11 ""
ITEM "N.ro giorni rata"
ITEM "Percentuale"
ITEM "Tipo pag."
ITEM "Ult. classif."
ITEM "Tipo@1"
ITEM "Ult. class.@1"
ITEM "Descrizione@50"
END
@ -241,22 +195,17 @@ PAGE "" -1 -1 78 15
NUMBER 101 4
BEGIN
PROMPT 4 1 "Numero giorni "
HELP "Numero di giorni per la scadenza"
FLAGS "R"
END
NUMBER 102 6 2
BEGIN
PROMPT 4 3 "Percentuale "
HELP "Percentuale della rata"
FLAGS "R"
PICTURE ".2"
END
NUMBER 103 1
BEGIN
PROMPT 4 5 "Tipo pagamento "
HELP "Tipo di pagamento per la rata"
SHEET "Codice|Tipo pagamento@32"
INPUT 103
OUTPUT 103