Patch level :2.0 p@rtners 678

Files correlati     :cg3.exe cg3200a.msk
Ricompilazione Demo : [ ]
Commento            :
CM20084
Inserire un nuovo campo dove proporre la data del giorno. Tale data deve poter essere modificata
 dall'utente e di conseguenza deve essere stampata nell'intestazione del mastrino stesso
possibilmente in alto a destra.


git-svn-id: svn://10.65.10.50/trunk@11739 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2004-02-02 14:51:58 +00:00
parent 6a58d1bff0
commit 77ff830011
3 changed files with 33 additions and 74 deletions

View File

@ -2763,7 +2763,6 @@ void TMastrini_application::crea_intestazione()
set_header (1, "@0g%s@6g%5ld", TR("DITTA"), _codice_ditta);
set_header (1, "@12g%-.45s", (const char*) _ragsoc);
set_header (1, "@59g%s", (const char*) _indulc);
//set_header (1, "@86g%-.9s", (const char*) _civulc);
set_header (1, "@97g%-.5s", (const char*) _capulc);
set_header (1, "@103g%-.18s", (const char*) _com);
set_header (1, "@122g%-.3s", (const char*) _prov);
@ -2775,14 +2774,16 @@ void TMastrini_application::crea_intestazione()
if (_fsc.not_empty())
{
const TString& desc_fsc = cache().get("FSC", _fsc, "S0");
set_header(2, FR("@bCommessa %s %s - Fase %s %s"),
set_header (2, FR("@bCommessa %s %-40s - Fase %s %-40s"),
(const char*)_cdc, (const char*)desc_cdc,
(const char*)_fsc, (const char*)desc_fsc);
}
else
set_header(2, FR("@bCommessa %s %s"), (const char*)_cdc, (const char*)desc_cdc);
set_header (2, FR("@bCommessa %s %s"), (const char*)_cdc, (const char*)desc_cdc);
}
set_header (2, "@122g%s", (const char *) _msk->get(F_DATASTAMPA));
if (_nummast == 3)
set_header (3, "@0g%s@12g@b%3d %3d %6ld", TR("Sottoconto"), _gruppo, _conto, _sottoc);
else
@ -3415,23 +3416,23 @@ void TMastrini_application::ricerca_clifo()
else
descriz2 = "";
set_header(3,"@27g%-.30s",(const char*) descrizione_gruppo());
set_header(3,"@59g%-.30s",(const char*) descrizione_conto());
set_header(3, "@91g%-.41s",(const char*) ragsoc);
set_header (3,"@27g%-.30s",(const char*) descrizione_gruppo());
set_header (3,"@59g%-.30s",(const char*) descrizione_conto());
set_header (3, "@91g%-.41s",(const char*) ragsoc);
if (_nummast == 3)
set_header(4, "@r%s@8g@b%c", TR("Classe"), _lettivd);
set_header (4, "@r%s@8g@b%c", TR("Classe"), _lettivd);
else
set_header(4, "%s@8g%c", TR("Classe") , _lettivd);
set_header(4, "@10g%-8s", (const char*) _numrivd);
set_header (4, "%s@8g%c", TR("Classe") , _lettivd);
set_header (4, "@10g%-8s", (const char*) _numrivd);
if (_numivd != 0)
set_header(4, "@19g%2d", _numivd);
set_header (4, "@19g%2d", _numivd);
if (descriz2 != "")
{
set_header(4,"@23g%-50s",(const char*) descriz2);
set_header(4,"@80g%-50s",(const char*) descriz);
set_header (4,"@23g%-50s",(const char*) descriz2);
set_header (4,"@80g%-50s",(const char*) descriz);
}
else
set_header(4,"@23g%-50s",(const char*) descriz);
set_header (4,"@23g%-50s",(const char*) descriz);
dataini = _data_ini.string();
datafine = _data_fine.string();
@ -3660,19 +3661,19 @@ void TMastrini_application::ricerca_gruppo()
set_header(3,"@91g%-.41s",(const char*) descrizione_sottoconto());
if (_nummast == 3)
set_header(4, "@0g@r%s@12g@b%c", TR("Classe"), _lettivd);
set_header (4, "@0g@r%s@12g@b%c", TR("Classe"), _lettivd);
else
set_header(4, "@0g%s@12g%c", TR("Classe"), _lettivd);
set_header(4, "@14g%-8s",(const char*) _numrivd);
set_header (4, "@0g%s@12g%c", TR("Classe"), _lettivd);
set_header (4, "@14g%-8s",(const char*) _numrivd);
if (_numivd != 0)
set_header(4, "@23g%d", _numivd);
set_header (4, "@23g%d", _numivd);
if (descriz2 != "")
{
set_header(4,"@27g%-50s",(const char*) descriz2);
set_header(4,"@80g%-50s",(const char*) descriz);
set_header (4,"@27g%-50s",(const char*) descriz2);
set_header (4,"@80g%-50s",(const char*) descriz);
}
else
set_header(4,"@27g%-50s",(const char*) descriz);
set_header (4,"@27g%-50s",(const char*) descriz);
dataini = _data_ini.string();
datafine = _data_fine.string();

View File

@ -50,6 +50,7 @@
#define F_CODDITTA 504
#define F_RAGSOC 505
#define F_SCELTE 506
#define F_DATASTAMPA 507
#endif // __CG3200_H

View File

@ -41,6 +41,12 @@ BEGIN
FLAGS "D"
END
DATE F_DATASTAMPA
BEGIN
PROMPT 1 2 "Data di stampa "
FLAGS "A"
END
LIST F_TIPOCF_INI 25
BEGIN
PROMPT 1 3 "Ricerca "
@ -65,7 +71,6 @@ BEGIN
MESSAGE HIDE,98|HIDE,99|SHOW,96|SHOW,97
MESSAGE EMPTY HIDE,96|HIDE,97|SHOW,98|SHOW,99
FLAGS "RZ"
// ADD RUN cg0 -5 esc
ADD NONE
END
@ -226,51 +231,9 @@ BEGIN
CHECKTYPE NORMAL
VALIDATE REQIF_FUNC 1 F_SOTTOCFINE_CONTO
WARNING "Conto inesistente o mancante"
// GROUP 4 9
GROUP 9
END
/*
NUMBER F_CONTOFINE_CLIENTE 3
BEGIN
PROMPT 11 7 ""
USE LF_PCON SELECT TMCF="C"
INPUT GRUPPO F_GRUPPOFINE
INPUT CONTO F_CONTOFINE_CLIENTE
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOFINE GRUPPO
OUTPUT F_CONTOFINE_CLIENTE CONTO
CHECKTYPE NORMAL
VALIDATE REQIF_FUNC 1 F_SOTTOCFINE_CLIENTE
WARNING "Conto inesistente o mancante"
MESSAGE DIRTY,F_SOTTOCFINE_CLIENTE
MESSAGE COPY,F_CONTOFINE_CONTO
GROUP 5 9
END
NUMBER F_CONTOFINE_FORN 3
BEGIN
PROMPT 11 7 ""
USE LF_PCON SELECT TMCF="F"
INPUT GRUPPO F_GRUPPOFINE
INPUT CONTO F_CONTOFINE_FORN
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOFINE GRUPPO
OUTPUT F_CONTOFINE_FORN CONTO
CHECKTYPE NORMAL
VALIDATE REQIF_FUNC 1 F_SOTTOCFINE_FORN
WARNING "Conto inesistente o mancante"
MESSAGE DIRTY,F_SOTTOCFINE_FORN
MESSAGE COPY,F_CONTOFINE_CONTO
GROUP 6 9
END
*/
NUMBER F_SOTTOCFINE_CONTO 6
BEGIN
@ -748,7 +711,6 @@ END
STRING F_DESCRINI_CONTO 50
BEGIN
PROMPT 1 3 "Descrizione "
// FIELD LF_PCON->DESCR
USE LF_PCON KEY 2
INPUT DESCR F_DESCRINI_CONTO
DISPLAY "Descrizione@50" DESCR
@ -779,7 +741,7 @@ END
NUMBER F_CONTOFINE_CLIENTE 3
BEGIN
PROMPT 50 4 ""
USE LF_PCON SELECT (TMCF="C") // (CONTO!="") && (SOTTOCONTO="")
USE LF_PCON SELECT (TMCF="C")
INPUT GRUPPO F_GRUPPOFINE
INPUT CONTO F_CONTOFINE_CLIENTE
DISPLAY "Gruppo" GRUPPO
@ -798,7 +760,7 @@ END
NUMBER F_CONTOFINE_FORN 3
BEGIN
PROMPT 50 4 ""
USE LF_PCON SELECT (TMCF="F") // && (CONTO!="") && (SOTTOCONTO="")
USE LF_PCON SELECT (TMCF="F")
INPUT GRUPPO F_GRUPPOFINE
INPUT CONTO F_CONTOFINE_FORN
DISPLAY "Gruppo" GRUPPO
@ -853,7 +815,6 @@ END
STRING F_DESCRFINE_CLIENTE 50
BEGIN
PROMPT 1 5 "Cliente "
// FIELD LF_CLIFO->RAGSOC
USE LF_CLIFO KEY 2
INPUT TIPOCF "C"
INPUT RAGSOC F_DESCRFINE_CLIENTE
@ -988,8 +949,7 @@ BEGIN
DISPLAY "Codice@20" CODTAB
DISPLAY "Descrizione@70" S0
OUTPUT F_DACDC CODTAB
CHECKTYPE SEARCH
CHECKTYPE SEARCH
END
STRING F_DAFSC 10
@ -1002,7 +962,6 @@ BEGIN
DISPLAY "Descrizione@70" S0
OUTPUT F_DAFSC CODTAB
CHECKTYPE SEARCH
END
STRING F_ACDC 20
@ -1013,8 +972,7 @@ BEGIN
INPUT CODTAB F_ACDC
COPY DISPLAY F_DACDC
OUTPUT F_ACDC CODTAB
CHECKTYPE SEARCH
CHECKTYPE SEARCH
END
STRING F_AFSC 10
@ -1025,8 +983,7 @@ BEGIN
INPUT CODTAB F_AFSC
COPY DISPLAY F_DAFSC
OUTPUT F_AFSC CODTAB
CHECKTYPE SEARCH
CHECKTYPE SEARCH
END
BUTTON DLG_OK 10 2