Corretto MI6082. Modificata la visualizzazione.

git-svn-id: svn://10.65.10.50/trunk@3582 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-09-13 07:58:26 +00:00
parent 9a2368bc8e
commit 2af280aebd
2 changed files with 14 additions and 15 deletions

View File

@ -356,10 +356,10 @@ int TSaldibrowse_application::read(TMask& m)
m.set(F_ANNO,_anno);
m.set(F_SCARICATO,_scarongly ? "X" : " ");
TString tipo(m.get(F_TIPOCF));
if (tipo == "C")
m.set(F_SOTTOC_CLIENTE,_s);
else if (tipo == "F")
m.set(F_SOTTOC_FORN,_s);
//if (tipo == "C")
// m.set(F_SOTTOC_CLIENTE,_s);
//else if (tipo == "F")
// m.set(F_SOTTOC_FORN,_s);
fai_filtro();
compilasheet();

View File

@ -28,7 +28,7 @@ BEGIN
PROMPT 40 1 "Solo saldi dei movimenti scaricati"
END
GROUPBOX DLG_NULL 73 4
GROUPBOX DLG_NULL 73 5
BEGIN
PROMPT 3 2 ""
END
@ -38,8 +38,8 @@ BEGIN
PROMPT 4 3 "Tipo "
HELP "Tipo del conto da visualizzare"
ITEM " |Conto" MESSAGE HIDE,2@|HIDE,3@|SHOW,1@|ENABLE,F_DESCR_CONTO
ITEM "C|Cliente" MESSAGE HIDE,1@|HIDE,3@|SHOW,2@|ENABLE,F_DESCR_CLIENTE
ITEM "F|Fornitore" MESSAGE HIDE,1@|HIDE,2@|SHOW,3@|ENABLE,F_DESCR_FORN
ITEM "C|Cliente" MESSAGE HIDE,F_SOTTOCONTO|DISABLE,F_DESCR_CONTO|HIDE,3@|SHOW,2@|ENABLE,F_DESCR_CLIENTE
ITEM "F|Fornitore" MESSAGE HIDE,F_SOTTOCONTO|DISABLE,F_DESCR_CONTO|HIDE,2@|SHOW,3@|ENABLE,F_DESCR_FORN
FIELD TMCF
KEY 1
END
@ -88,7 +88,7 @@ END
NUMBER F_SOTTOCONTO 6
BEGIN
PROMPT 54 3 "Sottoconto "
PROMPT 55 3 "Sottoconto "
HELP "Codice del conto da visualizzare"
//USE LF_PCON SELECT SOTTOCONTO!=""
USE LF_PCON
@ -114,11 +114,10 @@ END
NUMBER F_SOTTOC_CLIENTE 6
BEGIN
PROMPT 54 3 "Cliente "
PROMPT 58 3 "Cliente "
HELP "Codice del conto da visualizzare"
FLAGS "R"
KEY 1
FIELD LF_CLIFO->CODCF
USE LF_CLIFO
INPUT TIPOCF "C"
INPUT CODCF F_SOTTOC_CLIENTE
@ -136,7 +135,7 @@ END
NUMBER F_SOTTOC_FORN 6
BEGIN
PROMPT 54 3 "Fornitore "
PROMPT 56 3 "Fornitore "
HELP "Codice del conto da visualizzare"
FLAGS "R"
KEY 1
@ -157,7 +156,7 @@ END
STRING F_DESCR_CONTO 50
BEGIN
PROMPT 4 4 "Descrizione "
PROMPT 4 4 "Descrizione conto "
HELP "Descrizione del conto da visualizzare"
FIELD DESCR
USE LF_PCON KEY 2
@ -177,7 +176,7 @@ END
STRING F_DESCR_CLIENTE 50
BEGIN
PROMPT 4 4 "Cliente "
PROMPT 4 5 "Cliente "
HELP "Ragione sociale del cliente da visualizzare"
KEY 4
USE LF_CLIFO KEY 2
@ -194,7 +193,7 @@ END
STRING F_DESCR_FORN 50
BEGIN
PROMPT 4 4 "Fornitore "
PROMPT 4 5 "Fornitore "
HELP "Ragione sociale del fornitore da visualizzare"
KEY 4
USE LF_CLIFO KEY 2
@ -211,7 +210,7 @@ END
SPREADSHEET F_SHEET_SALDI
BEGIN
PROMPT 0 6 ""
PROMPT 0 7 ""
ITEM "Es.@4"
ITEM " Saldo iniziale@15"
ITEM ""