Patch level : 12.0 1059
Files correlati : f135.dir f135.trr in0.exe in0100a.msk in0100a.rep
in0100b.msk in0100b.rep in0100c.rep in0600a.msk
in0700a.msk inmenu.men
rimossi : in0100a.frm in0100b.frm in0100c.frm in0100d.frm
Commento :
Aggiornamento intra
Interno :
COntrollare il formato delle stampe
This commit is contained in:
parent
30e1e22190
commit
749d895c09
@ -1,3 +1,3 @@
|
||||
135
|
||||
0
|
||||
$rieprett|0|0|185|0|Riepiloghi e rettifiche INTRA|||
|
||||
$rieprett|8|8|186|0|Riepiloghi e rettifiche INTRA|||
|
||||
|
||||
@ -1,25 +1,26 @@
|
||||
135
|
||||
32
|
||||
33
|
||||
SEZIONE|2|1|0|<1> Beni, <2> Rettifiche beni, <3> Servizi, <4> Rettifiche servizi
|
||||
TIPO|1|1|0|<A>cquisti o <C>essioni , rettifiche <B> acquisti o <D> cessioni
|
||||
TIPO|1|1|0|<A>cquisti o <C>essioni
|
||||
ANNO|2|4|0|Anno
|
||||
PERIODO|9|2|0|Periodo (Mese[1,12] / Trimestre[1,4] / Anno [1.,1])
|
||||
NUMRIG|3|7|0|Numero riga
|
||||
TIPOCF|1|1|0|Tipo cliente/fornitore
|
||||
STATO|1|2|0|Codice ISO dello Stato CEE
|
||||
PIVA|1|13|0|Partita IVA Cliente/Fornitore
|
||||
NATURA|1|1|0|Natura della transazione (Benii)
|
||||
NOMENCL|1|8|0|Nomenclatura combinata (Benii)
|
||||
CONSEGNA|1|3|0|Condizioni di consegna (Benii)
|
||||
TRASPORTO|2|1|0|Tipo di trasporto [1,9] (Benii)
|
||||
PAESE|1|2|0|Paese di destinazione/provenienza (Benii)
|
||||
PAESEORIG|1|2|0|Paese d'origine (solo Acquisti) (Benii)
|
||||
PROV|1|2|0|Provincia d'origine/destinazione (Benii)
|
||||
NATURA|1|1|0|Natura della transazione (Beni)
|
||||
NOMENCL|1|8|0|Nomenclatura combinata (Beni)
|
||||
CONSEGNA|1|3|0|Condizioni di consegna (Beni)
|
||||
TRASPORTO|2|1|0|Tipo di trasporto [1,9] (Beni)
|
||||
PAESE|1|2|0|Paese di destinazione/provenienza (Beni)
|
||||
PAESEORIG|1|2|0|Paese d'origine (solo Acquisti) (Beni)
|
||||
PROV|1|2|0|Provincia d'origine/destinazione (Beni)
|
||||
AMMLIRE|4|18|2|Ammontare in lire
|
||||
AMMVALUTA|4|18|3|Ammontare in valuta (Benii)
|
||||
CODVAL|1|3|0|Codice Valuta (Benii)
|
||||
VALSTAT|4|18|2|Valore statistico (Benii)
|
||||
MASSAKG|4|18|5|Massa in Kilogrammi (Benii)
|
||||
MASSAUMS|4|18|5|Massa in unita' supplementare (Benii)
|
||||
AMMVALUTA|4|18|3|Ammontare in valuta (Beni)
|
||||
CODVAL|1|3|0|Codice Valuta (Beni)
|
||||
VALSTAT|4|18|2|Valore statistico (Beni)
|
||||
MASSAKG|4|18|5|Massa in Kilogrammi (Beni)
|
||||
MASSAUMS|4|18|5|Massa in unita' supplementare (Beni)
|
||||
ANNORETT|6|4|0|Anno rettificato
|
||||
PERETT|9|2|0|Periodo rettificato
|
||||
NUMRETT|3|7|0|Riga rettificata
|
||||
|
||||
@ -1,429 +1,228 @@
|
||||
// Programma di stampa riepiloghi INTRA comunitari
|
||||
// Programma di stampe INTRA
|
||||
//
|
||||
// A fundament of righteous men, a barrow of ideals, the carriage
|
||||
// of misjustice crushes all beneath its weels
|
||||
//
|
||||
#include <applicat.h>
|
||||
#include <printer.h>
|
||||
#include <recarray.h>
|
||||
#include <form.h>
|
||||
#include <automask.h>
|
||||
#include <config.h>
|
||||
#include <defmask.h>
|
||||
#include <execp.h>
|
||||
#include <prefix.h>
|
||||
#include <reprint.h>
|
||||
#include <tabutil.h>
|
||||
#include <utility.h>
|
||||
#include <intra.h>
|
||||
#include <rintra.h>
|
||||
#include <riepintra.h>
|
||||
|
||||
#include <nditte.h>
|
||||
|
||||
#include "in0.h"
|
||||
#include "in0100a.h"
|
||||
#include "in0100b.h"
|
||||
#include "inlib01.h"
|
||||
|
||||
///////////////////////////////////////////////////////////
|
||||
// TStampaIntra_form
|
||||
// TStampa_INTRA
|
||||
///////////////////////////////////////////////////////////
|
||||
class TStampaIntra_form : public TForm
|
||||
|
||||
class TStampa_INTRA : public TSkeleton_application
|
||||
{
|
||||
TRecord_array *_riepiloghi;
|
||||
TRecord_array *_rettifiche;
|
||||
TString16 _tipo, _frequenza, _periodo, _anno;
|
||||
int _totrow1, _totrow2, _totpag1, _totpag2; // Righe e pagine totali per sezioni...
|
||||
int _pageno1, _pageno2, _index1, _index2; // Numero di pagina corrente ed indice di accesso ai TRecord_array
|
||||
real _tot1, _tot2; // Totale ammontare sezione 1 e 2
|
||||
real _riportoprec1, _riportoprec2; // Riporto pagina prec. per sezioni 1 e 2
|
||||
real _totaleprog1, _totaleprog2; // Totale progressivo per pagina, sezioni 1 e 2
|
||||
|
||||
int _decimals;
|
||||
bool _solofronte;
|
||||
|
||||
static bool anno_handler(TMask_field& f, KEY k);
|
||||
protected:
|
||||
void print_page(const pagetype p);
|
||||
const bool good() const;
|
||||
virtual bool validate(TForm_item& fld, TToken_string& val);
|
||||
|
||||
real amm_euro(const TRectype& rec) const; // Ammontare arrotondato
|
||||
|
||||
public:
|
||||
void print();
|
||||
TStampaIntra_form (const char* name, char t, char f, int p, int a, bool sf);
|
||||
virtual ~TStampaIntra_form ();
|
||||
virtual void main_loop();
|
||||
};
|
||||
|
||||
bool TStampaIntra_form::validate(TForm_item& fld, TToken_string& val)
|
||||
{
|
||||
const TString code(val.get(0)); // prende il primo parametro, il codice del messaggio
|
||||
|
||||
if (code== "_IMP")
|
||||
static TVariant* str2var(const char* str)
|
||||
{
|
||||
TVariant* var = NULL;
|
||||
if (str && *str)
|
||||
{
|
||||
real num = fld.get();
|
||||
num.round(_decimals);
|
||||
fld.set(num.string());
|
||||
return TRUE;
|
||||
const int len = strlen(str);
|
||||
if (len <= 8 && real::is_natural(str))
|
||||
var = new TVariant(atol(str)); else
|
||||
if (len <= 15 && real::is_real(str))
|
||||
var = new TVariant(real(str));
|
||||
else
|
||||
var = new TVariant(str);
|
||||
}
|
||||
else
|
||||
if (code== "_ROUND")
|
||||
var = new TVariant;
|
||||
return var;
|
||||
}
|
||||
|
||||
bool TStampa_INTRA::anno_handler(TMask_field& f, KEY k)
|
||||
{
|
||||
static TIntra_frequency freq;
|
||||
|
||||
if (f.initial_check(k) || f.running_check(k))
|
||||
{
|
||||
TMask & m = f.mask();
|
||||
|
||||
m.hide(F_PERIODO_M);
|
||||
m.hide(F_PERIODO_T);
|
||||
m.hide(F_PERIODO_A);
|
||||
switch (freq.frequenza(f.mask().get_int(F_ANNO), f.mask().get(F_TIPO)[0]))
|
||||
{
|
||||
real num(fld.get());
|
||||
const int ndec = val.get_int();
|
||||
num.round(ndec);
|
||||
fld.set(num.string());
|
||||
return TRUE;
|
||||
case 'M' :
|
||||
m.show(F_PERIODO_M);
|
||||
break;
|
||||
case 'T':
|
||||
m.show(F_PERIODO_T);
|
||||
break;
|
||||
case 'A':
|
||||
m.show(F_PERIODO_A);
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
||||
return TForm::validate(fld, val);
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
TStampaIntra_form::TStampaIntra_form(const char* name, char t, char f, int p, int a, bool sf) : TForm(name)
|
||||
void TStampa_INTRA::main_loop()
|
||||
{
|
||||
_tipo << t;
|
||||
_frequenza << f;
|
||||
_periodo << p;
|
||||
_anno << a;
|
||||
_solofronte = sf;
|
||||
|
||||
TRectype dep(cursor()->file(LF_RIEPRETT).curr());
|
||||
dep.zero();
|
||||
dep.put("TIPO", t); dep.put("ANNO", a);
|
||||
dep.put("PERIODO", p);
|
||||
_riepiloghi = new TRecord_array(dep, "NUMRIG");
|
||||
t++;
|
||||
dep.put("TIPO", t);
|
||||
_rettifiche = new TRecord_array(dep, "NUMRIG");
|
||||
|
||||
_decimals = is_euro_value(NULL) ? 0 : -3; // Arrotonda all'Euro o alle 1000 Lire
|
||||
}
|
||||
const TString repname = argv(2);
|
||||
TMask m(repname);
|
||||
if (repname == "in0100b")
|
||||
{
|
||||
m.set_handler(F_ANNO, anno_handler);
|
||||
m.set_handler(F_TIPO, anno_handler);
|
||||
}
|
||||
while(m.run() == K_ENTER)
|
||||
{
|
||||
TProgramReport report;
|
||||
TReport_book book;
|
||||
|
||||
TStampaIntra_form::~TStampaIntra_form()
|
||||
{
|
||||
if (_riepiloghi)
|
||||
delete _riepiloghi;
|
||||
if (_rettifiche)
|
||||
delete _rettifiche;
|
||||
}
|
||||
|
||||
const bool TStampaIntra_form::good() const
|
||||
{
|
||||
return _index1 <= _riepiloghi->rows() || _index2 <= _rettifiche->rows();
|
||||
}
|
||||
|
||||
// Ricava l'ammontare in Euro arrotondato da un record
|
||||
real TStampaIntra_form::amm_euro(const TRectype& rec) const
|
||||
{
|
||||
real amm = rec.get("AMMLIRE"); // Nome obsoleto
|
||||
amm.round(_decimals);
|
||||
return amm;
|
||||
}
|
||||
|
||||
void TStampaIntra_form::print_page(const pagetype p)
|
||||
{
|
||||
TString16 ws;
|
||||
char secs[] = { "HBF" };
|
||||
TPrint_section* ps;
|
||||
TPrinter& pr = printer();
|
||||
|
||||
for (int sc = 0; sc < 3; sc++)
|
||||
if ((ps = exist(secs[sc], p, FALSE)) != NULL)
|
||||
report.load(repname);
|
||||
if (repname == "in0100a")
|
||||
{
|
||||
const word r = ps->height();
|
||||
int iterations = 1;
|
||||
|
||||
if (secs[sc] == 'B')
|
||||
switch(p)
|
||||
{
|
||||
case odd_page:
|
||||
iterations = 10;
|
||||
break;
|
||||
case even_page:
|
||||
iterations = 7;
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
||||
const bool is_odd_page = p == odd_page;
|
||||
const bool not_first = p != first_page;
|
||||
int& index = is_odd_page ? _index1 : _index2;
|
||||
int& max = is_odd_page ? _totrow1 : _totrow2;
|
||||
// Per le testate ed i footers 1 singola iterazione, per i Body (solo ODD ed EVEN)
|
||||
// esegue tante iterazioni quante sono le righe per riepiloghi o rettifiche
|
||||
for (int k = 0; k < iterations; k++)
|
||||
TString query = report.recordset()->query_text();
|
||||
|
||||
|
||||
if (m.get_int(F_ORDER) == 1)
|
||||
{
|
||||
ps->reset();
|
||||
switch (secs[sc])
|
||||
const long fromnreg = m.get_long(F_FROMNUM);
|
||||
const long tonreg = m.get_long(F_TONUM);
|
||||
|
||||
if (fromnreg > 0L)
|
||||
query << "\nFROM " << RINTRA_NUMREG << "=" << fromnreg;
|
||||
if (tonreg > 0L)
|
||||
query << "\nTO " << RINTRA_NUMREG << "=" << tonreg;
|
||||
}
|
||||
else
|
||||
{
|
||||
const TDate fromdate = m.get_date(F_FROMDATE);
|
||||
const TDate todate = m.get_date(F_TODATE);
|
||||
const int pos = query.find("\n");
|
||||
|
||||
if (pos > 0L)
|
||||
{
|
||||
case 'H': // Testate...
|
||||
{
|
||||
if (p == first_page || (not_first && index <= max))
|
||||
{
|
||||
if (_frequenza[0] == 'M')
|
||||
ps->find_field(1).set(_periodo); else
|
||||
if (_frequenza[0] == 'T')
|
||||
ps->find_field(2).set(_periodo);
|
||||
ps->find_field(3).set(_anno);
|
||||
if (p == first_page)
|
||||
ps->find_field(4).set(_frequenza);
|
||||
ps->update();
|
||||
}
|
||||
}
|
||||
break;
|
||||
case 'F': // Footers...
|
||||
if (p == first_page)
|
||||
{
|
||||
ws.format("%d", _totpag1);
|
||||
ps->find_field(1).set(ws);
|
||||
ws.format("%d", _totrow1);
|
||||
ps->find_field(2).set(ws);
|
||||
ps->find_field(3).set(_tot1.string());
|
||||
ws.format("%d", _totpag2);
|
||||
ps->find_field(4).set(ws);
|
||||
ws.format("%d", _totrow2);
|
||||
ps->find_field(5).set(ws);
|
||||
ws = _tot2.string();
|
||||
ps->find_field(6).set(ws);
|
||||
TString str;
|
||||
const TString s(query.mid(pos));
|
||||
|
||||
ps->update();
|
||||
}
|
||||
else // Footers ODD/EVEN
|
||||
{
|
||||
real& rrip = is_odd_page ? _riportoprec1 : _riportoprec2;
|
||||
real& rtot = is_odd_page ? _totaleprog1 : _totaleprog2;
|
||||
int& pgn = is_odd_page ? _pageno1 : _pageno2;
|
||||
int& totpgn = is_odd_page ? _totpag1 : _totpag2;
|
||||
|
||||
if (pgn <= totpgn)
|
||||
{
|
||||
ws = rrip.string();
|
||||
if (!is_odd_page) // Gestione segno riporto rettifiche
|
||||
{
|
||||
const bool neg = ws[0] == '-';
|
||||
ps->find_field(4).set(rrip.is_zero() ? "" : (neg ? "-" : "+"));
|
||||
if (neg)
|
||||
ws.ltrim(1);
|
||||
}
|
||||
ps->find_field(1).set(ws);
|
||||
|
||||
ws = rtot.string();
|
||||
if (!is_odd_page) // Gestione segno totale rettifiche
|
||||
{
|
||||
const bool neg = ws[0] == '-';
|
||||
ps->find_field(7).set(rtot.is_zero() ? "" : (neg ? "-" : "+"));
|
||||
if (neg)
|
||||
ws.ltrim(1);
|
||||
}
|
||||
ps->find_field(2).set(ws);
|
||||
|
||||
ws.format("%d", pgn);
|
||||
ps->find_field(3).set(ws);
|
||||
pgn++;
|
||||
ps->update();
|
||||
}
|
||||
rrip = rtot;
|
||||
}
|
||||
break;
|
||||
case 'B': // Body! CDB Infame donato per compiacer alle virtu' delle giovani signore/signorine
|
||||
{ // Spezza il Totem: riunisce la piu' probabile delle ipotesi in un inutile compendio di
|
||||
// miserabili ed incomode tentazioni.
|
||||
if (not_first)
|
||||
{
|
||||
TRecord_array* ra = is_odd_page ? _riepiloghi : _rettifiche;
|
||||
if (index <= max)
|
||||
{
|
||||
const TRectype& rec = ra->row(index);
|
||||
relation()->curr(LF_RIEPRETT) = rec;
|
||||
|
||||
real ammontare = amm_euro(rec);
|
||||
if (!is_odd_page) // Rettifiche
|
||||
{
|
||||
const TString8 mese = _frequenza[0] == 'M' ? rec.get("PERETT") : "0";
|
||||
const TString8 trim = _frequenza[0] == 'T' ? rec.get("PERETT") : "0";
|
||||
ps->find_field(2).set(mese);
|
||||
ps->find_field(3).set(trim);
|
||||
|
||||
// Controlla il segno delle rettifiche
|
||||
if (rec.get_char("SEGNORETT") == '-')
|
||||
ammontare = -ammontare;
|
||||
}
|
||||
|
||||
// Incrementa progressivi
|
||||
real& rtot = is_odd_page ? _totaleprog1 : _totaleprog2;
|
||||
rtot += ammontare;
|
||||
|
||||
index++;
|
||||
ps->update();
|
||||
}
|
||||
}
|
||||
else
|
||||
ps->update();
|
||||
}
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
TISAM_recordset::add_between_date_filter(str, FIELD_NAME(LF_INTRA, INTRA_DATAREG), fromdate, todate);
|
||||
|
||||
query = query.left(pos);
|
||||
if (str.full())
|
||||
query << " SELECT " << str;
|
||||
query << "\nBY " << FIELD_NAME(LF_INTRA, INTRA_DATAREG) << ' ' << RINTRA_NUMREG << s;
|
||||
}
|
||||
|
||||
for (word j = 0; j < r; j++)
|
||||
}
|
||||
if (query != report.recordset()->query_text())
|
||||
report.set_recordset(new TISAM_recordset(query));
|
||||
book.add(report);
|
||||
}
|
||||
else
|
||||
if (repname == "in0100b")
|
||||
{
|
||||
TString query = report.recordset()->query_text();
|
||||
TString region;
|
||||
TString select;
|
||||
|
||||
const int selezione = m.get_int(F_SELECT);
|
||||
const int anno = m.get_long(F_ANNO);
|
||||
const TString4 tipo = m.get(F_TIPO);
|
||||
int periodo = 0;
|
||||
|
||||
TIntra_frequency freq;
|
||||
|
||||
switch (freq.frequenza(anno,tipo[0]))
|
||||
{
|
||||
TPrintrow& row = ps->row(j);
|
||||
pr.print(row);
|
||||
case 'M':
|
||||
periodo = m.get_int(F_PERIODO_M);
|
||||
break;
|
||||
case 'T':
|
||||
periodo = m.get_int(F_PERIODO_T);
|
||||
break;
|
||||
case 'A':
|
||||
periodo = m.get_int(F_PERIODO_A);
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
if (tipo.full())
|
||||
select << "&&(" << RIEPINTRA_TIPO << "==\"" << tipo << "\")";
|
||||
if (anno > 0)
|
||||
{
|
||||
region << "\nFROM " << RIEPINTRA_ANNO << "=" << anno;
|
||||
if (periodo > 0)
|
||||
region << " " << RIEPINTRA_PERIODO << "=" << periodo;
|
||||
region << "\nTO " << RIEPINTRA_ANNO << "=" << anno;
|
||||
if (periodo > 0)
|
||||
region << " " << RIEPINTRA_PERIODO << "=" << periodo;
|
||||
}
|
||||
if (selezione < 2)
|
||||
{
|
||||
if (select.full())
|
||||
{
|
||||
const int pos = query.find("\n");
|
||||
|
||||
if (pos > 0L)
|
||||
{
|
||||
const TString s(query.mid(pos));
|
||||
|
||||
query = query.left(pos);
|
||||
query << select << s;
|
||||
}
|
||||
}
|
||||
if (region.full())
|
||||
query << region;
|
||||
if (query != report.recordset()->query_text())
|
||||
report.set_recordset(new TISAM_recordset(query));
|
||||
book.add(report);
|
||||
}
|
||||
if (selezione != 1)
|
||||
{
|
||||
report.load("in0100c");
|
||||
query = report.recordset()->query_text();
|
||||
if (select.full())
|
||||
{
|
||||
const int pos = query.find("\n");
|
||||
|
||||
if (pos > 0L)
|
||||
{
|
||||
const TString s(query.mid(pos));
|
||||
|
||||
query = query.left(pos);
|
||||
query << select << s;
|
||||
}
|
||||
}
|
||||
if (region.full())
|
||||
query << region;
|
||||
if (query != report.recordset()->query_text())
|
||||
report.set_recordset(new TISAM_recordset(query));
|
||||
book.add(report);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// No formfeed is needed since Header + n * Body + Footer = 72;
|
||||
// Where n is the total body size for first_page, 10 for odd_page and 7 for even_page
|
||||
}
|
||||
if (book.pages() > 0)
|
||||
book.print_or_preview();
|
||||
|
||||
void TStampaIntra_form::print()
|
||||
{
|
||||
TPrinter& pr = printer();
|
||||
|
||||
// Calcolo degli ammontare complessivi, totale pagine e righe di dettaglio
|
||||
// per sezione
|
||||
|
||||
_totrow1 = _riepiloghi->rows();
|
||||
_totrow2 = _rettifiche->rows();
|
||||
_totpag1 = _totrow1 % 10 != 0 ? _totrow1 / 10 + 1 : _totrow1 / 10;
|
||||
_totpag2 = _totrow2 % 7 != 0 ? _totrow2 / 7 + 1 : _totrow2 / 7;
|
||||
_pageno1 = _pageno2 = 1;
|
||||
_index1 = _index2 = 1;
|
||||
|
||||
if (_totrow1 + _totrow2 == 0)
|
||||
{
|
||||
error_box(TR("Non esistono righe di riepilogo o rettifiche da stampare per il periodo selezionato"));
|
||||
return;
|
||||
}
|
||||
int i;
|
||||
for (i = 1; i <= _totrow1; i++)
|
||||
_tot1 += amm_euro(_riepiloghi->row(i));
|
||||
|
||||
for (i = 1; i <= _totrow2; i++)
|
||||
{
|
||||
const TRectype& rec = _rettifiche->row(i);
|
||||
if (rec.get_char("SEGNORETT") == '-')
|
||||
_tot2 -= amm_euro(rec);
|
||||
else
|
||||
_tot2 += amm_euro(rec);
|
||||
}
|
||||
|
||||
//Posiziona la relazione principale (ditta corrente)
|
||||
TLocalisamfile& nditte = relation()->lfile(LF_NDITTE);
|
||||
|
||||
nditte.put(NDT_CODDITTA, prefix().get_codditta());
|
||||
if (relation()->read(_isequal) != NOERR && !yesno_box(TR("Errore nel posizionamento sulla ditta corrente. Continuare?")))
|
||||
return;
|
||||
|
||||
pr.formlen(height(1));
|
||||
pr.open(); // Apriti Sesamo! Granello di nulla... ma assai importante nell'antichita'.
|
||||
|
||||
//Posizionamento
|
||||
if (pr.printtype() == winprinter && pr.is_generic())
|
||||
arrange_form();
|
||||
|
||||
// Ed ecco qui... il Lievito Svi$$ero (sempre per rimanere in tema di Ali' Baba' ed i 40 Kazzoni)
|
||||
bool verygood = good();
|
||||
while (verygood)
|
||||
{
|
||||
for (int pagina = 1; pagina <= 4; pagina++)
|
||||
{
|
||||
switch (pagina)
|
||||
{
|
||||
case 1:
|
||||
print_page(first_page);
|
||||
break;
|
||||
case 2:
|
||||
case 3:
|
||||
print_page(odd_page);
|
||||
break;
|
||||
case 4:
|
||||
print_page(even_page);
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
verygood = good();
|
||||
if (_solofronte) verygood = FALSE;
|
||||
if (!verygood || _solofronte)
|
||||
break;
|
||||
}
|
||||
}
|
||||
// Exhausting all the rest:
|
||||
// I will get, you dear enemy;
|
||||
// ..See that people are underhand when asking: "how are you?"
|
||||
// And so the printer was CLOSED!
|
||||
pr.close(); // Chiuditi Sesamo
|
||||
}
|
||||
|
||||
///////////////////////////////////////////////////////////
|
||||
// TStampaIntra_mask
|
||||
///////////////////////////////////////////////////////////
|
||||
|
||||
class TStampaIntra_mask : public TIntra_mask
|
||||
{
|
||||
|
||||
protected:
|
||||
virtual short type_field() const { return R_TIPO; }
|
||||
virtual short period_field() const { return R_PERIODO_M; }
|
||||
virtual int anno() const { return get_int(R_ANNO); }
|
||||
virtual bool solofronte() const { return get_bool(R_SOLOFRONTE); }
|
||||
virtual bool descrizioni() const { return get_bool(R_DESCRIZIONI); }
|
||||
|
||||
public:
|
||||
void print();
|
||||
TStampaIntra_mask();
|
||||
virtual ~TStampaIntra_mask() { }
|
||||
};
|
||||
|
||||
TStampaIntra_mask::TStampaIntra_mask()
|
||||
: TIntra_mask("in0100a")
|
||||
{ }
|
||||
|
||||
void TStampaIntra_mask::print()
|
||||
{
|
||||
const int anno_s = anno();
|
||||
TString16 nomeform;
|
||||
if (descrizioni())
|
||||
nomeform = tipo() == 'A' ? "in0100c" : "in0100d";
|
||||
else
|
||||
nomeform = tipo() == 'A' ? "in0100a" : "in0100b";
|
||||
TStampaIntra_form form((const char*) nomeform, tipo(), frequenza(anno_s), periodo(), anno_s, solofronte());
|
||||
form.print();
|
||||
}
|
||||
|
||||
///////////////////////////////////////////////////////////
|
||||
// Applicazione di stampa
|
||||
///////////////////////////////////////////////////////////
|
||||
|
||||
class TStampa_intra : public TSkeleton_application
|
||||
{
|
||||
TStampaIntra_mask* _msk;
|
||||
|
||||
protected:
|
||||
virtual bool create();
|
||||
virtual bool destroy();
|
||||
virtual void main_loop();
|
||||
|
||||
public:
|
||||
TStampa_intra() {};
|
||||
virtual ~TStampa_intra() {};
|
||||
};
|
||||
|
||||
bool TStampa_intra::create()
|
||||
{
|
||||
open_files(LF_TABCOM, LF_TAB, LF_CLIFO, LF_MOV,
|
||||
LF_INTRA, LF_RINTRA, 0);
|
||||
_msk = new TStampaIntra_mask;
|
||||
return TSkeleton_application::create();
|
||||
}
|
||||
|
||||
bool TStampa_intra::destroy()
|
||||
{
|
||||
delete _msk;
|
||||
return TSkeleton_application::destroy();
|
||||
}
|
||||
|
||||
void TStampa_intra::main_loop()
|
||||
{
|
||||
while (_msk->run()!=K_QUIT)
|
||||
_msk->print();
|
||||
}
|
||||
|
||||
int in0100(int argc, char* argv[])
|
||||
{
|
||||
TStampa_intra a;
|
||||
a.run(argc, argv, TR("Stampa Riepiloghi"));
|
||||
TStampa_INTRA a;
|
||||
a.run(argc, argv, TR("Stampa INTRA"));
|
||||
return 0;
|
||||
}
|
||||
|
||||
@ -1,860 +0,0 @@
|
||||
// Form per la stampa riepiloghi INTRA (Acquisti)
|
||||
|
||||
USE 9
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 118 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 118@ ALIAS 213 INTO STATO=="" COM==COMNASC
|
||||
JOIN 13 TO 106@ ALIAS 313 INTO STATO==STATORES COM==COMRES
|
||||
JOIN 13 TO 106@ ALIAS 413 INTO STATO=="" COM==COMRF
|
||||
JOIN 6 TO 9 ALIAS 206 INTO TIPOA==TIPOSOGDEL CODANAGR==CODSOGDEL
|
||||
JOIN 13 TO 206@ ALIAS 513 INTO STATO==STATORES COM==COMRES
|
||||
JOIN 13 TO 206@ ALIAS 613 INTO STATO=="" COM==COMRF
|
||||
JOIN 135 TO 9 INTO ANNO=CODDITTA
|
||||
END
|
||||
|
||||
DESCRIPTION
|
||||
BEGIN
|
||||
END
|
||||
|
||||
|
||||
GENERAL
|
||||
BEGIN
|
||||
OFFSET 0 0
|
||||
CARATTERE "X"
|
||||
INIZIO_POS 2 4
|
||||
FINE_POS 76
|
||||
END
|
||||
|
||||
SECTION HEADER FIRST 16
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 43 14 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 55 14 ""
|
||||
END
|
||||
|
||||
NUMERO 3 5
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 64 14 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4 1
|
||||
BEGIN
|
||||
KEY "Tipo riepilogo"
|
||||
PROMPT 40 16 "" //1 dx
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY FIRST 33
|
||||
|
||||
LISTA 99
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
PROMPT 1 1 ""
|
||||
FIELD TIPOA
|
||||
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
||||
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
||||
END
|
||||
|
||||
STRINGA 1
|
||||
BEGIN
|
||||
KEY "Codice Fiscale"
|
||||
PROMPT 3 7 ""
|
||||
FIELD 106@->COFI
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 7 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "Cognome"
|
||||
PROMPT 3 10 ""
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Nome"
|
||||
PROMPT 43 10 ""
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
DATA 5
|
||||
BEGIN
|
||||
KEY "Data di nascita"
|
||||
PROMPT 4 13 ""
|
||||
FIELD 118@->DATANASC
|
||||
FORMAT "1442-"
|
||||
PICTURE "# #^# #^# #"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
LISTA 6
|
||||
BEGIN
|
||||
KEY "Sesso"
|
||||
PROMPT 19 13 ""
|
||||
FIELD 118@->SESSO
|
||||
ITEM "M|X"
|
||||
ITEM "F| X"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 7 32
|
||||
BEGIN
|
||||
KEY "Comune di nascita"
|
||||
PROMPT 23 13 ""
|
||||
FIELD 213@->DENCOM
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 8 2
|
||||
BEGIN
|
||||
KEY "Provincia di nascita"
|
||||
PROMPT 59 13 ""
|
||||
FIELD 213@->PROVCOM
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 9 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico"
|
||||
PROMPT 64 13 ""
|
||||
FIELD 106@->PTELRF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 10 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico"
|
||||
PROMPT 69 13 ""
|
||||
FIELD 106@->TELRF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
BEGIN
|
||||
KEY "Denominazione o ragione sociale"
|
||||
PROMPT 3 17 ""
|
||||
FIELD 106@->RAGSOC
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 12 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico"
|
||||
PROMPT 64 17 ""
|
||||
FIELD 106@->PTELRF
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 13 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico"
|
||||
PROMPT 69 17 ""
|
||||
FIELD 106@->TELRF
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 14 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza fiscale"
|
||||
PROMPT 52 20 ""
|
||||
FIELD 413@->DENCOM
|
||||
MESSAGE EMPTY SHOW,3@|HIDE,4@
|
||||
MESSAGE SHOW,4@|HIDE,3@
|
||||
END
|
||||
|
||||
STRINGA 15 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza"
|
||||
PROMPT 52 20 ""
|
||||
FIELD 313@->DENCOM
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
BEGIN
|
||||
KEY "Provincia di residenza fiscale"
|
||||
PROMPT 74 20 ""
|
||||
FIELD 413@->PROVCOM
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 17
|
||||
BEGIN
|
||||
KEY "Provincia di residenza"
|
||||
PROMPT 74 20 ""
|
||||
FIELD 313@->PROVCOM
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 18
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->INDRF[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,20
|
||||
END
|
||||
|
||||
STRINGA 19
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza fiscale"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->CIVRF
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,20
|
||||
END
|
||||
|
||||
STRINGA 20 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale+nr. civico"
|
||||
PROMPT 3 20 ""
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 21
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->INDRES[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,23
|
||||
END
|
||||
|
||||
STRINGA 22
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->CIVRES
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,23
|
||||
END
|
||||
|
||||
STRINGA 23 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza+nr. civico"
|
||||
PROMPT 3 20 ""
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 24
|
||||
BEGIN
|
||||
KEY "CAP residenza fiscale"
|
||||
PROMPT 42 20 ""
|
||||
FIELD 106@->CAPRF
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 25
|
||||
BEGIN
|
||||
KEY "CAP residenza"
|
||||
PROMPT 42 20 ""
|
||||
FIELD 106@->CAPRES
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
LISTA 26 1
|
||||
BEGIN
|
||||
KEY "Elenchi presentati in precedenza"
|
||||
PROMPT 7 23 ""
|
||||
ITEM " | "
|
||||
ITEM "X|X"
|
||||
FIELD PRESELEN
|
||||
END
|
||||
|
||||
LISTA 26 1
|
||||
BEGIN
|
||||
KEY "Cessazione attivita'"
|
||||
PROMPT 40 23 ""
|
||||
ITEM " | "
|
||||
ITEM "X|X"
|
||||
FIELD CESSIVA
|
||||
END
|
||||
|
||||
STRINGA 27
|
||||
BEGIN
|
||||
KEY "Partita IVA delegato"
|
||||
PROMPT 11 27 ""
|
||||
FIELD 206@->PAIV
|
||||
END
|
||||
|
||||
STRINGA 28 50
|
||||
BEGIN
|
||||
KEY "Nome e Cognome o Ragione sociale delegato"
|
||||
PROMPT 3 30 ""
|
||||
FIELD 206@->RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 29 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico delegato"
|
||||
PROMPT 64 30 ""
|
||||
FIELD 206@->PTELRF
|
||||
END
|
||||
|
||||
STRINGA 30 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico delegato"
|
||||
PROMPT 69 30 ""
|
||||
FIELD 206@->TELRF
|
||||
END
|
||||
|
||||
STRINGA 31 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza fiscale delegato"
|
||||
PROMPT 52 33 ""
|
||||
FIELD 613@->DENCOM
|
||||
MESSAGE EMPTY SHOW,5@|HIDE,6@
|
||||
MESSAGE SHOW,6@|HIDE,5@
|
||||
END
|
||||
|
||||
STRINGA 32 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza delegato"
|
||||
PROMPT 52 33 ""
|
||||
FIELD 513@->DENCOM
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 33
|
||||
BEGIN
|
||||
KEY "Provincia di residenza fiscale delegato"
|
||||
PROMPT 74 33 ""
|
||||
FIELD 613@->PROVCOM
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 34
|
||||
BEGIN
|
||||
KEY "Provincia di residenza delegato"
|
||||
PROMPT 74 33 ""
|
||||
FIELD 513@->PROVCOM
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 35
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->INDRF[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,37
|
||||
END
|
||||
|
||||
STRINGA 36
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza fiscale delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->CIVRF
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,37
|
||||
END
|
||||
|
||||
STRINGA 37 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale+nr. civico delegato"
|
||||
PROMPT 3 33 ""
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->INDRES[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,40
|
||||
END
|
||||
|
||||
STRINGA 39
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->CIVRES
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,40
|
||||
END
|
||||
|
||||
STRINGA 40 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza+nr. civico delegato"
|
||||
PROMPT 3 33 ""
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 41
|
||||
BEGIN
|
||||
KEY "CAP residenza fiscale delegato"
|
||||
PROMPT 42 33 ""
|
||||
FIELD 206@->CAPRF
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 42
|
||||
BEGIN
|
||||
KEY "CAP residenza delegato"
|
||||
PROMPT 42 33 ""
|
||||
FIELD 206@->CAPRES
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER FIRST 23
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Totale pagine sezione 1"
|
||||
PROMPT 11 6 ""
|
||||
END
|
||||
|
||||
NUMERO 2 5
|
||||
BEGIN
|
||||
KEY "Totale righe dettaglio sezione 1"
|
||||
PROMPT 18 6 ""
|
||||
END
|
||||
|
||||
NUMERO 3 15
|
||||
BEGIN
|
||||
KEY "Ammontare complessivo sezione 1"
|
||||
PROMPT 25 6 ""
|
||||
PICTURE "###.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 4 3
|
||||
BEGIN
|
||||
KEY "Totale pagine sezione 2"
|
||||
PROMPT 49 6 ""
|
||||
END
|
||||
|
||||
NUMERO 5 5
|
||||
BEGIN
|
||||
KEY "Totale righe dettaglio sezione 2"
|
||||
PROMPT 56 6 ""
|
||||
END
|
||||
|
||||
NUMERO 6 15
|
||||
BEGIN
|
||||
KEY "Ammontare complessivo sezione 2"
|
||||
PROMPT 64 6 ""
|
||||
PICTURE "###.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
DATA 8 10
|
||||
BEGIN
|
||||
KEY "Data di stampa"
|
||||
PROMPT 6 10 ""
|
||||
MESSAGE _TODAY
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION HEADER ODD 21
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 16 15 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 29 15 ""
|
||||
END
|
||||
|
||||
NUMERO 3 5
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 37 15 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 15 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY ODD 2
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Progressivo riga"
|
||||
PROMPT 3 1 ""
|
||||
FIELD 135->NUMRIG
|
||||
END
|
||||
|
||||
STRINGA 2 2
|
||||
BEGIN
|
||||
KEY "Stato"
|
||||
PROMPT 7 1 ""
|
||||
FIELD 135->STATO
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 11 1 ""
|
||||
FIELD 135->PIVA
|
||||
END
|
||||
|
||||
NUMERO 4 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in Euro" //++
|
||||
PROMPT 23 1 "" //2 sx
|
||||
FIELD 135->AMMLIRE
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 51 3
|
||||
BEGIN
|
||||
PROMPT 35 1 "" //2 sx
|
||||
FIELD 135->CODVAL
|
||||
FLAGS "H"
|
||||
END
|
||||
|
||||
NUMERO 5 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in valuta"
|
||||
PROMPT 35 1 "" //2 sx
|
||||
FIELD 135->AMMVALUTA
|
||||
MESSAGE _IMP
|
||||
PICTURE "####.###.###"
|
||||
END
|
||||
|
||||
STRINGA 6 1
|
||||
BEGIN
|
||||
KEY "Natura della transazione"
|
||||
PROMPT 49 1 "" //1 sx
|
||||
FIELD 135->NATURA
|
||||
END
|
||||
|
||||
NUMERO 7 4
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata prima parte"
|
||||
PROMPT 53 1 ""
|
||||
FIELD 135->NOMENCL[1,4]
|
||||
PICTURE "@@@@"
|
||||
END
|
||||
|
||||
NUMERO 71 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata seconda parte"
|
||||
PROMPT 57 1 ""
|
||||
FIELD 135->NOMENCL[5,6]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 72 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata terza parte"
|
||||
PROMPT 59 1 ""
|
||||
FIELD 135->NOMENCL[7,8]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 8 9
|
||||
BEGIN
|
||||
KEY "Massa netta in kilogrammi"
|
||||
PROMPT 62 1 ""
|
||||
FIELD 135->MASSAKG
|
||||
PICTURE "#########"
|
||||
MESSAGE _ROUND,0
|
||||
END
|
||||
|
||||
NUMERO 9 9
|
||||
BEGIN
|
||||
KEY "Massa in unita' supplementare"
|
||||
PROMPT 72 1 "" //1 sx
|
||||
FIELD 135->MASSAUMS
|
||||
PICTURE "#########"
|
||||
MESSAGE _ROUND,0
|
||||
END
|
||||
|
||||
NUMERO 10 12
|
||||
BEGIN
|
||||
KEY "Valore statistico"
|
||||
PROMPT 82 1 "" //2 sx
|
||||
FIELD 135->VALSTAT
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 11 1
|
||||
BEGIN
|
||||
KEY "Codice consegna"
|
||||
PROMPT 96 1 "" //1 sx
|
||||
FIELD 135->CONSEGNA[1,1]
|
||||
END
|
||||
|
||||
STRINGA 12 1
|
||||
BEGIN
|
||||
KEY "Modo di trasporto"
|
||||
PROMPT 99 1 "" //1 sx
|
||||
FIELD 135->TRASPORTO
|
||||
END
|
||||
|
||||
STRINGA 13 2
|
||||
BEGIN
|
||||
KEY "Paese destinazione/provenienza"
|
||||
PROMPT 102 1 "" //1 sx
|
||||
FIELD 135->PAESE
|
||||
END
|
||||
|
||||
STRINGA 14 2
|
||||
BEGIN
|
||||
KEY "Paese di origine"
|
||||
PROMPT 106 1 "" //1 sx
|
||||
FIELD 135->PAESEORIG
|
||||
END
|
||||
|
||||
STRINGA 15 2
|
||||
BEGIN
|
||||
KEY "Provincia di destinazione"
|
||||
PROMPT 110 1 "" //1 sx
|
||||
FIELD 135->PROV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER ODD 31
|
||||
|
||||
NUMERO 1 12
|
||||
BEGIN
|
||||
KEY "Riporto dalla pagina precedente"
|
||||
PROMPT 23 1 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 2 12
|
||||
BEGIN
|
||||
KEY "Totale riepiloghi"
|
||||
PROMPT 23 3 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 3 3
|
||||
BEGIN
|
||||
KEY "Numero di pagina"
|
||||
PROMPT 110 3 "" //1 sx
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION HEADER EVEN 22
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 16 15 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 29 15 ""
|
||||
PICTURE ""
|
||||
END
|
||||
|
||||
NUMERO 3 6
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 37 15 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 15 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
// Sezione di stampa rettifiche
|
||||
|
||||
SECTION BODY EVEN 2
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Progressivo riga"
|
||||
PROMPT 3 1 ""
|
||||
FIELD 135->NUMRIG
|
||||
END
|
||||
|
||||
NUMERO 2 2
|
||||
BEGIN
|
||||
KEY "Mese del periodo di riferimento (riempito da programma)"
|
||||
PROMPT 7 1 ""
|
||||
PICTURE "#@"
|
||||
END
|
||||
|
||||
NUMERO 3 1
|
||||
BEGIN
|
||||
KEY "Trimestre del periodo di riferimento (riempito da programma)"
|
||||
PROMPT 11 1 ""
|
||||
PICTURE "@"
|
||||
END
|
||||
|
||||
NUMERO 4 4
|
||||
BEGIN
|
||||
KEY "Anno del periodo di riferimento"
|
||||
PROMPT 14 1 ""
|
||||
FIELD 135->ANNORETT
|
||||
END
|
||||
|
||||
STRINGA 5 2
|
||||
BEGIN
|
||||
KEY "Stato"
|
||||
PROMPT 19 1 ""
|
||||
FIELD 135->STATO
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 23 1 ""
|
||||
FIELD 135->PIVA
|
||||
END
|
||||
|
||||
STRINGA 7 1
|
||||
BEGIN
|
||||
KEY "Segno"
|
||||
PROMPT 37 1 ""
|
||||
FIELD 135->SEGNORETT
|
||||
END
|
||||
|
||||
NUMERO 8 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in Euro"
|
||||
PROMPT 39 1 "" //2 sx
|
||||
FIELD 135->AMMLIRE
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 91 3
|
||||
BEGIN
|
||||
PROMPT 35 1 "" //2 sx
|
||||
FIELD 135->CODVAL
|
||||
FLAGS "H"
|
||||
END
|
||||
|
||||
NUMERO 9 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in valuta"
|
||||
PROMPT 52 1 "" //2 sx
|
||||
FIELD 135->AMMVALUTA
|
||||
MESSAGE _IMP
|
||||
PICTURE "####.###.###"
|
||||
END
|
||||
|
||||
STRINGA 10 1
|
||||
BEGIN
|
||||
KEY "Natura della transazione"
|
||||
PROMPT 65 1 "" //1 sx
|
||||
FIELD 135->NATURA
|
||||
END
|
||||
|
||||
NUMERO 11 4
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata prima parte"
|
||||
PROMPT 68 1 "" //1 sx
|
||||
FIELD 135->NOMENCL[1,4]
|
||||
PICTURE "@@@@"
|
||||
END
|
||||
|
||||
NUMERO 111 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata seconda parte"
|
||||
PROMPT 72 1 ""
|
||||
FIELD 135->NOMENCL[5,6]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 112 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata terza parte"
|
||||
PROMPT 74 1 ""
|
||||
FIELD 135->NOMENCL[7,8]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 12 12
|
||||
BEGIN
|
||||
KEY "Valore statistico"
|
||||
PROMPT 78 1 "" //2 sx
|
||||
FIELD 135->VALSTAT
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER EVEN 36
|
||||
|
||||
STRINGA 4 1
|
||||
BEGIN
|
||||
KEY "Segno riporto rettifiche"
|
||||
PROMPT 37 1 ""
|
||||
END
|
||||
|
||||
NUMERO 1 12
|
||||
BEGIN
|
||||
KEY "Riporto dalla pagina precedente"
|
||||
PROMPT 39 1 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 7 1
|
||||
BEGIN
|
||||
KEY "Segno Totale rettifiche"
|
||||
PROMPT 37 3 ""
|
||||
END
|
||||
|
||||
NUMERO 2 12
|
||||
BEGIN
|
||||
KEY "Totale rettifiche"
|
||||
PROMPT 39 3 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 3 3
|
||||
BEGIN
|
||||
KEY "Numero di pagina"
|
||||
PROMPT 87 4 "" //2 sx
|
||||
END
|
||||
|
||||
END
|
||||
@ -1,8 +1,5 @@
|
||||
#define R_RIEPILOGHI 100
|
||||
#define R_TIPO 101
|
||||
#define R_ANNO 102
|
||||
#define R_PERIODO_M 103
|
||||
#define R_PERIODO_T 104
|
||||
#define R_PERIODO_A 105
|
||||
#define R_SOLOFRONTE 106
|
||||
#define R_DESCRIZIONI 107
|
||||
#define F_ORDER 100
|
||||
#define F_FROMNUM 101
|
||||
#define F_TONUM 102
|
||||
#define F_FROMDATE 103
|
||||
#define F_TODATE 104
|
||||
252
src/in/in0100a.rep
Normal file
252
src/in/in0100a.rep
Normal file
@ -0,0 +1,252 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report libraries="" page_merge="" save_printer="" name="in0100a" use_printer_font="" orientation="" page_split="" lpi="6" command="in0 -0 in0100a" class="">
|
||||
<description>Stampa movimenti INTRA</description>
|
||||
<font face="Courier New" size="8" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#SYSTEM.RAGSOC</source>
|
||||
</field>
|
||||
<field deactivated="" type="Testo" hidden="" align="center" link="" dynamic_height="" shade_offset="" width="122" codval="" id="" pattern="1" hide_zero="" text="Stampa movimenti INTRA">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="99" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#SYSTEM.DATE</source>
|
||||
</field>
|
||||
<field x="110.5" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="Pag." />
|
||||
<field x="115.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#REPORT.PAGE</source>
|
||||
</field>
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="2" hidden="" page_break="" can_break="" pattern="1">
|
||||
<groupby>NUMREG</groupby>
|
||||
<prescript description="H2 PRESCRIPT">MESSAGE RESET,101
|
||||
MESSAGE RESET,102</prescript>
|
||||
<field x="3" y="1" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="17" codval="" id="" pattern="1" hide_zero="" text="Registrazione n.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="20" y="1" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>NUMREG</source>
|
||||
</field>
|
||||
<field x="28" y="1" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="del">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="32" y="1" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>INTRA.DATAREG</source>
|
||||
</field>
|
||||
<field x="60" y="1" deactivated="" type="Array" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>TIPOMOV</source>
|
||||
<list>
|
||||
<li Value="Acquisto" Code="A" />
|
||||
<li Value="Cessione" Code="C" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="3" y="2" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" id="" pattern="1" hide_zero="" text="Descrizione">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="20" y="2" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>MOV.DESCR</source>
|
||||
<alt_source>CAUS.DESCR</alt_source>
|
||||
</field>
|
||||
<field x="3" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="16" codval="" id="" pattern="1" hide_zero="" text="Ragione sociale">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="20" y="3" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>CLIFO.RAGSOC</source>
|
||||
</field>
|
||||
<field x="72" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="13" codval="" id="" pattern="1" hide_zero="" text="Partita IVA">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="81" y="3" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>CLIFO.STATOPAIV</source>
|
||||
</field>
|
||||
<field x="85" y="3" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="13" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>CLIFO.PAIV</source>
|
||||
</field>
|
||||
<field x="3" y="4" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="17" codval="" id="" pattern="1" hide_zero="" text="Totale documento">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="20" y="4" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="INTRA.CODVAL" />
|
||||
<field x="25" y="4" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="" pattern="1" hide_zero="" text="###.###.###,@@">
|
||||
<source>TOTDOC</source>
|
||||
</field>
|
||||
<field x="4" y="6" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Tipo">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="33.5" y="6" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="9" codval="" id="" pattern="1" hide_zero="" text="Ammontare">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="50" y="6" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" height="2" id="" pattern="1" hide_zero="" text="Nat.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="52.5" y="6" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" height="2" id="" pattern="1" hide_zero="" text="Nomen. comb.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="70.5" y="6" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Massa">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="92" y="6" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Valore statistico">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="27" y="6.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="Euro">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="43.5" y="7" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="6" codval="" id="" pattern="1" hide_zero="" text="Valuta">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="70.5" y="7" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="Kg.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="76" y="7" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Suppplem.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="105" y="7" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="" pattern="1" hide_zero="" text="Tr">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="108" y="7" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Cons.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="112.5" y="7" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Paesi Prov. ">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="52" y="8" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="9" codval="" height="2" id="" pattern="1" hide_zero="" text="Codice servizio">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="61" y="8" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="13" codval="" height="2" id="" pattern="1" hide_zero="" text="Modalit&#E0; erogazione">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="77.5" y="8" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Modalit&#E0; inc.F;pag.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="92" y="8" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Stato inc.F;pag.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field border="2" y="10" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="122" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field x="1" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>NUMRIG</source>
|
||||
</field>
|
||||
<field x="5" deactivated="" type="Array" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>TIPOINTRA</source>
|
||||
<list>
|
||||
<li Value="Beni" Code="B">"#B1.100@"
|
||||
SHOW
|
||||
"#B1.200@"
|
||||
HIDE</li>
|
||||
<li Value="Servizi" Code="S">"#B1.200@"
|
||||
SHOW
|
||||
"#B1.100@"
|
||||
HIDE</li>
|
||||
</list>
|
||||
</field>
|
||||
<field x="13" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<source>AMMLIRE</source>
|
||||
<postscript description="B1.101 POSTSCRIPT">MESSAGE ADD,F2.101</postscript>
|
||||
</field>
|
||||
<field x="32" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="102" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<source>AMMVALUTA</source>
|
||||
<postscript description="B1.102 POSTSCRIPT">MESSAGE ADD,F2.102</postscript>
|
||||
</field>
|
||||
<field x="51" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="1" codval="" id="103" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>NATURA</source>
|
||||
</field>
|
||||
<field x="53" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" id="104" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>NOMENCL</source>
|
||||
</field>
|
||||
<field x="62" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="12" codval="" id="105" pattern="1" hide_zero="1" text="###.###,@@@@@">
|
||||
<groups>100</groups>
|
||||
<source>MASSAKG</source>
|
||||
</field>
|
||||
<field x="75" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="106" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>UMS</source>
|
||||
</field>
|
||||
<field x="77" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="12" codval="" id="107" pattern="1" hide_zero="1" text="###.###,@@@@@">
|
||||
<groups>100</groups>
|
||||
<source>MASSAUMS</source>
|
||||
</field>
|
||||
<field x="90" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="15" codval="" id="108" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<groups>100</groups>
|
||||
<source>VALSTAT</source>
|
||||
<postscript description="B1.108 POSTSCRIPT">MESSAGE ADD,F2.108</postscript>
|
||||
</field>
|
||||
<field x="106" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="109" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>TRASPORTO</source>
|
||||
</field>
|
||||
<field x="108" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="109" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>CONSEGNA</source>
|
||||
</field>
|
||||
<field x="112" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="111" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PAESE</source>
|
||||
</field>
|
||||
<field x="115" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="112" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PAESEORIG</source>
|
||||
</field>
|
||||
<field x="118" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="113" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PROV</source>
|
||||
</field>
|
||||
<field x="53" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="6" codval="" id="201" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>CODSERV</source>
|
||||
</field>
|
||||
<field x="60.5" deactivated="" type="Array" hidden="1" link="" dynamic_height="" shade_offset="" width="17" codval="" id="202" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>MODEROG</source>
|
||||
<list>
|
||||
<li Value="Unica soluzione" Code="I" />
|
||||
<li Value="Pi&#F9; soluzioni" Code="R" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="77.5" deactivated="" type="Array" hidden="1" link="" dynamic_height="" shade_offset="" width="12" codval="" id="203" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>MODINCPAG</source>
|
||||
<list>
|
||||
<li Value="Bonifico" Code="B" />
|
||||
<li Value="Accredito" Code="A" />
|
||||
<li Value="Altro" Code="X" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="90" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="3" codval="" id="204" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>ISOINCPAG</source>
|
||||
</field>
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field border="2" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="122" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
<field deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" id="" pattern="1" hide_zero="" text="Totale">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@" />
|
||||
<field x="90" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="15" codval="" id="108" pattern="1" hide_zero="1" text="###.###.###,@@" />
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="2" hidden="" height="3" page_break="" can_break="" pattern="1">
|
||||
<field border="2" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="122" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
<field deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="13" codval="" id="" pattern="1" hide_zero="" text="Totale mov.">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<postscript description="F2.101 POSTSCRIPT">MESSAGE ADD,F1.101</postscript>
|
||||
</field>
|
||||
<field x="32" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="102" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<postscript description="F2.102 POSTSCRIPT">MESSAGE ADD,F1.102</postscript>
|
||||
</field>
|
||||
<field x="90" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="15" codval="" id="108" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<postscript description="F2.108 POSTSCRIPT">MESSAGE ADD,F1.108</postscript>
|
||||
</field>
|
||||
</section>
|
||||
<sql>USE RINTRA
|
||||
JOIN INTRA INTO NUMREG==NUMREG
|
||||
JOIN MOV INTO NUMREG==NUMREG
|
||||
JOIN CAUS TO MOV INTO CODCAUS==CODCAUS
|
||||
JOIN CLIFO TO INTRA INTO TIPOCF==TIPOCF CODCF==CODCF</sql>
|
||||
</report>
|
||||
@ -4,58 +4,59 @@ TOOLBAR "topbar" 0 0 0 2
|
||||
#include <printbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Stampa Riepiloghi" 0 2 0 0
|
||||
PAGE "Stampa Movimenti" 0 2 0 0
|
||||
|
||||
LIST R_TIPO 1 10
|
||||
LISTBOX F_ORDER 1 10
|
||||
BEGIN
|
||||
PROMPT 1 1 "Tipo riepilogo "
|
||||
ITEM "C|Cessioni"
|
||||
ITEM "A|Acquisti"
|
||||
PROMPT 1 1 "Ordinamento "
|
||||
ITEM "1|Per numero" MESSAGE ENABLE,1@|DISABLE,2@
|
||||
ITEM "2|Per data" MESSAGE DISABLE,1@|ENABLE,2@
|
||||
END
|
||||
|
||||
NUMBER R_ANNO 4
|
||||
NUMBER F_FROMNUM 7
|
||||
BEGIN
|
||||
PROMPT 1 2 "Anno "
|
||||
FLAGS "AU"
|
||||
PROMPT 1 3 "Da numero "
|
||||
USE LF_INTRA
|
||||
JOIN LF_CLIFO INTO TIPOCF==TIPOCF CODCF==CODCF
|
||||
INPUT NUMREG F_FROMNUM
|
||||
DISPLAY "Numero" NUMREG
|
||||
DISPLAY "Data@10" DATAREG
|
||||
DISPLAY "C/A" TIPOMOV
|
||||
DISPLAY "Totale documento" TOTDOC
|
||||
DISPLAY "Ragione Sociale@50" LF_CLIFO->RAGSOC
|
||||
OUTPUT F_FROMNUM NUMREG
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
LIST R_PERIODO_M 2 17
|
||||
NUMBER F_TONUM 7
|
||||
BEGIN
|
||||
PROMPT 1 3 "Periodo "
|
||||
FLAGS "AM"
|
||||
FIELD PERIODO
|
||||
PROMPT 1 5 " A numero "
|
||||
USE LF_INTRA
|
||||
JOIN LF_CLIFO INTO TIPOCF==TIPOCF CODCF==CODCF
|
||||
INPUT NUMREG F_TONUM
|
||||
DISPLAY "Numero" NUMREG
|
||||
DISPLAY "Data@10" DATAREG
|
||||
DISPLAY "C/A" TIPOMOV
|
||||
DISPLAY "Totale documento" TOTDOC
|
||||
DISPLAY "Ragione Sociale@50" LF_CLIFO->RAGSOC
|
||||
OUTPUT F_TONUM NUMREG
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
LIST R_PERIODO_T 2 17
|
||||
DATE F_FROMDATE
|
||||
BEGIN
|
||||
PROMPT 1 3 "Periodo "
|
||||
ITEM "01|Gennaio-Marzo"
|
||||
MESSAGE COPY,R_PERIODO_M
|
||||
ITEM "02|Aprile-Giugno"
|
||||
MESSAGE COPY,R_PERIODO_M
|
||||
ITEM "03|Luglio-Settembre"
|
||||
MESSAGE COPY,R_PERIODO_M
|
||||
ITEM "04|Ottobre-Dicembre"
|
||||
MESSAGE COPY,R_PERIODO_M
|
||||
PROMPT 1 7 "Dal "
|
||||
GROUP 2
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
LIST R_PERIODO_A 2 17
|
||||
DATE F_TODATE
|
||||
BEGIN
|
||||
PROMPT 1 3 "Periodo "
|
||||
ITEM "01|Annuale"
|
||||
MESSAGE COPY,R_PERIODO_M
|
||||
END
|
||||
|
||||
BOOLEAN R_SOLOFRONTE
|
||||
BEGIN
|
||||
PROMPT 1 5 "Stampa solo il frontespizio"
|
||||
END
|
||||
|
||||
BOOLEAN R_DESCRIZIONI
|
||||
BEGIN
|
||||
PROMPT 1 6 "Stampa descrizioni"
|
||||
PROMPT 1 9 " Al "
|
||||
GROUP 2
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
ENDMASK
|
||||
@ -1,821 +0,0 @@
|
||||
// Form per la stampa riepiloghi INTRA (Cessioni)
|
||||
|
||||
USE 9
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 118 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 118@ ALIAS 213 INTO STATO=="" COM==COMNASC
|
||||
JOIN 13 TO 106@ ALIAS 313 INTO STATO==STATORES COM==COMRES
|
||||
JOIN 13 TO 106@ ALIAS 413 INTO STATO=="" COM==COMRF
|
||||
JOIN 6 TO 9 ALIAS 206 INTO TIPOA==TIPOSOGDEL CODANAGR==CODSOGDEL
|
||||
JOIN 13 TO 206@ ALIAS 513 INTO STATO==STATORES COM==COMRES
|
||||
JOIN 13 TO 206@ ALIAS 613 INTO STATO=="" COM==COMRF
|
||||
JOIN 135 TO 9 INTO ANNO=CODDITTA
|
||||
END
|
||||
|
||||
DESCRIPTION
|
||||
BEGIN
|
||||
END
|
||||
|
||||
|
||||
GENERAL
|
||||
BEGIN
|
||||
OFFSET 0 0
|
||||
CARATTERE "X"
|
||||
INIZIO_POS 2 4
|
||||
FINE_POS 76
|
||||
END
|
||||
|
||||
SECTION HEADER FIRST 16
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 43 14 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 55 14 ""
|
||||
END
|
||||
|
||||
NUMERO 3 5
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 64 14 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4 1
|
||||
BEGIN
|
||||
KEY "Tipo riepilogo"
|
||||
PROMPT 39 16 ""
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY FIRST 33
|
||||
|
||||
LISTA 99
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
PROMPT 1 1 ""
|
||||
FIELD TIPOA
|
||||
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
||||
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
||||
END
|
||||
|
||||
STRINGA 1
|
||||
BEGIN
|
||||
KEY "Codice Fiscale"
|
||||
PROMPT 3 7 ""
|
||||
FIELD 106@->COFI
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 7 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "Cognome"
|
||||
PROMPT 3 10 ""
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Nome"
|
||||
PROMPT 43 10 ""
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
DATA 5
|
||||
BEGIN
|
||||
KEY "Data di nascita"
|
||||
PROMPT 4 13 ""
|
||||
FIELD 118@->DATANASC
|
||||
FORMAT "1442-"
|
||||
PICTURE "# #^# #^# #"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
LISTA 6
|
||||
BEGIN
|
||||
KEY "Sesso"
|
||||
PROMPT 19 13 ""
|
||||
FIELD 118@->SESSO
|
||||
ITEM "M|X"
|
||||
ITEM "F| X"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 7 32
|
||||
BEGIN
|
||||
KEY "Comune di nascita"
|
||||
PROMPT 23 13 ""
|
||||
FIELD 213@->DENCOM
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 8 2
|
||||
BEGIN
|
||||
KEY "Provincia di nascita"
|
||||
PROMPT 59 13 ""
|
||||
FIELD 213@->PROVCOM
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 9 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico"
|
||||
PROMPT 64 13 ""
|
||||
FIELD 106@->PTELRF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 10 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico"
|
||||
PROMPT 69 13 ""
|
||||
FIELD 106@->TELRF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
BEGIN
|
||||
KEY "Denominazione o ragione sociale"
|
||||
PROMPT 3 17 ""
|
||||
FIELD 106@->RAGSOC
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 12 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico"
|
||||
PROMPT 64 17 ""
|
||||
FIELD 106@->PTELRF
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 13 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico"
|
||||
PROMPT 69 17 ""
|
||||
FIELD 106@->TELRF
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 14 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza fiscale"
|
||||
PROMPT 52 20 ""
|
||||
FIELD 413@->DENCOM
|
||||
MESSAGE EMPTY SHOW,3@|HIDE,4@
|
||||
MESSAGE SHOW,4@|HIDE,3@
|
||||
END
|
||||
|
||||
STRINGA 15 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza"
|
||||
PROMPT 52 20 ""
|
||||
FIELD 313@->DENCOM
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
BEGIN
|
||||
KEY "Provincia di residenza fiscale"
|
||||
PROMPT 74 20 ""
|
||||
FIELD 413@->PROVCOM
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 17
|
||||
BEGIN
|
||||
KEY "Provincia di residenza"
|
||||
PROMPT 74 20 ""
|
||||
FIELD 313@->PROVCOM
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 18
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->INDRF[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,20
|
||||
END
|
||||
|
||||
STRINGA 19
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza fiscale"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->CIVRF
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,20
|
||||
END
|
||||
|
||||
STRINGA 20 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale+nr. civico"
|
||||
PROMPT 3 20 ""
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 21
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->INDRES[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,23
|
||||
END
|
||||
|
||||
STRINGA 22
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->CIVRES
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,23
|
||||
END
|
||||
|
||||
STRINGA 23 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza+nr. civico"
|
||||
PROMPT 3 20 ""
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 24
|
||||
BEGIN
|
||||
KEY "CAP residenza fiscale"
|
||||
PROMPT 42 20 ""
|
||||
FIELD 106@->CAPRF
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 25
|
||||
BEGIN
|
||||
KEY "CAP residenza"
|
||||
PROMPT 42 20 ""
|
||||
FIELD 106@->CAPRES
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
LISTA 26 1
|
||||
BEGIN
|
||||
KEY "Elenchi presentati in precedenza"
|
||||
PROMPT 7 23 ""
|
||||
ITEM " | "
|
||||
ITEM "X|X"
|
||||
FIELD PRESELEN
|
||||
END
|
||||
|
||||
LISTA 26 1
|
||||
BEGIN
|
||||
KEY "Cessazione attivita'"
|
||||
PROMPT 40 23 ""
|
||||
ITEM " | "
|
||||
ITEM "X|X"
|
||||
FIELD CESSIVA
|
||||
END
|
||||
|
||||
STRINGA 27
|
||||
BEGIN
|
||||
KEY "Partita IVA delegato"
|
||||
PROMPT 11 27 ""
|
||||
FIELD 206@->PAIV
|
||||
END
|
||||
|
||||
STRINGA 28 50
|
||||
BEGIN
|
||||
KEY "Nome e Cognome o Ragione sociale delegato"
|
||||
PROMPT 3 30 ""
|
||||
FIELD 206@->RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 29 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico delegato"
|
||||
PROMPT 64 30 ""
|
||||
FIELD 206@->PTELRF
|
||||
END
|
||||
|
||||
STRINGA 30 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico delegato"
|
||||
PROMPT 69 30 ""
|
||||
FIELD 206@->TELRF
|
||||
END
|
||||
|
||||
STRINGA 31 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza fiscale delegato"
|
||||
PROMPT 52 33 ""
|
||||
FIELD 613@->DENCOM
|
||||
MESSAGE EMPTY SHOW,5@|HIDE,6@
|
||||
MESSAGE SHOW,6@|HIDE,5@
|
||||
END
|
||||
|
||||
STRINGA 32 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza delegato"
|
||||
PROMPT 52 33 ""
|
||||
FIELD 513@->DENCOM
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 33
|
||||
BEGIN
|
||||
KEY "Provincia di residenza fiscale delegato"
|
||||
PROMPT 74 33 ""
|
||||
FIELD 613@->PROVCOM
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 34
|
||||
BEGIN
|
||||
KEY "Provincia di residenza delegato"
|
||||
PROMPT 74 33 ""
|
||||
FIELD 513@->PROVCOM
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 35
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->INDRF[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,37
|
||||
END
|
||||
|
||||
STRINGA 36
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza fiscale delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->CIVRF
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,37
|
||||
END
|
||||
|
||||
STRINGA 37 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale+nr. civico delegato"
|
||||
PROMPT 3 33 ""
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->INDRES[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,40
|
||||
END
|
||||
|
||||
STRINGA 39
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->CIVRES
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,40
|
||||
END
|
||||
|
||||
STRINGA 40 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza+nr. civico delegato"
|
||||
PROMPT 3 33 ""
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 41
|
||||
BEGIN
|
||||
KEY "CAP residenza fiscale delegato"
|
||||
PROMPT 42 33 ""
|
||||
FIELD 206@->CAPRF
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 42
|
||||
BEGIN
|
||||
KEY "CAP residenza delegato"
|
||||
PROMPT 42 33 ""
|
||||
FIELD 206@->CAPRES
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER FIRST 23
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Totale pagine sezione 1"
|
||||
PROMPT 11 6 ""
|
||||
END
|
||||
|
||||
NUMERO 2 5
|
||||
BEGIN
|
||||
KEY "Totale righe dettaglio sezione 1"
|
||||
PROMPT 18 6 ""
|
||||
END
|
||||
|
||||
NUMERO 3 15
|
||||
BEGIN
|
||||
KEY "Ammontare complessivo sezione 1"
|
||||
PROMPT 25 6 ""
|
||||
PICTURE "###.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 4 3
|
||||
BEGIN
|
||||
KEY "Totale pagine sezione 2"
|
||||
PROMPT 49 6 ""
|
||||
END
|
||||
|
||||
NUMERO 5 5
|
||||
BEGIN
|
||||
KEY "Totale righe dettaglio sezione 2"
|
||||
PROMPT 56 6 ""
|
||||
END
|
||||
|
||||
NUMERO 6 15
|
||||
BEGIN
|
||||
KEY "Ammontare complessivo sezione 2"
|
||||
PROMPT 64 6 ""
|
||||
PICTURE "###.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
DATA 7 10
|
||||
BEGIN
|
||||
KEY "Data di stampa"
|
||||
PROMPT 6 10 ""
|
||||
MESSAGE _TODAY
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION HEADER ODD 21
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 16 15 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 29 15 ""
|
||||
END
|
||||
|
||||
NUMERO 3 5
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 37 15 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 15 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY ODD 2
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Progressivo riga"
|
||||
PROMPT 3 1 ""
|
||||
FIELD 135->NUMRIG
|
||||
END
|
||||
|
||||
STRINGA 2 2
|
||||
BEGIN
|
||||
KEY "Stato"
|
||||
PROMPT 7 1 ""
|
||||
FIELD 135->STATO
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 11 1 ""
|
||||
FIELD 135->PIVA
|
||||
END
|
||||
|
||||
NUMERO 4 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in euro"
|
||||
PROMPT 23 1 "" //2sx
|
||||
FIELD 135->AMMLIRE
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 6 1
|
||||
BEGIN
|
||||
KEY "Natura della transazione"
|
||||
PROMPT 36 1 "" //1sx
|
||||
FIELD 135->NATURA
|
||||
END
|
||||
|
||||
STRINGA 7 4
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata prima parte"
|
||||
PROMPT 39 1 ""
|
||||
FIELD 135->NOMENCL[1,4]
|
||||
PICTURE "@@@@"
|
||||
END
|
||||
|
||||
NUMERO 71 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata seconda parte"
|
||||
PROMPT 43 1 ""
|
||||
FIELD 135->NOMENCL[5,6]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 72 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata terza parte"
|
||||
PROMPT 45 1 ""
|
||||
FIELD 135->NOMENCL[7,8]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 8 9
|
||||
BEGIN
|
||||
KEY "Massa netta in kilogrammi"
|
||||
PROMPT 48 1 "" //1sx
|
||||
FIELD 135->MASSAKG
|
||||
PICTURE "#########"
|
||||
MESSAGE _ROUND,0
|
||||
END
|
||||
|
||||
NUMERO 9 9
|
||||
BEGIN
|
||||
KEY "Massa in unita' supplementare"
|
||||
PROMPT 58 1 "" //2sx
|
||||
FIELD 135->MASSAUMS
|
||||
PICTURE "#########"
|
||||
MESSAGE _ROUND,0
|
||||
END
|
||||
|
||||
NUMERO 10 12
|
||||
BEGIN
|
||||
KEY "Valore statistico"
|
||||
PROMPT 69 1 "" //2sx
|
||||
FIELD 135->VALSTAT
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 11 1
|
||||
BEGIN
|
||||
KEY "Codice consegna"
|
||||
PROMPT 84 1 ""
|
||||
FIELD 135->CONSEGNA[1,1]
|
||||
END
|
||||
|
||||
STRINGA 12 1
|
||||
BEGIN
|
||||
KEY "Modo di trasporto"
|
||||
PROMPT 86 1 "" //1sx
|
||||
FIELD 135->TRASPORTO
|
||||
END
|
||||
|
||||
STRINGA 13 2
|
||||
BEGIN
|
||||
KEY "Paese destinazione"
|
||||
PROMPT 89 1 "" //1sx
|
||||
FIELD 135->PAESE
|
||||
END
|
||||
|
||||
STRINGA 14 2
|
||||
BEGIN
|
||||
KEY "Provincia Origine"
|
||||
PROMPT 93 1 "" //1sx
|
||||
FIELD 135->PROV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER ODD 31
|
||||
|
||||
NUMERO 1 12
|
||||
BEGIN
|
||||
KEY "Riporto dalla pagina precedente"
|
||||
PROMPT 23 1 "" //2sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 2 12
|
||||
BEGIN
|
||||
KEY "Totale"
|
||||
PROMPT 23 3 "" //2sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 3 3
|
||||
BEGIN
|
||||
KEY "Numero di pagina"
|
||||
PROMPT 94 3 "" //1sx
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION HEADER EVEN 22
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 16 15 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 29 15 ""
|
||||
END
|
||||
|
||||
NUMERO 3 6
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 37 15 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 15 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
// Sezione di stampa rettifiche
|
||||
|
||||
SECTION BODY EVEN 2
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Progressivo riga"
|
||||
PROMPT 3 1 ""
|
||||
FIELD 135->NUMRIG
|
||||
END
|
||||
|
||||
NUMERO 2 2
|
||||
BEGIN
|
||||
KEY "Mese del periodo di riferimento (Settato da programma)"
|
||||
PROMPT 7 1 ""
|
||||
PICTURE "#@"
|
||||
END
|
||||
|
||||
NUMERO 3 1
|
||||
BEGIN
|
||||
KEY "Trimestre del periodo di riferimento (Settato da programma)"
|
||||
PROMPT 11 1 ""
|
||||
PICTURE "@"
|
||||
END
|
||||
|
||||
NUMERO 4 4
|
||||
BEGIN
|
||||
KEY "Anno del periodo di riferimento"
|
||||
PROMPT 14 1 ""
|
||||
FIELD 135->ANNORETT
|
||||
END
|
||||
|
||||
STRINGA 5 2
|
||||
BEGIN
|
||||
KEY "Stato"
|
||||
PROMPT 19 1 ""
|
||||
FIELD 135->STATO
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 23 1 ""
|
||||
FIELD 135->PIVA
|
||||
END
|
||||
|
||||
STRINGA 7 1
|
||||
BEGIN
|
||||
KEY "Segno"
|
||||
PROMPT 37 1 ""
|
||||
FIELD 135->SEGNORETT
|
||||
END
|
||||
|
||||
NUMERO 8 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in euro"
|
||||
PROMPT 39 1 "" //2sx
|
||||
FIELD 135->AMMLIRE
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 10 1
|
||||
BEGIN
|
||||
KEY "Natura della transazione"
|
||||
PROMPT 52 1 "" //1sx
|
||||
FIELD 135->NATURA
|
||||
END
|
||||
|
||||
NUMERO 11 4
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata prima parte"
|
||||
PROMPT 56 1 ""
|
||||
FIELD 135->NOMENCL[1,4]
|
||||
PICTURE "@@@@"
|
||||
END
|
||||
|
||||
NUMERO 111 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata seconda parte"
|
||||
PROMPT 60 1 ""
|
||||
FIELD 135->NOMENCL[5,6]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 112 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata terza parte"
|
||||
PROMPT 62 1 ""
|
||||
FIELD 135->NOMENCL[7,8]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 12 12
|
||||
BEGIN
|
||||
KEY "Valore statistico"
|
||||
PROMPT 65 1 "" //2sx
|
||||
FIELD 135->VALSTAT
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER EVEN 36
|
||||
|
||||
STRINGA 4 1
|
||||
BEGIN
|
||||
KEY "Segno riporto rettifiche"
|
||||
PROMPT 37 1 ""
|
||||
END
|
||||
|
||||
NUMERO 1 12
|
||||
BEGIN
|
||||
KEY "Riporto dala pagina precedente"
|
||||
PROMPT 39 1 "" //2sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 7 1
|
||||
BEGIN
|
||||
KEY "Segno Totale rettifiche"
|
||||
PROMPT 37 3 ""
|
||||
END
|
||||
|
||||
NUMERO 2 12
|
||||
BEGIN
|
||||
KEY "Totale"
|
||||
PROMPT 39 3 "" //2sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 3 3
|
||||
BEGIN
|
||||
KEY "Numero di pagina"
|
||||
PROMPT 74 4 "" //1sx
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
7
src/in/in0100b.h
Normal file
7
src/in/in0100b.h
Normal file
@ -0,0 +1,7 @@
|
||||
#define F_ORDER 100
|
||||
#define F_SELECT 101
|
||||
#define F_ANNO 102
|
||||
#define F_TIPO 103
|
||||
#define F_PERIODO_M 104
|
||||
#define F_PERIODO_T 105
|
||||
#define F_PERIODO_A 106
|
||||
202
src/in/in0100b.rep
Normal file
202
src/in/in0100b.rep
Normal file
@ -0,0 +1,202 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report libraries="" page_merge="" save_printer="" name="in0100b" use_printer_font="" orientation="" page_split="" lpi="6" command="in0 -0 in0100a" class="">
|
||||
<description>Stampa riepiploghi INTRA</description>
|
||||
<font face="Courier New" size="8" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field deactivated="" type="Testo" hidden="" align="center" link="" dynamic_height="" shade_offset="" width="122" codval="" id="" pattern="1" hide_zero="" text="Stampa riepiloghi INTRA">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#SYSTEM.RAGSOC</source>
|
||||
</field>
|
||||
<field x="99" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#SYSTEM.DATE</source>
|
||||
</field>
|
||||
<field x="110.5" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="Pag." />
|
||||
<field x="115.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#REPORT.PAGE</source>
|
||||
</field>
|
||||
<field x="70.5" y="2" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Massa">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="92" y="2" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Valore statistico">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="50" y="2.25" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" height="2" id="" pattern="1" hide_zero="" text="Nat.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="52" y="2.25" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" height="2" id="" pattern="1" hide_zero="" text="Nomen. comb.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="70.5" y="2.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="Kg.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="76" y="2.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Suppplem.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="33.5" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="11" codval="" id="" pattern="1" hide_zero="" text="Ammontare">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="105" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="" pattern="1" hide_zero="" text="Tr">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="108" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Cons.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="112" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Paesi Prov. ">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="52" y="4" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="9" codval="" height="2" id="" pattern="1" hide_zero="" text="Codice servizio">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="61" y="4" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="13" codval="" height="2" id="" pattern="1" hide_zero="" text="Modalit&#E0; erogazione">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="77.5" y="4" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Modalit&#E0; inc.F;pag.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="92" y="4" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Stato inc.F;pag.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="4" y="4.5" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Tipo">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="27" y="4.5" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="Euro">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="43.5" y="4.5" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="Valuta">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field border="2" y="6" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="122" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field x="1" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>ANNO</source>
|
||||
</field>
|
||||
<field x="7" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="2" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>PERIODO</source>
|
||||
</field>
|
||||
<field x="10" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>NUMRIG</source>
|
||||
</field>
|
||||
<field x="18" deactivated="" type="Array" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>TIPO</source>
|
||||
<list>
|
||||
<li Value="Acquisto" Code="A" />
|
||||
<li Value="Cessione" Code="C" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="29" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>STATO</source>
|
||||
</field>
|
||||
<field x="33" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="14" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>PIVA</source>
|
||||
</field>
|
||||
<field x="48" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>CLIFO.RAGSOC</source>
|
||||
</field>
|
||||
<field x="5" y="1.5" deactivated="" type="Array" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>SEZIONE</source>
|
||||
<list>
|
||||
<li Value="Beni" Code="1">"#B1.100@"
|
||||
SHOW
|
||||
"#B1.200@"
|
||||
HIDE</li>
|
||||
<li Value="Servizi" Code="3">"#B1.200@"
|
||||
SHOW
|
||||
"#B1.100@"
|
||||
HIDE</li>
|
||||
</list>
|
||||
</field>
|
||||
<field x="13" y="1.5" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<source>AMMLIRE</source>
|
||||
<postscript description="B1.101 POSTSCRIPT">MESSAGE ADD,F1.101</postscript>
|
||||
</field>
|
||||
<field x="32" y="1.5" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="102" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<source>AMMVALUTA</source>
|
||||
</field>
|
||||
<field x="51" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="1" codval="" id="103" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>NATURA</source>
|
||||
</field>
|
||||
<field x="53" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" id="104" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>NOMENCL</source>
|
||||
</field>
|
||||
<field x="62" y="1.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="12" codval="" id="105" pattern="1" hide_zero="1" text="###.###,@@@@@">
|
||||
<groups>100</groups>
|
||||
<source>MASSAKG</source>
|
||||
</field>
|
||||
<field x="75" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="106" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>UMS</source>
|
||||
</field>
|
||||
<field x="77" y="1.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="12" codval="" id="107" pattern="1" hide_zero="1" text="###.###,@@@@@">
|
||||
<groups>100</groups>
|
||||
<source>MASSAUMS</source>
|
||||
</field>
|
||||
<field x="90" y="1.5" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="15" codval="" id="108" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<groups>100</groups>
|
||||
<source>VALSTAT</source>
|
||||
<postscript description="B1.108 POSTSCRIPT">MESSAGE ADD,F1.108</postscript>
|
||||
</field>
|
||||
<field x="106" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="109" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>TRASPORTO</source>
|
||||
</field>
|
||||
<field x="108" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="109" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>CONSEGNA</source>
|
||||
</field>
|
||||
<field x="112" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="111" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PAESE</source>
|
||||
</field>
|
||||
<field x="115" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="112" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PAESEORIG</source>
|
||||
</field>
|
||||
<field x="118" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="113" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PROV</source>
|
||||
</field>
|
||||
<field x="53" y="1.5" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="6" codval="" id="201" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>CODSERV</source>
|
||||
</field>
|
||||
<field x="60.5" y="1.5" deactivated="" type="Array" hidden="1" link="" dynamic_height="" shade_offset="" width="17" codval="" id="202" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>MODEROG</source>
|
||||
<list>
|
||||
<li Value="Unica soluzione" Code="I" />
|
||||
<li Value="Pi&#F9; soluzioni" Code="R" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="77.5" y="1.5" deactivated="" type="Array" hidden="1" link="" dynamic_height="" shade_offset="" width="12" codval="" id="203" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>MODINCPAG</source>
|
||||
<list>
|
||||
<li Value="Bonifico" Code="B" />
|
||||
<li Value="Accredito" Code="A" />
|
||||
<li Value="Altro" Code="X" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="90" y="1.5" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="3" codval="" id="204" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>ISOINCPAG</source>
|
||||
</field>
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field border="2" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="122" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
<field deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" id="" pattern="1" hide_zero="" text="Totale">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@" />
|
||||
<field x="90" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="15" codval="" id="108" pattern="1" hide_zero="1" text="###.###.###,@@" />
|
||||
</section>
|
||||
<sql>USE RIEPRETT SELECT (SEZIONE==1)||(SEZIONE==3)
|
||||
JOIN CLIFO KEY 5 INTO TIPOCF==TIPOCF STATOPAIV=STATO PAIV==PIVA</sql>
|
||||
</report>
|
||||
58
src/in/in0100b.uml
Normal file
58
src/in/in0100b.uml
Normal file
@ -0,0 +1,58 @@
|
||||
#include "in0100b.h"
|
||||
|
||||
TOOLBAR "topbar" 0 0 0 2
|
||||
#include <printbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Stampa Riepiloghi e rettifiche" 0 2 0 0
|
||||
|
||||
LISTBOX F_SELECT 1 10
|
||||
BEGIN
|
||||
PROMPT 1 1 "Selezione "
|
||||
ITEM "0|Tutto"
|
||||
ITEM "1|Riepiloghi"
|
||||
ITEM "2|Rettifiche"
|
||||
END
|
||||
|
||||
NUMBER F_ANNO 4
|
||||
BEGIN
|
||||
PROMPT 1 3 "Anno "
|
||||
FIELD #ANNO
|
||||
FLAGS "AU"
|
||||
END
|
||||
|
||||
LIST F_TIPO 1 12
|
||||
BEGIN
|
||||
PROMPT 1 5 "Tipo movimento "
|
||||
ITEM "|"
|
||||
ITEM "C|Cessione"
|
||||
ITEM "A|Acquisto"
|
||||
END
|
||||
|
||||
LIST F_PERIODO_M 2 16
|
||||
BEGIN
|
||||
PROMPT 1 7 "Periodo "
|
||||
ITEM "|"
|
||||
FLAGS "M"
|
||||
END
|
||||
|
||||
LIST F_PERIODO_T 2 16
|
||||
BEGIN
|
||||
PROMPT 1 7 "Periodo "
|
||||
ITEM "|"
|
||||
ITEM "01|Gennaio-Marzo"
|
||||
ITEM "02|Aprile-Giugno"
|
||||
ITEM "03|Luglio-Settembre"
|
||||
ITEM "04|Ottobre-Dicembre"
|
||||
END
|
||||
|
||||
LIST F_PERIODO_A 2 16
|
||||
BEGIN
|
||||
PROMPT 1 7 "Periodo "
|
||||
ITEM "|"
|
||||
ITEM "01|Annuale"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
@ -1,907 +0,0 @@
|
||||
// Form per la stampa riepiloghi INTRA (Acquisti)
|
||||
|
||||
USE 9
|
||||
JOIN 6 TO 9 ALIAS 106 INTO TIPOA=TIPOA CODANAGR=CODANAGR
|
||||
JOIN 8 TO 106@ ALIAS 118 INTO CODANAGR=CODANAGR
|
||||
JOIN 13 TO 118@ ALIAS 213 INTO STATO=="" COM==COMNASC
|
||||
JOIN 13 TO 106@ ALIAS 313 INTO STATO==STATORES COM==COMRES
|
||||
JOIN 13 TO 106@ ALIAS 413 INTO STATO=="" COM==COMRF
|
||||
JOIN 6 TO 9 ALIAS 206 INTO TIPOA==TIPOSOGDEL CODANAGR==CODSOGDEL
|
||||
JOIN 13 TO 206@ ALIAS 513 INTO STATO==STATORES COM==COMRES
|
||||
JOIN 13 TO 206@ ALIAS 613 INTO STATO=="" COM==COMRF
|
||||
JOIN 135 TO 9 INTO ANNO=CODDITTA
|
||||
END
|
||||
|
||||
DESCRIPTION
|
||||
BEGIN
|
||||
END
|
||||
|
||||
|
||||
GENERAL
|
||||
BEGIN
|
||||
OFFSET 0 0
|
||||
CARATTERE "X"
|
||||
INIZIO_POS 2 4
|
||||
FINE_POS 76
|
||||
END
|
||||
|
||||
SECTION HEADER FIRST 16
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 43 14 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 55 14 ""
|
||||
END
|
||||
|
||||
NUMERO 3 5
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 64 14 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4 1
|
||||
BEGIN
|
||||
KEY "Tipo riepilogo"
|
||||
PROMPT 40 16 "" //1 dx
|
||||
END
|
||||
|
||||
STRINGA -1 80
|
||||
BEGIN
|
||||
PROMPT 3 4 "E L E N C O R I E P I L O G A T I V O"
|
||||
END
|
||||
|
||||
STRINGA -1 80
|
||||
BEGIN
|
||||
PROMPT 3 6 "D E G L I A C Q U I S T I"
|
||||
END
|
||||
|
||||
STRINGA -1 80
|
||||
BEGIN
|
||||
PROMPT 3 8 "I N T R A C O M U N I T A R I D I B E N I"
|
||||
END
|
||||
|
||||
STRINGA -1 10
|
||||
BEGIN
|
||||
PROMPT 68 4 "(EURO)"
|
||||
END
|
||||
|
||||
STRINGA -1 15
|
||||
BEGIN
|
||||
PROMPT 20 13 "Periodo :"
|
||||
END
|
||||
|
||||
STRINGA -1 10
|
||||
BEGIN
|
||||
PROMPT 43 13 "Mese"
|
||||
END
|
||||
|
||||
STRINGA -1 10
|
||||
BEGIN
|
||||
PROMPT 51 13 "Trimestre"
|
||||
END
|
||||
|
||||
STRINGA -1 10
|
||||
BEGIN
|
||||
PROMPT 65 13 "Anno"
|
||||
END
|
||||
|
||||
STRINGA -1 20
|
||||
BEGIN
|
||||
PROMPT 20 16 "Tipo riepilogo: "
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY FIRST 33
|
||||
|
||||
LISTA 99
|
||||
BEGIN
|
||||
KEY "Tipo anagrafica"
|
||||
PROMPT 1 1 ""
|
||||
FIELD TIPOA
|
||||
ITEM "F| " MESSAGE ENABLE,1@|DISABLE,2@
|
||||
ITEM "G| " MESSAGE ENABLE,2@|DISABLE,1@
|
||||
END
|
||||
|
||||
STRINGA 1
|
||||
BEGIN
|
||||
KEY "Codice Fiscale"
|
||||
PROMPT 3 7 ""
|
||||
FIELD 106@->COFI
|
||||
END
|
||||
|
||||
STRINGA 2
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 7 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "Cognome"
|
||||
PROMPT 3 10 ""
|
||||
FIELD 106@->RAGSOC[1,30]
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Nome"
|
||||
PROMPT 43 10 ""
|
||||
FIELD 106@->RAGSOC[31,50]
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
DATA 5
|
||||
BEGIN
|
||||
KEY "Data di nascita"
|
||||
PROMPT 4 13 ""
|
||||
FIELD 118@->DATANASC
|
||||
FORMAT "1442-"
|
||||
PICTURE "# #^# #^# #"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
LISTA 6
|
||||
BEGIN
|
||||
KEY "Sesso"
|
||||
PROMPT 19 13 ""
|
||||
FIELD 118@->SESSO
|
||||
ITEM "M|X"
|
||||
ITEM "F| X"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 7 32
|
||||
BEGIN
|
||||
KEY "Comune di nascita"
|
||||
PROMPT 23 13 ""
|
||||
FIELD 213@->DENCOM
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 8 2
|
||||
BEGIN
|
||||
KEY "Provincia di nascita"
|
||||
PROMPT 59 13 ""
|
||||
FIELD 213@->PROVCOM
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 9 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico"
|
||||
PROMPT 64 13 ""
|
||||
FIELD 106@->PTELRF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 10 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico"
|
||||
PROMPT 69 13 ""
|
||||
FIELD 106@->TELRF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRINGA 11
|
||||
BEGIN
|
||||
KEY "Denominazione o ragione sociale"
|
||||
PROMPT 3 17 ""
|
||||
FIELD 106@->RAGSOC
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 12 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico"
|
||||
PROMPT 64 17 ""
|
||||
FIELD 106@->PTELRF
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 13 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico"
|
||||
PROMPT 69 17 ""
|
||||
FIELD 106@->TELRF
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRINGA 14 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza fiscale"
|
||||
PROMPT 52 20 ""
|
||||
FIELD 413@->DENCOM
|
||||
MESSAGE EMPTY SHOW,3@|HIDE,4@
|
||||
MESSAGE SHOW,4@|HIDE,3@
|
||||
END
|
||||
|
||||
STRINGA 15 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza"
|
||||
PROMPT 52 20 ""
|
||||
FIELD 313@->DENCOM
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 16
|
||||
BEGIN
|
||||
KEY "Provincia di residenza fiscale"
|
||||
PROMPT 74 20 ""
|
||||
FIELD 413@->PROVCOM
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 17
|
||||
BEGIN
|
||||
KEY "Provincia di residenza"
|
||||
PROMPT 74 20 ""
|
||||
FIELD 313@->PROVCOM
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 18
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->INDRF[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,20
|
||||
END
|
||||
|
||||
STRINGA 19
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza fiscale"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->CIVRF
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,20
|
||||
END
|
||||
|
||||
STRINGA 20 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale+nr. civico"
|
||||
PROMPT 3 20 ""
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 21
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->INDRES[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,23
|
||||
END
|
||||
|
||||
STRINGA 22
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza"
|
||||
PROMPT 1 20 ""
|
||||
FIELD 106@->CIVRES
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,23
|
||||
END
|
||||
|
||||
STRINGA 23 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza+nr. civico"
|
||||
PROMPT 3 20 ""
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRINGA 24
|
||||
BEGIN
|
||||
KEY "CAP residenza fiscale"
|
||||
PROMPT 42 20 ""
|
||||
FIELD 106@->CAPRF
|
||||
GROUP 4
|
||||
END
|
||||
|
||||
STRINGA 25
|
||||
BEGIN
|
||||
KEY "CAP residenza"
|
||||
PROMPT 42 20 ""
|
||||
FIELD 106@->CAPRES
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
LISTA 26 1
|
||||
BEGIN
|
||||
KEY "Elenchi presentati in precedenza"
|
||||
PROMPT 7 23 ""
|
||||
ITEM " | "
|
||||
ITEM "X|X"
|
||||
FIELD PRESELEN
|
||||
END
|
||||
|
||||
LISTA 26 1
|
||||
BEGIN
|
||||
KEY "Cessazione attivita'"
|
||||
PROMPT 40 23 ""
|
||||
ITEM " | "
|
||||
ITEM "X|X"
|
||||
FIELD CESSIVA
|
||||
END
|
||||
|
||||
STRINGA 27
|
||||
BEGIN
|
||||
KEY "Partita IVA delegato"
|
||||
PROMPT 11 27 ""
|
||||
FIELD 206@->PAIV
|
||||
END
|
||||
|
||||
STRINGA 28 50
|
||||
BEGIN
|
||||
KEY "Nome e Cognome o Ragione sociale delegato"
|
||||
PROMPT 3 30 ""
|
||||
FIELD 206@->RAGSOC
|
||||
END
|
||||
|
||||
STRINGA 29 4
|
||||
BEGIN
|
||||
KEY "Prefisso telefonico delegato"
|
||||
PROMPT 64 30 ""
|
||||
FIELD 206@->PTELRF
|
||||
END
|
||||
|
||||
STRINGA 30 9
|
||||
BEGIN
|
||||
KEY "Numero telefonico delegato"
|
||||
PROMPT 69 30 ""
|
||||
FIELD 206@->TELRF
|
||||
END
|
||||
|
||||
STRINGA 31 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza fiscale delegato"
|
||||
PROMPT 52 33 ""
|
||||
FIELD 613@->DENCOM
|
||||
MESSAGE EMPTY SHOW,5@|HIDE,6@
|
||||
MESSAGE SHOW,6@|HIDE,5@
|
||||
END
|
||||
|
||||
STRINGA 32 20
|
||||
BEGIN
|
||||
KEY "Comune di residenza delegato"
|
||||
PROMPT 52 33 ""
|
||||
FIELD 513@->DENCOM
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 33
|
||||
BEGIN
|
||||
KEY "Provincia di residenza fiscale delegato"
|
||||
PROMPT 74 33 ""
|
||||
FIELD 613@->PROVCOM
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 34
|
||||
BEGIN
|
||||
KEY "Provincia di residenza delegato"
|
||||
PROMPT 74 33 ""
|
||||
FIELD 513@->PROVCOM
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 35
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->INDRF[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,37
|
||||
END
|
||||
|
||||
STRINGA 36
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza fiscale delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->CIVRF
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,37
|
||||
END
|
||||
|
||||
STRINGA 37 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza fiscale+nr. civico delegato"
|
||||
PROMPT 3 33 ""
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->INDRES[1,35]
|
||||
FLAGS "H"
|
||||
MESSAGE COPY,40
|
||||
END
|
||||
|
||||
STRINGA 39
|
||||
BEGIN
|
||||
KEY "Nr. civico di residenza delegato"
|
||||
PROMPT 1 33 ""
|
||||
FIELD 206@->CIVRES
|
||||
FLAGS "H"
|
||||
MESSAGE APPEND,40
|
||||
END
|
||||
|
||||
STRINGA 40 38
|
||||
BEGIN
|
||||
KEY "Indirizzo residenza+nr. civico delegato"
|
||||
PROMPT 3 33 ""
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
STRINGA 41
|
||||
BEGIN
|
||||
KEY "CAP residenza fiscale delegato"
|
||||
PROMPT 42 33 ""
|
||||
FIELD 206@->CAPRF
|
||||
GROUP 6
|
||||
END
|
||||
|
||||
STRINGA 42
|
||||
BEGIN
|
||||
KEY "CAP residenza delegato"
|
||||
PROMPT 42 33 ""
|
||||
FIELD 206@->CAPRES
|
||||
GROUP 5
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER FIRST 23
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Totale pagine sezione 1"
|
||||
PROMPT 11 6 ""
|
||||
END
|
||||
|
||||
NUMERO 2 5
|
||||
BEGIN
|
||||
KEY "Totale righe dettaglio sezione 1"
|
||||
PROMPT 18 6 ""
|
||||
END
|
||||
|
||||
NUMERO 3 15
|
||||
BEGIN
|
||||
KEY "Ammontare complessivo sezione 1"
|
||||
PROMPT 25 6 ""
|
||||
PICTURE "###.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 4 3
|
||||
BEGIN
|
||||
KEY "Totale pagine sezione 2"
|
||||
PROMPT 49 6 ""
|
||||
END
|
||||
|
||||
NUMERO 5 5
|
||||
BEGIN
|
||||
KEY "Totale righe dettaglio sezione 2"
|
||||
PROMPT 56 6 ""
|
||||
END
|
||||
|
||||
NUMERO 6 15
|
||||
BEGIN
|
||||
KEY "Ammontare complessivo sezione 2"
|
||||
PROMPT 64 6 ""
|
||||
PICTURE "###.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
DATA 8 10
|
||||
BEGIN
|
||||
KEY "Data di stampa"
|
||||
PROMPT 6 10 ""
|
||||
MESSAGE _TODAY
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION HEADER ODD 21
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 16 15 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 29 15 ""
|
||||
END
|
||||
|
||||
NUMERO 3 5
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 37 15 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 15 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION BODY ODD 2
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Progressivo riga"
|
||||
PROMPT 3 1 ""
|
||||
FIELD 135->NUMRIG
|
||||
END
|
||||
|
||||
STRINGA 2 2
|
||||
BEGIN
|
||||
KEY "Stato"
|
||||
PROMPT 7 1 ""
|
||||
FIELD 135->STATO
|
||||
END
|
||||
|
||||
STRINGA 3
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 11 1 ""
|
||||
FIELD 135->PIVA
|
||||
END
|
||||
|
||||
NUMERO 4 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in Euro" //++
|
||||
PROMPT 23 1 "" //2 sx
|
||||
FIELD 135->AMMLIRE
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 51 3
|
||||
BEGIN
|
||||
PROMPT 35 1 "" //2 sx
|
||||
FIELD 135->CODVAL
|
||||
FLAGS "H"
|
||||
END
|
||||
|
||||
NUMERO 5 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in valuta"
|
||||
PROMPT 35 1 "" //2 sx
|
||||
FIELD 135->AMMVALUTA
|
||||
MESSAGE _IMP
|
||||
PICTURE "####.###.###"
|
||||
END
|
||||
|
||||
STRINGA 6 1
|
||||
BEGIN
|
||||
KEY "Natura della transazione"
|
||||
PROMPT 49 1 "" //1 sx
|
||||
FIELD 135->NATURA
|
||||
END
|
||||
|
||||
NUMERO 7 4
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata prima parte"
|
||||
PROMPT 53 1 ""
|
||||
FIELD 135->NOMENCL[1,4]
|
||||
PICTURE "@@@@"
|
||||
END
|
||||
|
||||
NUMERO 71 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata seconda parte"
|
||||
PROMPT 57 1 ""
|
||||
FIELD 135->NOMENCL[5,6]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 72 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata terza parte"
|
||||
PROMPT 59 1 ""
|
||||
FIELD 135->NOMENCL[7,8]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 8 9
|
||||
BEGIN
|
||||
KEY "Massa netta in kilogrammi"
|
||||
PROMPT 62 1 ""
|
||||
FIELD 135->MASSAKG
|
||||
PICTURE "#########"
|
||||
MESSAGE _ROUND,0
|
||||
END
|
||||
|
||||
NUMERO 9 9
|
||||
BEGIN
|
||||
KEY "Massa in unita' supplementare"
|
||||
PROMPT 72 1 "" //1 sx
|
||||
FIELD 135->MASSAUMS
|
||||
PICTURE "#########"
|
||||
MESSAGE _ROUND,0
|
||||
END
|
||||
|
||||
NUMERO 10 12
|
||||
BEGIN
|
||||
KEY "Valore statistico"
|
||||
PROMPT 82 1 "" //2 sx
|
||||
FIELD 135->VALSTAT
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 11 1
|
||||
BEGIN
|
||||
KEY "Codice consegna"
|
||||
PROMPT 96 1 "" //1 sx
|
||||
FIELD 135->CONSEGNA[1,1]
|
||||
END
|
||||
|
||||
STRINGA 12 1
|
||||
BEGIN
|
||||
KEY "Modo di trasporto"
|
||||
PROMPT 99 1 "" //1 sx
|
||||
FIELD 135->TRASPORTO
|
||||
END
|
||||
|
||||
STRINGA 13 2
|
||||
BEGIN
|
||||
KEY "Paese destinazione/provenienza"
|
||||
PROMPT 102 1 "" //1 sx
|
||||
FIELD 135->PAESE
|
||||
END
|
||||
|
||||
STRINGA 14 2
|
||||
BEGIN
|
||||
KEY "Paese di origine"
|
||||
PROMPT 106 1 "" //1 sx
|
||||
FIELD 135->PAESEORIG
|
||||
END
|
||||
|
||||
STRINGA 15 2
|
||||
BEGIN
|
||||
KEY "Provincia di destinazione"
|
||||
PROMPT 110 1 "" //1 sx
|
||||
FIELD 135->PROV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER ODD 31
|
||||
|
||||
NUMERO 1 12
|
||||
BEGIN
|
||||
KEY "Riporto dalla pagina precedente"
|
||||
PROMPT 23 1 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 2 12
|
||||
BEGIN
|
||||
KEY "Totale riepiloghi"
|
||||
PROMPT 23 3 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 3 3
|
||||
BEGIN
|
||||
KEY "Numero di pagina"
|
||||
PROMPT 110 3 "" //1 sx
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION HEADER EVEN 22
|
||||
|
||||
NUMERO 1 4
|
||||
BEGIN
|
||||
KEY "Mese"
|
||||
PROMPT 16 15 ""
|
||||
PICTURE "@ #"
|
||||
END
|
||||
|
||||
NUMERO 2 1
|
||||
BEGIN
|
||||
KEY "Trimestre"
|
||||
PROMPT 29 15 ""
|
||||
PICTURE ""
|
||||
END
|
||||
|
||||
NUMERO 3 6
|
||||
BEGIN
|
||||
KEY "Anno"
|
||||
PROMPT 37 15 ""
|
||||
PICTURE "^^# #"
|
||||
END
|
||||
|
||||
STRINGA 4
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 53 15 ""
|
||||
FIELD 106@->PAIV
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
// Sezione di stampa rettifiche
|
||||
|
||||
SECTION BODY EVEN 2
|
||||
|
||||
NUMERO 1 3
|
||||
BEGIN
|
||||
KEY "Progressivo riga"
|
||||
PROMPT 3 1 ""
|
||||
FIELD 135->NUMRIG
|
||||
END
|
||||
|
||||
NUMERO 2 2
|
||||
BEGIN
|
||||
KEY "Mese del periodo di riferimento (riempito da programma)"
|
||||
PROMPT 7 1 ""
|
||||
PICTURE "#@"
|
||||
END
|
||||
|
||||
NUMERO 3 1
|
||||
BEGIN
|
||||
KEY "Trimestre del periodo di riferimento (riempito da programma)"
|
||||
PROMPT 11 1 ""
|
||||
PICTURE "@"
|
||||
END
|
||||
|
||||
NUMERO 4 4
|
||||
BEGIN
|
||||
KEY "Anno del periodo di riferimento"
|
||||
PROMPT 14 1 ""
|
||||
FIELD 135->ANNORETT
|
||||
END
|
||||
|
||||
STRINGA 5 2
|
||||
BEGIN
|
||||
KEY "Stato"
|
||||
PROMPT 19 1 ""
|
||||
FIELD 135->STATO
|
||||
END
|
||||
|
||||
STRINGA 6
|
||||
BEGIN
|
||||
KEY "Partita IVA"
|
||||
PROMPT 23 1 ""
|
||||
FIELD 135->PIVA
|
||||
END
|
||||
|
||||
STRINGA 7 1
|
||||
BEGIN
|
||||
KEY "Segno"
|
||||
PROMPT 37 1 ""
|
||||
FIELD 135->SEGNORETT
|
||||
END
|
||||
|
||||
NUMERO 8 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in Euro"
|
||||
PROMPT 39 1 "" //2 sx
|
||||
FIELD 135->AMMLIRE
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 91 3
|
||||
BEGIN
|
||||
PROMPT 35 1 "" //2 sx
|
||||
FIELD 135->CODVAL
|
||||
FLAGS "H"
|
||||
END
|
||||
|
||||
NUMERO 9 12
|
||||
BEGIN
|
||||
KEY "Ammontare operazioni in valuta"
|
||||
PROMPT 52 1 "" //2 sx
|
||||
FIELD 135->AMMVALUTA
|
||||
MESSAGE _IMP
|
||||
PICTURE "####.###.###"
|
||||
END
|
||||
|
||||
STRINGA 10 1
|
||||
BEGIN
|
||||
KEY "Natura della transazione"
|
||||
PROMPT 65 1 "" //1 sx
|
||||
FIELD 135->NATURA
|
||||
END
|
||||
|
||||
NUMERO 11 4
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata prima parte"
|
||||
PROMPT 68 1 "" //1 sx
|
||||
FIELD 135->NOMENCL[1,4]
|
||||
PICTURE "@@@@"
|
||||
END
|
||||
|
||||
NUMERO 111 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata seconda parte"
|
||||
PROMPT 72 1 ""
|
||||
FIELD 135->NOMENCL[5,6]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 112 2
|
||||
BEGIN
|
||||
KEY "Nomenclatura combinata terza parte"
|
||||
PROMPT 74 1 ""
|
||||
FIELD 135->NOMENCL[7,8]
|
||||
PICTURE "@@"
|
||||
END
|
||||
|
||||
NUMERO 12 12
|
||||
BEGIN
|
||||
KEY "Valore statistico"
|
||||
PROMPT 78 1 "" //2 sx
|
||||
FIELD 135->VALSTAT
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
END
|
||||
|
||||
SECTION FOOTER EVEN 36
|
||||
|
||||
STRINGA 4 1
|
||||
BEGIN
|
||||
KEY "Segno riporto rettifiche"
|
||||
PROMPT 37 1 ""
|
||||
END
|
||||
|
||||
NUMERO 1 12
|
||||
BEGIN
|
||||
KEY "Riporto dalla pagina precedente"
|
||||
PROMPT 39 1 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
STRINGA 7 1
|
||||
BEGIN
|
||||
KEY "Segno Totale rettifiche"
|
||||
PROMPT 37 3 ""
|
||||
END
|
||||
|
||||
NUMERO 2 12
|
||||
BEGIN
|
||||
KEY "Totale rettifiche"
|
||||
PROMPT 39 3 "" //2 sx
|
||||
PICTURE "####.###.###"
|
||||
MESSAGE _IMP
|
||||
END
|
||||
|
||||
NUMERO 3 3
|
||||
BEGIN
|
||||
KEY "Numero di pagina"
|
||||
PROMPT 87 4 "" //2 sx
|
||||
END
|
||||
|
||||
END
|
||||
228
src/in/in0100c.rep
Normal file
228
src/in/in0100c.rep
Normal file
@ -0,0 +1,228 @@
|
||||
<?xml version="1.0" encoding="UTF-8" ?>
|
||||
<report libraries="" page_merge="" save_printer="" name="in0100c" use_printer_font="" orientation="" page_split="" lpi="6" command="in0 -0 in0100a" class="">
|
||||
<description>Stampa rettifiche INTRA</description>
|
||||
<font face="Courier New" size="8" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Head" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field deactivated="" type="Testo" hidden="" align="center" link="" dynamic_height="" shade_offset="" width="122" codval="" id="" pattern="1" hide_zero="" text="Stampa rettifiche INTRA">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#SYSTEM.RAGSOC</source>
|
||||
</field>
|
||||
<field x="99" deactivated="" type="Data" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#SYSTEM.DATE</source>
|
||||
</field>
|
||||
<field x="110.5" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="Pag." />
|
||||
<field x="115.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>#REPORT.PAGE</source>
|
||||
</field>
|
||||
<field x="70.5" y="2" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Massa">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="92" y="2" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Valore statistico">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="50" y="2.25" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" height="2" id="" pattern="1" hide_zero="" text="Nat.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="52" y="2.25" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" height="2" id="" pattern="1" hide_zero="" text="Nomen. comb.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="70.5" y="2.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="Kg.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="76" y="2.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Suppplem.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="33.5" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="11" codval="" id="" pattern="1" hide_zero="" text="Ammontare">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="105" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="" pattern="1" hide_zero="" text="Tr">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="108" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Cons.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="112" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="Paesi Prov. ">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="52" y="3.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="9" codval="" height="2" id="" pattern="1" hide_zero="" text="Codice servizio">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="61" y="3.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="13" codval="" height="2" id="" pattern="1" hide_zero="" text="Modalit&#E0; erogazione">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="77.5" y="3.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Modalit&#E0; inc.F;pag.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="92" y="3.75" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" height="2" id="" pattern="1" hide_zero="" text="Stato inc.F;pag.">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="4" y="4.25" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="5" codval="" id="" pattern="1" hide_zero="" text="Tipo">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="27" y="4.25" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="Euro">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="43.5" y="4.25" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="Valuta">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field border="2" y="6" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="122" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Body" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field x="1" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>ANNO</source>
|
||||
</field>
|
||||
<field x="7" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="2" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>PERIODO</source>
|
||||
</field>
|
||||
<field x="10" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>NUMRIG</source>
|
||||
</field>
|
||||
<field x="18" deactivated="" type="Array" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>TIPO</source>
|
||||
<list>
|
||||
<li Value="Acquisto" Code="A" />
|
||||
<li Value="Cessione" Code="C" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="29" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>STATO</source>
|
||||
</field>
|
||||
<field x="33" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="14" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>PIVA</source>
|
||||
</field>
|
||||
<field x="48" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="50" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>CLIFO.RAGSOC</source>
|
||||
</field>
|
||||
<field x="5" y="1.5" deactivated="" type="Array" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>SEZIONE</source>
|
||||
<list>
|
||||
<li Value="Beni" Code="1">"#B1.100@"
|
||||
SHOW
|
||||
"#B1.200@"
|
||||
HIDE</li>
|
||||
<li Value="Servizi" Code="3">"#B1.200@"
|
||||
SHOW
|
||||
"#B1.100@"
|
||||
HIDE</li>
|
||||
</list>
|
||||
</field>
|
||||
<field x="1" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="15" codval="" id="" pattern="1" hide_zero="" text="Rettifica di :">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="14" y="3" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="4" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>ANNORETT</source>
|
||||
</field>
|
||||
<field x="20" y="3" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="2" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>PERETT</source>
|
||||
</field>
|
||||
<field x="23" y="3" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="7" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>NUMRETT</source>
|
||||
</field>
|
||||
<field x="32" y="3" deactivated="" type="Array" hidden="" link="" dynamic_height="" shade_offset="" width="10" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>FREQUENZA</source>
|
||||
<list>
|
||||
<li Value="Mensile" Code="M" />
|
||||
<li Value="Trimestrale" Code="T" />
|
||||
<li Value="Annuale" Code="A" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="46" y="3" deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="15" codval="" id="" pattern="1" hide_zero="" text="Segno :">
|
||||
<font face="Courier New" bold="1" size="8" />
|
||||
</field>
|
||||
<field x="53" y="3" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="" pattern="1" hide_zero="" text="">
|
||||
<source>SEGNORETT</source>
|
||||
</field>
|
||||
<field x="13" y="1.5" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<source>AMMLIRE</source>
|
||||
<postscript description="B1.101 POSTSCRIPT">MESSAGE ADD,F1.101</postscript>
|
||||
</field>
|
||||
<field x="32" y="1.5" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="102" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<source>AMMVALUTA</source>
|
||||
</field>
|
||||
<field x="51" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="1" codval="" id="103" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>NATURA</source>
|
||||
</field>
|
||||
<field x="53" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="8" codval="" id="104" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>NOMENCL</source>
|
||||
</field>
|
||||
<field x="62" y="1.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="12" codval="" id="105" pattern="1" hide_zero="1" text="###.###,@@@@@">
|
||||
<groups>100</groups>
|
||||
<source>MASSAKG</source>
|
||||
</field>
|
||||
<field x="75" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="106" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>UMS</source>
|
||||
</field>
|
||||
<field x="77" y="1.5" deactivated="" type="Numero" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="12" codval="" id="107" pattern="1" hide_zero="1" text="###.###,@@@@@">
|
||||
<groups>100</groups>
|
||||
<source>MASSAUMS</source>
|
||||
</field>
|
||||
<field x="90" y="1.5" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="15" codval="" id="108" pattern="1" hide_zero="1" text="###.###.###,@@">
|
||||
<groups>100</groups>
|
||||
<source>VALSTAT</source>
|
||||
<postscript description="B1.108 POSTSCRIPT">MESSAGE ADD,F1.108</postscript>
|
||||
</field>
|
||||
<field x="106" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="109" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>TRASPORTO</source>
|
||||
</field>
|
||||
<field x="108" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="4" codval="" id="109" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>CONSEGNA</source>
|
||||
</field>
|
||||
<field x="112" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="111" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PAESE</source>
|
||||
</field>
|
||||
<field x="115" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="2" codval="" id="112" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PAESEORIG</source>
|
||||
</field>
|
||||
<field x="118" y="1.5" deactivated="" type="Stringa" hidden="" link="" dynamic_height="" shade_offset="" width="3" codval="" id="113" pattern="1" hide_zero="" text="">
|
||||
<groups>100</groups>
|
||||
<source>PROV</source>
|
||||
</field>
|
||||
<field x="53" y="1.5" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="6" codval="" id="201" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>CODSERV</source>
|
||||
</field>
|
||||
<field x="60.5" y="1.5" deactivated="" type="Array" hidden="1" link="" dynamic_height="" shade_offset="" width="17" codval="" id="202" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>MODEROG</source>
|
||||
<list>
|
||||
<li Value="Unica soluzione" Code="I" />
|
||||
<li Value="Pi&#F9; soluzioni" Code="R" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="77.5" y="1.5" deactivated="" type="Array" hidden="1" link="" dynamic_height="" shade_offset="" width="12" codval="" id="203" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>MODINCPAG</source>
|
||||
<list>
|
||||
<li Value="Bonifico" Code="B" />
|
||||
<li Value="Accredito" Code="A" />
|
||||
<li Value="Altro" Code="X" />
|
||||
</list>
|
||||
</field>
|
||||
<field x="90" y="1.5" deactivated="" type="Stringa" hidden="1" link="" dynamic_height="" shade_offset="" width="3" codval="" id="204" pattern="1" hide_zero="" text="">
|
||||
<groups>200</groups>
|
||||
<source>ISOINCPAG</source>
|
||||
</field>
|
||||
</section>
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="" hidden="" page_break="" can_break="" pattern="1" />
|
||||
<section repeat="" keep_with_next="" deactivated="" hidden_if_needed="" type="Foot" level="1" hidden="" page_break="" can_break="" pattern="1">
|
||||
<field border="2" deactivated="" type="Linea" hidden="" link="" dynamic_height="" shade_offset="" width="122" codval="" height="0" id="" pattern="1" hide_zero="" text="" />
|
||||
<field deactivated="" type="Testo" hidden="" link="" dynamic_height="" shade_offset="" width="12" codval="" id="" pattern="1" hide_zero="" text="Totale">
|
||||
<font face="Courier New" bold="1" size="10" />
|
||||
</field>
|
||||
<field x="13" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="18" codval="" id="101" pattern="1" hide_zero="1" text="###.###.###,@@" />
|
||||
<field x="90" deactivated="" type="Valuta" hidden="" align="right" link="" dynamic_height="" shade_offset="" width="15" codval="" id="108" pattern="1" hide_zero="1" text="###.###.###,@@" />
|
||||
</section>
|
||||
<sql>USE RIEPRETT SELECT (SEZIONE==2)||(SEZIONE==4)
|
||||
JOIN CLIFO KEY 5 INTO TIPOCF==TIPOCF STATOPAIV=STATO PAIV==PIVA </sql>
|
||||
</report>
|
||||
1379
src/in/in0100d.frm
1379
src/in/in0100d.frm
File diff suppressed because it is too large
Load Diff
@ -102,9 +102,11 @@ bool TImmissione_mask::on_field_event(TOperable_field& o, TField_event e, long j
|
||||
if (app().has_module(CGAUT, CHK_DONGLE))
|
||||
{
|
||||
const TString& numreg = o.get();
|
||||
|
||||
if (numreg.full())
|
||||
{
|
||||
const TRectype& mov = cache().get(LF_MOV, numreg);
|
||||
const TRectype& mov = cache().get(LF_MOV, numreg);
|
||||
|
||||
if (mov.empty())
|
||||
{
|
||||
if (e == fe_modify && !app().is_transaction())
|
||||
@ -125,6 +127,9 @@ bool TImmissione_mask::on_field_event(TOperable_field& o, TField_event e, long j
|
||||
}
|
||||
}
|
||||
}
|
||||
else
|
||||
if (e == fe_modify)
|
||||
stop_run(K_ENTER);
|
||||
enable_valuta();
|
||||
if (e == fe_init && o.get().full() && get_real(F_TOT_DOC) == ZERO)
|
||||
set(F_TOT_DOC, cache().get(LF_MOV, o.get(), MOV_TOTDOC));
|
||||
@ -207,7 +212,8 @@ bool TImmissione_mask::on_field_event(TOperable_field& o, TField_event e, long j
|
||||
const real totdoc = get_real(F_TOT_DOC);
|
||||
const real totdocimm = get_real(F_TOT_IMM);
|
||||
|
||||
if (totdoc != totdocimm)
|
||||
if ((mode() == MODE_INS || mode() == MODE_MOD) &&
|
||||
totdoc != totdocimm)
|
||||
{
|
||||
const TString str_totdoc(totdoc.string());
|
||||
return error_box(FR("Totale documento (%s) diverso dal totale documento immesso(%s)"), (const char *)str_totdoc, (const char *)totdocimm.string());
|
||||
|
||||
@ -156,6 +156,7 @@ BEGIN
|
||||
PROMPT 33 5 ""
|
||||
ITEM "C|Cliente"
|
||||
ITEM "F|Fornitore"
|
||||
FIELD TIPOCF
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
|
||||
@ -355,6 +355,7 @@ BEGIN
|
||||
PROMPT 33 15 ""
|
||||
ITEM "C|Cliente"
|
||||
ITEM "F|Fornitore"
|
||||
FIELD TIPOCF
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
|
||||
@ -254,6 +254,7 @@ void TRiepiloghi_Intra::add(const TRectype& row, const TRectype& head, int peri,
|
||||
rec.put(RIEPINTRA_ANNO, head.get_date(INTRA_DATAREG).year());
|
||||
rec.put(RIEPINTRA_PERIODO, peri);
|
||||
rec.zero(RIEPINTRA_NUMRIG);
|
||||
rec.put(RIEPINTRA_TIPOCF, head.get(INTRA_TIPOCF));
|
||||
rec.put(RIEPINTRA_STATO, clifo.get(CLI_STATOPAIV));
|
||||
rec.put(RIEPINTRA_PIVA, clifo.get(CLI_PAIV));
|
||||
rec.put(RIEPINTRA_NATURA, row.get(RINTRA_NATURA));
|
||||
@ -389,6 +390,7 @@ int TRettifiche_Intra::add(const TRectype& rintra, const TRectype& mov, long nr_
|
||||
if (::is_euro_value(codval))
|
||||
codval.cut(0);
|
||||
|
||||
rett.put(RIEPINTRA_TIPOCF, mov.get(INTRA_TIPOCF));
|
||||
rett.put(RIEPINTRA_STATO, clifo.get(CLI_STATOPAIV));
|
||||
rett.put(RIEPINTRA_PIVA, clifo.get(CLI_PAIV));
|
||||
rett.put(RIEPINTRA_NATURA, rintra.get(RINTRA_NATURA));
|
||||
|
||||
@ -40,10 +40,11 @@ Module = 18
|
||||
Flags = "F"
|
||||
Item_01 = "Gestione movimenti", "in0 -4", "F"
|
||||
Item_02 = "Gestione riepiloghi", "in0 -5", "F"
|
||||
Item_03 = "Stampa riepiloghi", "in0 -0", "F"
|
||||
Item_04 = "Gestione rettifiche", "in0 -6", "F"
|
||||
Item_05 = "Generazione dischetti", "in0 -1", "F"
|
||||
Item_06 = "Intra 12/13", "in0 -2", "F"
|
||||
Item_07 = "Dati riassuntivi", "ba3 -0 IRD", "F"
|
||||
Item_08 = "Stampa dati riassuntivi", "ba3 -1 IRD", "F"
|
||||
Item_03 = "Stampa movimenti", "in0 -0 in0100a", "F"
|
||||
Item_04 = "Stampa riepiloghi e rettifiche", "in0 -0 in0100b", "F"
|
||||
Item_05 = "Gestione rettifiche", "in0 -6", "F"
|
||||
Item_06 = "Generazione dischetti", "in0 -1", "F"
|
||||
Item_07 = "Intra 12/13", "in0 -2", "F"
|
||||
Item_08 = "Dati riassuntivi", "ba3 -0 IRD", "F"
|
||||
Item_09 = "Stampa dati riassuntivi", "ba3 -1 IRD", "F"
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user