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

Patch level :2.0 p@rtners 678

Browse Source 
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

1
cg/cg3200.h
View File

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

59
cg/cg3200a.uml
View File

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