correzzioni varie sui soci

git-svn-id: svn://10.65.10.50/trunk@2528 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-01-29 13:53:29 +00:00
parent 34f8a45d26
commit f8ea13d94c

View File

@ -1,6 +1,6 @@
#include "ba4600.h" #include "ba4600.h"
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
#include <toolbar.h> #include <toolbar.h>
ENDPAGE ENDPAGE
@ -9,7 +9,7 @@ PAGE "Soci 1/2" -1 -1 77 20
GROUPBOX DLG_NULL 76 7 GROUPBOX DLG_NULL 76 7
BEGIN BEGIN
PROMPT 0 0 "" PROMPT 0 0 ""
FLAGS "R" FLAGS "R"
END END
NUMBER FLD_SC1_CODDITTA 5 NUMBER FLD_SC1_CODDITTA 5
@ -50,8 +50,8 @@ BEGIN
PROMPT 1 3 "Attuale/Prec. " PROMPT 1 3 "Attuale/Prec. "
FIELD LF_SOCI->ATTPREC FIELD LF_SOCI->ATTPREC
KEY 1 KEY 1
ITEM "A|Attuale" ITEM "A|Attuale"
ITEM "P|Precedente" ITEM "P|Precedente"
MESSAGE COPY,7@ MESSAGE COPY,7@
END END
@ -171,7 +171,7 @@ END
NUMBER FLD_SC1_NQUOTEAZ 7 NUMBER FLD_SC1_NQUOTEAZ 7
BEGIN BEGIN
PROMPT 1 10 "Numero quote " PROMPT 1 10 "N. quote "
FIELD LF_SOCI->NQUOTEAZ FIELD LF_SOCI->NQUOTEAZ
FLAGS "R" FLAGS "R"
HELP "Numero di azioni possedute dal socio" HELP "Numero di azioni possedute dal socio"
@ -179,32 +179,32 @@ END
NUMBER FLD_SC1_PERCQUAZ 7 3 NUMBER FLD_SC1_PERCQUAZ 7 3
BEGIN BEGIN
PROMPT 29 10 "= " PROMPT 23 10 "%Proprieta' "
FIELD LF_SOCI->PERCQUAZ FIELD LF_SOCI->PERCQUAZ
FLAGS "R" FLAGS "R"
HELP "Percentuale delle azioni possedute dal socio" HELP "Percentuale delle azioni possedute dal socio"
WARNING "Percentuale quote non corretta" WARNING "Percentuale quote non corretta"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)} NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
END END
NUMBER FLD_SC1_PERCAZREDD 7 3 NUMBER FLD_SC1_PERCAZREDD 7 3
BEGIN BEGIN
PROMPT 41 10 "% Reddito da quota az. " PROMPT 45 10 "%Reddito da quota az."
FIELD LF_SOCI->PERCAZREDD FIELD LF_SOCI->PERCAZREDD
FLAGS "R" FLAGS "R"
HELP "Reddito derivante da quote aziendali" HELP "Reddito derivante da quote aziendali"
WARNING "Percentuale quote non corretta" WARNING "Percentuale quote non corretta"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)} NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
END END
NUMBER FLD_SC1_PERCAZPERD 7 3 NUMBER FLD_SC1_PERCAZPERD 7 3
BEGIN BEGIN
PROMPT 45 11 "Perdita da quota az. " PROMPT 45 11 "%Perdita da quota az."
FIELD LF_SOCI->PERCAZPERD FIELD LF_SOCI->PERCAZPERD
FLAGS "R" FLAGS "R"
HELP "Perdita derivante da quote aziendali" HELP "Perdita derivante da quote aziendali"
WARNING "Percentuale quote non corretta" WARNING "Percentuale quote non corretta"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)} NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
END END
LIST LST_SC1_RICQUAL 28 LIST LST_SC1_RICQUAL 28
@ -223,14 +223,14 @@ NUMBER FLD_SC1_EMOLUMENTO 15
BEGIN BEGIN
PROMPT 47 13 "Emolumento " PROMPT 47 13 "Emolumento "
FIELD LF_SOCI->EMOLUMENTO FIELD LF_SOCI->EMOLUMENTO
FLAGS "R" FLAGS "R"
PICTURE "." PICTURE "."
HELP "Ammontare dell'emolumento dovuto al socio" HELP "Ammontare dell'emolumento dovuto al socio"
END END
LIST LST_SC1_PROP 1 23 LIST LST_SC1_PROP 1 24
BEGIN BEGIN
PROMPT 1 14 "Titoli proprieta' " PROMPT 1 14 "Titoli proprieta' "
FIELD LF_SOCI->TITPROP FIELD LF_SOCI->TITPROP
ITEM "1|Intestatario" ITEM "1|Intestatario"
ITEM "2|Riportatore" ITEM "2|Riportatore"
@ -238,7 +238,7 @@ BEGIN
ITEM "4|Riportato" ITEM "4|Riportato"
ITEM "5|Compratore a termine" ITEM "5|Compratore a termine"
ITEM "U|Usufruttuario" ITEM "U|Usufruttuario"
ITEM "T|Tit. di altro vincolo" ITEM "T|Tit.di altro vincolo"
HELP "Titoli di proprieta' del socio" HELP "Titoli di proprieta' del socio"
END END
@ -254,7 +254,7 @@ END
DATE FLD_SC1_DATAGG DATE FLD_SC1_DATAGG
BEGIN BEGIN
PROMPT 1 16 "Data " PROMPT 1 16 "Data "
FIELD LF_SOCI->DATAAGG FIELD LF_SOCI->DATAAGG
FLAGS "DA" FLAGS "DA"
END END
@ -277,7 +277,7 @@ PAGE "Soci 2/2" -1 -1 77 20
GROUPBOX DLG_NULL 76 7 GROUPBOX DLG_NULL 76 7
BEGIN BEGIN
PROMPT 0 0 "" PROMPT 0 0 ""
FLAGS "R" FLAGS "R"
END END
NUMBER DLG_NULL 5 NUMBER DLG_NULL 5
@ -307,8 +307,8 @@ LIST DLG_NULL 12
BEGIN BEGIN
PROMPT 1 3 "Attuale/Prec. " PROMPT 1 3 "Attuale/Prec. "
FLAGS "D" FLAGS "D"
ITEM "A|Attuale" ITEM "A|Attuale"
ITEM "P|Precedente" ITEM "P|Precedente"
GROUP 7 GROUP 7
END END
@ -339,9 +339,9 @@ BEGIN
FIELD LF_SOCI->QUATTPREV FIELD LF_SOCI->QUATTPREV
HELP "Quadro in cui compare il socio sul 750" HELP "Quadro in cui compare il socio sul 750"
ITEM " |Nessuno" ITEM " |Nessuno"
ITEM "A1|Quadro A1" ITEM "A|Quadro A"
ITEM "B|Quadro B" ITEM "B|Quadro B"
ITEM "D|Quadro D" ITEM "D1|Quadro D1"
END END
LIST LST_SC2_Q740 10 LIST LST_SC2_Q740 10
@ -375,7 +375,7 @@ BEGIN
FLAGS "R" FLAGS "R"
HELP "Numero di mesi lavorati ex art.120 comma 1" HELP "Numero di mesi lavorati ex art.120 comma 1"
WARNING "N.ro di mesi non corretto" WARNING "N.ro di mesi non corretto"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)} NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
END END
NUMBER FLD_SC2_MLAV120C2 2 NUMBER FLD_SC2_MLAV120C2 2
@ -385,7 +385,7 @@ BEGIN
FLAGS "R" FLAGS "R"
HELP "Numero di mesi lavorati ex art.120 comma 2" HELP "Numero di mesi lavorati ex art.120 comma 2"
WARNING "N.ro di mesi non corretto" WARNING "N.ro di mesi non corretto"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)} NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
END END
NUMBER FLD_SC2_CODANAGCON 5 NUMBER FLD_SC2_CODANAGCON 5
@ -412,7 +412,7 @@ BEGIN
PROMPT 8 13 ": Nome " PROMPT 8 13 ": Nome "
HELP "Nome del coniuge del socio" HELP "Nome del coniuge del socio"
USE LF_ANAG KEY 2 USE LF_ANAG KEY 2
INPUT TIPOA "F" INPUT TIPOA "F"
INPUT RAGSOC FLD_SC2_CODANAGCON_ANAFIS_RAGSOC INPUT RAGSOC FLD_SC2_CODANAGCON_ANAFIS_RAGSOC
DISPLAY "Nome@50" RAGSOC DISPLAY "Nome@50" RAGSOC
DISPLAY "Codice" CODANAGR DISPLAY "Codice" CODANAGR