Migliore esportabilità Excel stampe saldaconto
git-svn-id: svn://10.65.10.50/branches/R_10_00@22957 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
f2e631a62f
commit
3e52722b14
20
sc/pec.frm
20
sc/pec.frm
@ -50,14 +50,14 @@ SECTION HEADER ODD 12
|
||||
BEGIN
|
||||
KEY "Codice cliente/fornitore"
|
||||
PROMPT 2 2 ""
|
||||
FIELD CODCF
|
||||
FIELD 20.CODCF
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Ragione sociale"
|
||||
PROMPT 8 2 ""
|
||||
FIELD RAGSOC
|
||||
FIELD 20.RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 5
|
||||
@ -66,7 +66,7 @@ SECTION HEADER ODD 12
|
||||
PROMPT 2 3 ""
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,7
|
||||
FIELD INDCF
|
||||
FIELD 20.INDCF
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
@ -75,7 +75,7 @@ SECTION HEADER ODD 12
|
||||
PROMPT 52 3 ""
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,7
|
||||
FIELD CIVCF
|
||||
FIELD 20.CIVCF
|
||||
END
|
||||
|
||||
STRINGA 7
|
||||
@ -88,14 +88,14 @@ SECTION HEADER ODD 12
|
||||
BEGIN
|
||||
KEY "C.A.P."
|
||||
PROMPT 2 4 ""
|
||||
FIELD CAPCF
|
||||
FIELD 20.CAPCF
|
||||
END
|
||||
|
||||
STRINGA 9
|
||||
BEGIN
|
||||
KEY "Localita'"
|
||||
PROMPT 26 4 ""
|
||||
FIELD LOCALITACF
|
||||
FIELD 20.LOCALITACF
|
||||
END
|
||||
|
||||
STRINGA 10
|
||||
@ -128,7 +128,7 @@ SECTION HEADER ODD 12
|
||||
PROMPT 2 6 "Telefono "
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,15
|
||||
FIELD PTEL
|
||||
FIELD 20.PTEL
|
||||
END
|
||||
|
||||
STRINGA 14
|
||||
@ -137,13 +137,13 @@ SECTION HEADER ODD 12
|
||||
PROMPT 24 6 "/ "
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,15
|
||||
FIELD TEL
|
||||
FIELD 20.TEL
|
||||
END
|
||||
|
||||
STRINGA 15
|
||||
BEGIN
|
||||
KEY "Telefono completo"
|
||||
PROMPT 2 6 "Telefono "
|
||||
KEY "Telefono completo"
|
||||
PROMPT 2 6 "Telefono "
|
||||
END
|
||||
|
||||
STRINGA 101
|
||||
|
@ -1323,7 +1323,42 @@ void TEC_form::init_header(const TMask& m)
|
||||
if (!rform.empty())
|
||||
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');
|
||||
if (fink.fields() > 0)
|
||||
fink.update(); // Setta il backgroud di stampa
|
||||
|
@ -1223,7 +1223,7 @@ void TStampaScadenzario::print_header()
|
||||
TString rw(201);
|
||||
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);
|
||||
|
||||
if (_tipost==fornitori)
|
||||
@ -1260,7 +1260,7 @@ void TStampaScadenzario::print_header()
|
||||
case altri: // Piano dei conti
|
||||
{
|
||||
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);
|
||||
set_header(soh++,FR("@79g** SCADENZARIO **"));
|
||||
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,"@198g@1s",FLD(LF_SCADENZE,SCAD_BLOCCATA));
|
||||
nriga++;
|
||||
set_row(nriga,"@31g#t",&_datadoc);
|
||||
set_row(nriga,"@40g#t",&_numdoc);
|
||||
set_row(nriga,"@49g#-5t",&_protiva);
|
||||
set_row(nriga,"@30g#t",&_datadoc);
|
||||
set_row(nriga,"@38g#8t",&_numdoc);
|
||||
set_row(nriga,"@47g#-5t",&_protiva);
|
||||
}
|
||||
|
||||
void TStampaScadenzario::set_page_pcon(int nriga)
|
||||
|
Loading…
x
Reference in New Issue
Block a user