Modifiche al programma di stampa documenti di vendita
git-svn-id: svn://10.65.10.50/trunk@1913 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
1a8a90a0e8
commit
9932a66b8c
148
ve/ve1100.cpp
148
ve/ve1100.cpp
@ -69,7 +69,7 @@ public:
|
||||
TDocVen_Form::TDocVen_Form(const char* name, TRelation &rel): TForm(name), _firmrel(rel) {}
|
||||
|
||||
bool TDocVen_Form::validate(TForm_item &cf, TToken_string &s) {
|
||||
const TString16 code(s.get(0)); // prende il primo parametro, il codice del messaggio
|
||||
const TString code(s.get(0)); // prende il primo parametro, il codice del messaggio
|
||||
|
||||
if (code== "_ISAMREAD") {
|
||||
// lettura generica di un file del database
|
||||
@ -261,8 +261,8 @@ enum behaviour {
|
||||
|
||||
|
||||
class TStampa_Doc_Vendita: public TApplication {
|
||||
TString16 _codnum; // codice di numerazione
|
||||
TString16 _provv; // stampa provvisioria
|
||||
TString _codnum; // codice di numerazione
|
||||
TString _provv; // stampa provvisioria
|
||||
int _anno; // anno della documentazione
|
||||
long _dalnum, _alnum; // estremi di numerazione dei documenti
|
||||
bool _interattivo; // flag che indica se il prog. funziona in interattivo o in batch
|
||||
@ -318,7 +318,8 @@ int TStampa_Doc_Vendita::select() {
|
||||
if (m.run() == K_ENTER) {
|
||||
_codnum= m.get(F_CODNUM); // lettura dei dati dalla maschera
|
||||
_anno= m.get_int(F_ANNO);
|
||||
_provv= (m.get_bool(F_PROVV))?("P"):("D");
|
||||
//_provv= (m.get_bool(F_PROVV))?("P"):("D");
|
||||
_provv = m.get(F_PROVV);
|
||||
_dalnum= m.get_long(F_DA_NDOC);
|
||||
_alnum= m.get_long(F_A_NDOC);
|
||||
return 1;
|
||||
@ -332,80 +333,91 @@ bool TStampa_Doc_Vendita::menu(MENU_TAG) { // procedura di dispatch dei menu
|
||||
}
|
||||
|
||||
void TStampa_Doc_Vendita::print() {
|
||||
_definitiva= query_final_print(); // legge il flag di stampa definitiva
|
||||
printer().open(); // apre la stampante
|
||||
TString nomeform, profilo; // istanzia le stringhe per il nome del form di stampa e del profilo di configurazione
|
||||
TString modulo, modulo_prec; // istanzia le stringhe per l'inseguimento del modulo di carta
|
||||
TToken_string stati; // token string con gli stati validi dei documenti
|
||||
TTable tip("TIP"); // istanzia la tabella dei tipi di documento per i profili
|
||||
TRelation rel(LF_DOC); // istanzia la relazione sul file principale
|
||||
TLocalisamfile &doc= rel.lfile(); // prende il riferimento al file principale
|
||||
TCursor cur(&rel); // crea il cursore principale dalla relazione
|
||||
doc.put("CODNUM", _codnum); // compone la chiave per il record di inizio cursore
|
||||
_definitiva= query_final_print(); // legge il flag di stampa definitiva
|
||||
printer().open(); // apre la stampante
|
||||
TFilename nomeform, profilo; // istanzia le stringhe per il nome del form di stampa e del profilo di configurazione
|
||||
TString modulo, modulo_prec; // istanzia le stringhe per l'inseguimento del modulo di carta
|
||||
//TToken_string stati("",','); // token string con gli stati validi dei documenti
|
||||
TTable tip("%TIP"); // istanzia la tabella dei tipi di documento per i profili
|
||||
TRelation rel(LF_DOC); // istanzia la relazione sul file principale
|
||||
TLocalisamfile &doc= rel.lfile(); // prende il riferimento al file principale
|
||||
TCursor cur(&rel); // crea il cursore principale dalla relazione
|
||||
doc.put("CODNUM", _codnum); // compone la chiave per il record di inizio cursore
|
||||
doc.put("ANNO", _anno);
|
||||
doc.put("PROVV", _provv);
|
||||
doc.put("NDOC", _dalnum);
|
||||
doc.read(); // posiziona il file sul record
|
||||
TRectype darec= doc.curr(); // copia il record di inizio cursore
|
||||
doc.put("NDOC", _alnum); // compone la chiave per il record di fine cursore
|
||||
doc.read(); // posiziona il file sul record
|
||||
TRectype arec= doc.curr(); // copia il record di fine cursore
|
||||
cur.setregion(darec, arec); // imposta il filtro sul cursore di stampa
|
||||
for (int i= 0; i<cur.items(); i++) { // ciclo sugli elementi del cursore di stampa
|
||||
cur= i; // posiziona il cursore
|
||||
doc.read(); // posiziona il file sul record
|
||||
TRectype darec= doc.curr(); // copia il record di inizio cursore
|
||||
doc.put("NDOC", _alnum); // compone la chiave per il record di fine cursore
|
||||
doc.read(); // posiziona il file sul record
|
||||
TRectype arec= doc.curr(); // copia il record di fine cursore
|
||||
cur.setregion(darec, arec); // imposta il filtro sul cursore di stampa
|
||||
for (int i= 0; i<cur.items(); i++)// ciclo sugli elementi del cursore di stampa
|
||||
{
|
||||
cur= i; // posiziona il cursore
|
||||
tip.put("CODTAB", doc.get("TIPODOC")); // posiziona la tabella dei tipi di documento
|
||||
if (tip.read()==NOERR) { // legge la tabella
|
||||
nomeform= tip.get("S5"); // legge il nome del form di stampa
|
||||
profilo= tip.get("S4"); // legge il nome del profilo di configurazione
|
||||
int err=tip.read();
|
||||
if (err==NOERR) // legge la tabella
|
||||
{
|
||||
nomeform= tip.get("S5"); // legge il nome del form di stampa
|
||||
profilo= tip.get("S4"); // legge il nome del profilo di configurazione
|
||||
profilo.ext("ini");
|
||||
TConfig config(profilo, "STAMPA"); // apre il file di configurazione del profilo
|
||||
stati= config.get("STATIVALIDI"); // legge gli stati validi di questo tipo di documento
|
||||
if (_definitiva && (stati.get_pos(doc.get("STATO"))== -1)) { // se lo stato del doc. corrente non è valido...
|
||||
TToken_string stati ((const char*)config.get("STATIVALIDI"), ','); // legge gli stati validi di questo tipo di documento
|
||||
if (_definitiva && (stati.get_pos(doc.get("STATO"))== -1)) // se lo stato del doc. corrente non è valido...
|
||||
{
|
||||
if (_interattivo) error_box("Non è possibile stampare un documento con stato non valido"); // ...viene mostrato un messaggio (solo in modo interattivo)...
|
||||
break; // ...e la stampa viene interrotta
|
||||
}
|
||||
behaviour whattodo= go; // istanzia la variabile di comportamento
|
||||
TDocVen_Form f(nomeform, *_firmrel); // istanzia il form
|
||||
// !! modulo= f.get_module_code(); // legge dal form il codice del modulo di carta per la stampa
|
||||
if (modulo_prec.empty()) modulo_prec= modulo; // se siamo al primo passaggio la variabile di modulo precedente viene riempita
|
||||
if (modulo != modulo_prec) whattodo= on_module_change(modulo); // se il modulo è cambiato dalla stampa precedente interroga la funzione per sapere che comportamento tenere
|
||||
if (whattodo==cancel) // se non si può procedere la stampa viene interrotta
|
||||
break;
|
||||
else if (whattodo==go) // altrimenti prosegue
|
||||
{
|
||||
TCursor &fcur= *(f.cursor()); // ricava il riferimento al cursore originale del form
|
||||
darec= arec= doc.curr(); // prepara i record per il filtro
|
||||
fcur.setregion(darec, arec); // setta il filtro sul form (solo il record corrente)
|
||||
f.print(0,0); // stampa il record corrente del form
|
||||
if (_definitiva && (numerazione_definitiva(doc) != NOERR)) // se la stampa è definitiva viene lanciata la procedura di rinumerazione
|
||||
{
|
||||
if (_interattivo) error_box("Non è possibile completare la procedura di numerazione definitiva dei documenti");
|
||||
break;
|
||||
}
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
// error_box("Il documento corrente non può essere trovato nella tabella dei tipi di documento");
|
||||
error_box ("Errore %d leggendo da %TIP.", err);
|
||||
break;
|
||||
}
|
||||
}
|
||||
printer().close(); // chiude la stampante
|
||||
}
|
||||
behaviour whattodo= go; // istanzia la variabile di comportamento
|
||||
TDocVen_Form f(nomeform, *_firmrel); // istanzia il form
|
||||
// !! modulo= f.get_module_code(); // legge dal form il codice del modulo di carta per la stampa
|
||||
if (modulo_prec.empty()) modulo_prec= modulo; // se siamo al primo passaggio la variabile di modulo precedente viene riempita
|
||||
if (modulo != modulo_prec) whattodo= on_module_change(modulo); // se il modulo è cambiato dalla stampa precedente interroga la funzione per sapere che comportamento tenere
|
||||
if (whattodo==cancel) break; // se non si può procedere la stampa viene interrotta
|
||||
else if (whattodo==go) { // altrimenti prosegue
|
||||
TCursor &fcur= *(f.cursor()); // ricava il riferimento al cursore originale del form
|
||||
darec= arec= doc.curr(); // prepara i record per il filtro
|
||||
fcur.setregion(darec, arec); // setta il filtro sul form (solo il record corrente)
|
||||
f.print(-1); // stampa il record corrente del form
|
||||
if (_definitiva && (numerazione_definitiva(doc) != NOERR)) { // se la stampa è definitiva viene lanciata la procedura di rinumerazione
|
||||
if (_interattivo) error_box("Non è possibile completare la procedura di numerazione definitiva dei documenti");
|
||||
break;
|
||||
}
|
||||
|
||||
behaviour TStampa_Doc_Vendita::on_module_change(const TString &modulo) {
|
||||
// !! qui va messa la reazione al cambio di modulo
|
||||
// !! - se non si è in interattivo bisogna, immagino, ritornare sempre "skip"
|
||||
// !! - se si è in interattivo bisogna chiedere all'utente il da farsi, eventualmente
|
||||
// !! fornendo il nome esteso del modulo da inserire facendo una seek sulla tabella
|
||||
return skip;
|
||||
}
|
||||
} else {
|
||||
error_box("Il documento corrente non può essere trovato nella tabella dei tipi di documento");
|
||||
break;
|
||||
}
|
||||
}
|
||||
printer().close(); // chiude la stampante
|
||||
}
|
||||
|
||||
behaviour TStampa_Doc_Vendita::on_module_change(const TString &modulo) {
|
||||
// !! qui va messa la reazione al cambio di modulo
|
||||
// !! - se non si è in interattivo bisogna, immagino, ritornare sempre "skip"
|
||||
// !! - se si è in interattivo bisogna chiedere all'utente il da farsi, eventualmente
|
||||
// !! fornendo il nome esteso del modulo da inserire facendo una seek sulla tabella
|
||||
return skip;
|
||||
}
|
||||
|
||||
bool TStampa_Doc_Vendita::query_final_print() {
|
||||
if (_interattivo) { // se siamo in interattivo viene richiesto all'utente se la stampa è definitiva o meno
|
||||
if (yesno_box("E' una stampa definitiva?")) return TRUE;
|
||||
else return FALSE;
|
||||
} else return (strcmp(argv(7), "D")==0); // altrimenti lo legge dalla linea di comando
|
||||
}
|
||||
bool TStampa_Doc_Vendita::query_final_print() {
|
||||
if (_interattivo) { // se siamo in interattivo viene richiesto all'utente se la stampa è definitiva o meno
|
||||
if (yesno_box("E' una stampa definitiva?")) return TRUE;
|
||||
else return FALSE;
|
||||
} else return (strcmp(argv(7), "D")==0); // altrimenti lo legge dalla linea di comando
|
||||
}
|
||||
|
||||
|
||||
|
||||
int ve1100(int argc, char* argv[]) {
|
||||
TStampa_Doc_Vendita a;
|
||||
a.run(argc, argv, "Stampa documenti di vendita");
|
||||
return (0);
|
||||
}
|
||||
int ve1100(int argc, char* argv[]) {
|
||||
TStampa_Doc_Vendita a;
|
||||
a.run(argc, argv, "Stampa documenti di vendita");
|
||||
return (0);
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user