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

Migliore esportabilità Excel stampe saldaconto

Browse Source 
git-svn-id: svn://10.65.10.50/branches/R_10_00@22957 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2014-06-24 12:40:09 +00:00
parent f2e631a62f
commit 3e52722b14
3 changed files with 51 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
sc/pec.frm
View File

@ -50,14 +50,14 @@ SECTION HEADER ODD 12
BEGIN BEGIN
KEY "Codice cliente/fornitore" KEY "Codice cliente/fornitore"
PROMPT 2 2 "" PROMPT 2 2 ""
FIELD CODCF FIELD 20.CODCF
END END
STRINGA 4 STRINGA 4
BEGIN BEGIN
KEY "Ragione sociale" KEY "Ragione sociale"
PROMPT 8 2 "" PROMPT 8 2 ""
FIELD RAGSOC FIELD 20.RAGSOC
END END
STRINGA 5 STRINGA 5
@ -66,7 +66,7 @@ SECTION HEADER ODD 12
PROMPT 2 3 "" PROMPT 2 3 ""
FLAGS "H" FLAGS "H"
MESSAGE COPY,7 MESSAGE COPY,7
FIELD INDCF FIELD 20.INDCF
END END
STRINGA 6 STRINGA 6
@ -75,7 +75,7 @@ SECTION HEADER ODD 12
PROMPT 52 3 "" PROMPT 52 3 ""
FLAGS "H" FLAGS "H"
MESSAGE APPEND,7 MESSAGE APPEND,7
FIELD CIVCF FIELD 20.CIVCF
END END
STRINGA 7 STRINGA 7
@ -88,14 +88,14 @@ SECTION HEADER ODD 12
BEGIN BEGIN
KEY "C.A.P." KEY "C.A.P."
PROMPT 2 4 "" PROMPT 2 4 ""
FIELD CAPCF FIELD 20.CAPCF
END END
STRINGA 9 STRINGA 9
BEGIN BEGIN
KEY "Localita'" KEY "Localita'"
PROMPT 26 4 "" PROMPT 26 4 ""
FIELD LOCALITACF FIELD 20.LOCALITACF
END END
STRINGA 10 STRINGA 10
@ -128,7 +128,7 @@ SECTION HEADER ODD 12
PROMPT 2 6 "Telefono " PROMPT 2 6 "Telefono "
FLAGS "H" FLAGS "H"
MESSAGE COPY,15 MESSAGE COPY,15
FIELD PTEL FIELD 20.PTEL
END END
STRINGA 14 STRINGA 14
@ -137,13 +137,13 @@ SECTION HEADER ODD 12
PROMPT 24 6 "/ " PROMPT 24 6 "/ "
FLAGS "H" FLAGS "H"
MESSAGE APPEND,15 MESSAGE APPEND,15
FIELD TEL FIELD 20.TEL
END END
STRINGA 15 STRINGA 15
BEGIN BEGIN
KEY "Telefono completo" KEY "Telefono completo"
PROMPT 2 6 "Telefono " PROMPT 2 6 "Telefono "
END END
STRINGA 101 STRINGA 101

37
sc/sc2100.cpp
View File

@ -1323,7 +1323,42 @@ void TEC_form::init_header(const TMask& m)
if (!rform.empty()) if (!rform.empty())
fi.set(rform.get("TESTO")); fi.set(rform.get("TESTO"));
} }
// Sistema campi che si riferiscono a CLIFO in una stampa per Conto
if (relation()->log2ind(LF_CLIFO) < 0)
{
for (word i = 0; i < head.fields(); i++)
{
TForm_item& fi = head.field(i);
if (fi.fields() > 0 && strcmp(fi.class_name(), "STRINGA") == 0)
{
for (int f = 0; f < fi.fields(); f++)
{
TFieldref& fr = ((TForm_string&)fi).field(f);
if (fr.id() == "13")
{
fi.disable();
} else
if (fr.id() == "20")
{
if (fr.name() == CLI_RAGSOC)
{
fr.set_file(LF_PCON);
fr.set_name(PCN_DESCR);
} else
if (fr.name() == CLI_CODCF)
{
fr.set_file(LF_PCON);
fr.set_name(PCN_SOTTOCONTO);
}
else
fi.disable();
}
}
}
}
}
TPrint_section& fink = section('G'); TPrint_section& fink = section('G');
if (fink.fields() > 0) if (fink.fields() > 0)
fink.update(); // Setta il backgroud di stampa fink.update(); // Setta il backgroud di stampa

10
sc/sc2200.cpp
View File

@ -1223,7 +1223,7 @@ void TStampaScadenzario::print_header()
TString rw(201); TString rw(201);
TString s1,s2; TString s1,s2;
set_header (soh++, "Ditta : %ld %s@148gData@153g%s @190gPag. @#", set_header (soh++, "%6ld@9g%s@148gData@153g%s @190gPag. @#",
firm, (const char *)s, (const char *)data); firm, (const char *)s, (const char *)data);
if (_tipost==fornitori) if (_tipost==fornitori)
@ -1260,7 +1260,7 @@ void TStampaScadenzario::print_header()
case altri: // Piano dei conti case altri: // Piano dei conti
{ {
TString rw(201); TString rw(201);
set_header (soh++, FR("Ditta : %ld %s@152gData@157g%s @190gPag. @#"), set_header (soh++, FR("%6ld@9g%s@152gData@157g%s @190gPag. @#"),
firm, (const char *)s, (const char *)data); firm, (const char *)s, (const char *)data);
set_header(soh++,FR("@79g** SCADENZARIO **")); set_header(soh++,FR("@79g** SCADENZARIO **"));
set_header (soh++,FR("@66gPer il periodo dal %s al %s"),(const char*)datai,(const char*)dataf); set_header (soh++,FR("@66gPer il periodo dal %s al %s"),(const char*)datai,(const char*)dataf);
@ -1317,9 +1317,9 @@ void TStampaScadenzario::set_page_clifo(int nriga)
set_row(nriga,"@180g#15t",&_altri); // Altri tipi di pagamento set_row(nriga,"@180g#15t",&_altri); // Altri tipi di pagamento
set_row(nriga,"@198g@1s",FLD(LF_SCADENZE,SCAD_BLOCCATA)); set_row(nriga,"@198g@1s",FLD(LF_SCADENZE,SCAD_BLOCCATA));
nriga++; nriga++;
set_row(nriga,"@31g#t",&_datadoc); set_row(nriga,"@30g#t",&_datadoc);
set_row(nriga,"@40g#t",&_numdoc); set_row(nriga,"@38g#8t",&_numdoc);
set_row(nriga,"@49g#-5t",&_protiva); set_row(nriga,"@47g#-5t",&_protiva);
} }
void TStampaScadenzario::set_page_pcon(int nriga) void TStampaScadenzario::set_page_pcon(int nriga)