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

Mi ero dimenticato un po di maschere. lel

Browse Source
This commit is contained in:
smen 2023-03-28 17:58:43 +02:00
parent 3597192f7a
commit a02c0ccfb1
9 changed files with 2440 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1187
src/f9/f90600.cpp Normal file
View File

File diff suppressed because it is too large Load Diff

188
src/f9/f90600.h Normal file
View File

@ -0,0 +1,188 @@
#ifndef _F90600_H_
#define _F90600_H_
#include "mask.h"
#include "execp.h"
#include "f90600a.h"
#include "mov.h"
#include "automask.h"
#include "applicat.h"
#include "f9lib.h"
class TConfigIntf9_mask : public TAutomask
{
protected:
bool on_key(const KEY key);
bool on_field_event(TOperable_field& o, TField_event e, long jolly);
public:
// @cmember Costruttore (crea la maschera leggendo la descrizione dal file .msk)
TConfigIntf9_mask(const char* filename, int num = 0) : TAutomask(filename, num) {};
// @cmember Costruttore (crea una maschera vuota con i parametri dati)
TConfigIntf9_mask(const char* title, int pages, int cols, int rows, int xpos = -1, int ypos = -1) : TAutomask(title, pages, cols, rows, xpos, ypos) {};
};
class TApri_pacchetto_msk : public TAutomask
{
TString _idestr;
TDate _dataestr;
bool _provv;
char _tipodoc;
TString _statoestr;
TDate _datadal;
TDate _dataal;
bool on_field_event(TOperable_field& o, TField_event e, long jolly) override;
//bool inall_handler() const;
//bool inescludi_handler() const;
//bool inselect_handler() const;
//void conferma_esclusi() const;
public:
void fill_estr() const;
void fill_res() const;
void set_from_estrazione(TToken_string& row_estrazione);
TApri_pacchetto_msk();
~TApri_pacchetto_msk() {}
};
class TArchInt_mask : public TAutomask
{
TApri_pacchetto_msk _inclusi_msk;
bool on_field_event(TOperable_field& o, TField_event e, long jolly) override;
void load_sheet_causali(const TString& tipo_sel);
void open_apri_estr_win();
void fill() const;
void delete_pack(bool all = false);
void delete_estr_fld(const TString& idestr);
void controllo_errori();
void open_win_estr();
void open_win_conf();
bool save_conf(TMask& config_mask);
public:
TArchInt_mask();
~TArchInt_mask() {}
};
class Tf9IntEstrai_mask : public TMask
{
TEstrazione * _estrazione; // Oggetto estrazione in corso di elaborazione
void enable_fields(bool en = true);
TDate get_dataini() const { return get_date(ES_DATAINI); }
TDate get_dataend() const { return get_date(ES_DATAEND); }
char get_tipodoc() const { return get(ES_TIPODOC)[0]; }
TipoIVA get_tipoiva() const { return get_tipodoc() == 'A' ? iva_acquisti : iva_vendite; }
TString get_descr() const { return get(ES_DESCR); }
bool is_provviso() const { return get(ES_FLAGPROV)[0] == 'P'; }
/* Prepara l'estrazione caricando tutti i movimenti dato un periodo (data registrazione),
* e avvia la procedura di estrazione.
* [See TEstrazione::estrai()].
*/
int estrai();
/** Segna su DRD che l'estrazione e' in errore diag. gestionale. */
//void segna_in_errore() const;
bool causale_in_lista(const TString& cod_cau, TToken_string cau_list);
TToken_string select_causali(const TString& tipo_sdi, const char reg);
static bool estrai_handler(TMask_field& f, KEY key);
//static bool enable_handler(TMask_field& f, KEY key);
//static bool dataini_handler(TMask_field& f, KEY key);
//static bool dataend_handler(TMask_field& f, KEY key);
public:
Tf9IntEstrai_mask();
~Tf9IntEstrai_mask() { safe_delete(_estrazione); };
};
class TControlloIntegrazioni_mask : public TAutomask
{
TArray _controllo_mov; // Usare import_error_list().
char _ordin;
char _verso;
int _selected_mov;
bool _sel_esclusi;
bool _is_escluso;
TString _cod_soc;
TString _id_estr;
char _tipo_doc_err{};
TDate _datada;
TDate _dataa;
//Filter variables
TDate _flt_da_data;
TDate _flt_a_data;
TString4 _flt_tipodoc;
TString16 _flt_numdoc;
real _flt_tot_doc_da;
real _flt_tot_doc_a;
TString16 _flt_codforn;
TString _flt_ragsoc;
TString16 _flt_piva;
void associa();
bool associa_int_ven(const long numreg, TToken_string key_paf);
//void conferma_esclusi() const;
TArray& import_error_list();
void fill_sheets();
void fill_pafw300_sheet(bool filter = false);
TMask& get_win_filter();
void open_win_filter();
TToken_string* selected_mov();
TToken_string* selected_fat() const;
/** Gestisce la selezione multipla negli sheet di controllo movimenti */
//void selfatt(TOperable_field& o, long jolly) const;
bool on_field_event(TOperable_field& o, TField_event e, long jolly) override;
public:
TControlloIntegrazioni_mask(const char* codsoc, const char* id_estr, bool esclusi = false);
};
class TArchiviazioneIntegrazioni : public TSkeleton_application
{
TArchInt_mask * _msk;
Tf9IntEstrai_mask * _estr_msk;
TArray _esclusi; // Vettore con i movimenti esclusi
public:
virtual bool create();
virtual bool destroy();
virtual void main_loop();
TArray & esclusi() { return _esclusi; }
static const char* traduci_stato(const TString& cod);
void run_estr_msk() { _estr_msk->run(); }
TArchiviazioneIntegrazioni() {}
};
inline TArchiviazioneIntegrazioni& f9Int_app()
{
static TArchiviazioneIntegrazioni* app = nullptr;
if (app == nullptr)
app = (TArchiviazioneIntegrazioni*)&main_app();
return *app;
}
#endif //_F90600_H_

69
src/f9/f90600a.h Normal file
View File

@ -0,0 +1,69 @@
// Sheet Pacchetti gia' elaborati
#define S_ELAB 201
#define F_TEXT 202
#define B_SHOWESTR 203
#define B_SHOWESCL 204
#define F_SEL 101
#define F_ARCH_B 102
#define F_IDESTR 103
#define F_DATAESTR 104
#define F_PROV_B 105
#define F_TIPODOC 106
#define F_DATADAL 107
#define F_DATAAL 108
#define F_USER 109
#define F_STATESTR 110
#define F_DESCR_E 111
// Campi del vettore _movs per promemoria
// F_SEL 101
// F_NUMREG 102
// F_DATAREG 103
// F_DATADOC 104
// F_CODCAUS 105
// F_MESELIQ 106
// F_NUMDOC 107
// F_IMPTOTDOC 108
// F_FORN 109
// F_RAGSOC 110
// F_PROTIVA 111
// F_DESCR 112
// F_ESCLUDI 113
// F_ESCLUSO 114
// F_DESCRERR 115
// Campi maschera finestra runtime estrazione
#define ES_DATAINI 501
#define ES_DATAEND 502
#define ES_FLAGPROV 503
#define ES_TIPODOC 504
#define ES_DATEGROUP 505
#define ES_FLAGGROUP 506
#define ES_TIPOGROUP 507
#define ES_DESCGROUP 508
#define ES_DESCR 509
#define ES_DOCSDI 510
// Campi maschera configurazione
#define CF_CODGROUP 501
#define CF_CODSOC 502
#define CF_ADDRGROUP 503
#define CF_ADDRDOC 504
#define CF_ADDRDOCLOC 505
#define CF_ESTRGROUP 506
#define CF_CARTEXP 507
#define CF_LVLGROUP 508
#define CF_LVLOLD 509
#define CF_LVLNEW 510
#define CF_TABLEVEL 511
// Campi maschera descrizione estrazione
#define DES_TEXT 501
#define DES_GROUP 502
// Campi maschera esclusi
#define ESC_BESTR 501
#define ESC_BEXIT 502
#define ESC_SSHEE 503

155
src/f9/f90600a.uml Normal file
View File

@ -0,0 +1,155 @@
#include "f90600a.h"
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_ELABORA 2 2
BEGIN
PROMPT 1 2 "Estrazione"
PICTURE TOOL_ELABORA
FLAGS ""
END
BUTTON DLG_DELREC 2 2
BEGIN
PROMPT 1 1 "~Elimina"
PICTURE TOOL_DELREC
END
BUTTON DLG_CONFIG 2 2
BEGIN
PROMPT 1 3 "Configurazione"
PICTURE TOOL_CONFIG
FLAGS ""
END
BUTTON DLG_FINDREC 2 2
BEGIN
PROMPT 1 4 "Controllo Estr."
PICTURE TOOL_PERMISSIONS
FLAGS ""
END
BUTTON B_SHOWESTR 2 2
BEGIN
PROMPT 1 5 "Apri Estr."
PICTURE BMP_EXPORT
FLAGS ""
END
BUTTON DLG_RECALC
BEGIN
PROMPT 1 6 "Ricarica"
PICTURE TOOL_CONVERT
FLAS ""
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT 1 7 ""
PICTURE 0
END
BUTTON B_SHOWESCL 2 2
BEGIN
PROMPT 1 8 "Mostra esclusi"
PICTURE TOOL_PERMISSIONS
END
#include <helpbar.h>
ENDPAGE
PAGE "Monitor Estrazioni" 0 2 0 0
TEXT F_TEXT
BEGIN
PROMPT 0 0 "@BElenco Pacchetti"
END
SPREADSHEET S_ELAB -1 -1
BEGIN
PROMPT 0 1 "Elenco pacchetti elaborati"
ITEM ""
ITEM "Archiviato@8"
ITEM "ID Estrazione@14"
ITEM "Data@8"
ITEM "Provv.@4"
ITEM "Tipo@8"
ITEM "dal@8"
ITEM "al@8"
ITEM "Utente@8"
ITEM "Stato estrazione@22"
ITEM "Descrizione@50"
END
ENDPAGE
ENDMASK
PAGE "Pacchetti" -1 -1 78 13
BOOLEAN F_SEL
BEGIN
PROMPT 1 1 ""
END
BOOLEAN F_ARCH_B
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_IDESTR 18
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
BOOLEAN F_PROV_B
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_DESCR_E 50
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_TIPODOC 13
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
DATE F_DATADAL
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
DATE F_DATAAL
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_USER 20
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_DATAESTR 19
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_STATESTR 38
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
ENDPAGE
ENDMASK

61
src/f9/f90600b.h Normal file
View File

@ -0,0 +1,61 @@
// Maschera controllo errori in comune con monitor e esclusi
// Sheet Pacchetti gia' elaborati
#define B_ASSOC 202
#define B_SELESCL 203
#define B_ESCL 204
#define B_ALLESCL 205
#define B_FILTER_CONF 208
#define B_FILTER_ON 209
#define B_FILTER_OFF 210
// Sheet movimenti da controllare
#define S_CONTROLLO 206
#define S_FPPRO 207
// Cambi maschera ordinamento sheet FPPRO
#define F_ORDER 301
#define F_VERSO 302
//Filtro FPPRO
#define F_FLTDATAGRP 310
#define F_FLTDATADA 311
#define F_FLTDATAA 312
#define F_FLTDOCGRP 313
#define F_FLTTIPODOC 314
#define F_FLTNUMDOC 315
#define F_FLTTOTDOCDA 316
#define F_FLTTOTDOCA 317
#define F_FLTFORNGRP 318
#define F_FLTCODFORN 319
#define F_FLTRAGSOC 320
#define F_FLTPIVA 321
#define F_CSEL 101
#define F_CNUMREG 102
#define F_CDATAREG 103
#define F_CDATADOC 104
#define F_CCODCAUS 105
#define F_CMESELIQ 106
#define F_CNUMDOC 107
#define F_CIMPTOTDOC 108
#define F_CFORN 109
#define F_CRAGSOC 110
#define F_CPROTIVA 111
#define F_CDESCR 112
#define F_CESCLUDI 113
#define F_CESCLUSO 114
#define F_CDESCRERR 115
// Sheet fatture FPPRO da associare
#define F_FSEL 101
#define F_FTIPODOC 102
#define F_FDATA 103
#define F_FNUMDOC 104
#define F_FIMPTOTDOC 105
#define F_FFORNITORE 106
#define F_FRAGSOC 107
#define F_FSTATOPIVA 108
#define F_FPIVA 109
#define F_FPROKEYS 110

316
src/f9/f90600b.uml Normal file
View File

@ -0,0 +1,316 @@
#include "f90600b.h"
TOOLBAR "topbar" 0 0 0 2
BUTTON B_ASSOC 2 2
BEGIN
PROMPT 1 6 "Associa mov."
PICTURE TOOL_SAVEREC
FLAGS ""
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 1 ""
PICTURE 0
END
BUTTON B_SELESCL 2 2
BEGIN
PROMPT 1 8 "Sel. esclusi"
PICTURE TOOL_MULTISEL
FLAGS ""
END
BUTTON B_ESCL 2 2
BEGIN
PROMPT 1 7 "Conf. esclusi"
PICTURE TOOL_WARNING
FLAGS ""
END
BUTTON B_ALLESCL 2 2
BEGIN
PROMPT 1 7 "Sel. tutti"
PICTURE TOOL_MULTISEL
FLAGS ""
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 1 ""
PICTURE 0
END
BUTTON B_FILTER_CONF 2 2
BEGIN
PROMPT 1 5 "Impostaz. Filtro"
PICTURE TOOL_ELABORA
FLAGS ""
END
BUTTON B_FILTER_ON 2 2
BEGIN
PROMPT 1 5 "Filtro ON"
PICTURE TOOL_CHECK
FLAGS ""
END
BUTTON B_FILTER_OFF 2 2
BEGIN
PROMPT 1 5 "Filtro OFF"
PICTURE TOOL_CHECK
FLAGS ""
END
#include <helpbar.h>
ENDPAGE
PAGE "Elenco di controllo" -1 -1 78 13
TEXT DLG_NULL
BEGIN
PROMPT 0 0 "Movimenti da controllare"
END
SPREADSHEET S_CONTROLLO -1 10
BEGIN
PROMPT 0 1 "Movimenti da controllare"
ITEM " "
ITEM "Numero\nReg.@8"
ITEM "Data\nReg.@8"
ITEM "Data\nDoc.@8"
ITEM "Codice\nCaus.@8"
ITEM "Mese\nliquidazione@8"
ITEM "Numero\nDocumento@8"
ITEM "Totale\nDocumento@8"
ITEM "Cliente/\nFornitore@8"
ITEM "Ragione\nSociale@8"
ITEM "Cod. regis./\nprot.IVA@8"
ITEM "Descrizione@8"
ITEM "ESCLUDI@5"
ITEM "ESCLUSO@6"
ITEM "Descrizione\nErrore"
END
TEXT DLG_NULL
BEGIN
PROMPT 0 12 "Fatture el. in ingresso"
END
SPREADSHEET S_FPPRO -1 -1
BEGIN
PROMPT 0 13 "Movimenti da controllare"
ITEM " "
ITEM "Tipo Doc."
ITEM "Data@8"
ITEM "Num. Doc.@12"
ITEM "Tot. Doc.@9"
ITEM "Cliente@20"
ITEM "Fornitore@20"
ITEM "Stato P.IVA"
ITEM "P.IVA@8"
ITEM "Chiavi PAF@60"
END
ENDPAGE
ENDMASK
PAGE "Controllo" -1 -1 78 13
BOOLEAN F_CSEL
BEGIN
PROMPT 1 1 ""
END
NUMERIC F_CNUMREG 7
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
DATA F_CDATAREG
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
DATA F_CDATADOC
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_CCODCAUS 3
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
NUMERIC F_CMESELIQ 2
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_CNUMDOC 50
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
NUMERIC F_CIMPTOTDOC 15 2
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
NUMERIC F_CFORN 6
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_CRAGSOC 80
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_CPROTIVA 10
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
STRING F_CDESCR 50
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
BOOLEAN F_CESCLUDI
BEGIN
PROMPT 1 1 "Escludi"
FLAGS "D"
END
STRING F_CESCLUSO 2
BEGIN
PROMPT 1 1 "ESCLUSO"
FLAG "D"
END
STRING F_CDESCRERR 110
BEGIN
PROMPT 1 1 "DESCRIZIONE ERRORE"
FLAG "D"
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_USER 2 2
BEGIN
PROMPT 1 1 "Collega"
PICTURE TOOL_LINK
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 0 ""
PICTURE 0
END
BUTTON DLG_QUIT 2 2
BEGIN
PROMPT 3 1 "Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENPAGE
ENDMASK
PAGE "Passive" -1 -1 78 13
BOOLEAN F_FSEL
BEGIN
PROMPT 1 1 ""
END
STRING F_FTIPODOC 4
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
DATA F_FDATA
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
STRING F_FNUMDOC 20
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
NUMERIC F_FIMPTOTDOC 15 2
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
STRING F_FFORNITORE 80
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
STRING F_FRAGSOC 80
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
STRING F_FSTATOPIVA 2
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
STRING F_FPIVA 15
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
STRING F_FPROKEYS 80
BEGIN
PROMPT 1 1 " "
FLAGS "D"
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 0 ""
PICTURE 0
END
BUTTON DLG_QUIT 2 2
BEGIN
PROMPT 3 1 "Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENPAGE
ENDMASK

17
src/f9/f90600c.h Normal file
View File

@ -0,0 +1,17 @@
#define S_ESCL 201
#define F_ETEXT 202
#define B_ESTRAI 203
// Elenco movimenti esclusi
#define FE_SEL 101
#define FE_NUMREG 102
#define FE_DATAREG 103
#define FE_DATADOC 104
#define FE_CODCAUS 105
#define FE_MESELIQ 106
#define FE_NUMDOC 107
#define FE_IMPTOTDOC 108
#define FE_FORN 109
#define FE_RAGSOC 110
#define FE_PROTIVA 111
#define FE_DESCR 112

48
src/f9/f90600d.h Normal file
View File

@ -0,0 +1,48 @@
#define S_INCL 201
#define F_ETEXT 202
#define B_ISELESCL 203
#define B_IESCL 204
#define B_IALLESCL 205
#define F_IIDESTR 206
#define F_IDATA 207
#define F_IPROV 208
#define F_ITIPOD 209
#define F_ISTATOESTR 210
#define F_IDAL 211
#define F_IAL 212
#define S_RES 301
// Elenco movimenti inclusi
#define FI_SEL 101
#define FI_NUMREG 102
#define FI_DATAREG 103
#define FI_DATADOC 104
#define FI_CODCAUS 105
#define FI_TIPOMOV 106
#define FI_MESELIQ 107
#define FI_NUMDOC 108
#define FI_IMPTOTDOC 109
#define FI_FORN 110
#define FI_RAGSOC 111
#define FI_PROTIVA 112
#define FI_DESCR 113
#define FI_IESCLUDI 114
#define FI_IESCLUSO 115
// Elenco risultato movimenti (S_RES)
#define F_RSEL 101
#define F_RNUMREG 102
#define F_RDATAREG 103
#define F_RDATADOC 104
#define F_RTIPODOCSDI 105
#define F_RCODCAUS 106
#define F_RTIPOMOV 107
#define F_RMESELIQ 108
#define F_RNUMDOC 109
#define F_RIMPTOTDOC 110
#define F_RFORN 111
#define F_RRAGSOC 112
#define F_RPROTIVA 113
#define F_RDESCR 114
#define F_RDESCRERR 115

399
src/f9/f90600d.uml Normal file
View File

@ -0,0 +1,399 @@
#include "f90600d.h"
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_INFO 2 2
BEGIN
PROMPT 1 1 "Info"
MESSAGE EXIT,K_F2
PICTURE TOOL_INFO
END
BUTTON DLG_HELP 2 2
BEGIN
PROMPT 2 1 "Help"
MESSAGE EXIT,K_F1
PICTURE TOOL_HELP
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 0 ""
PICTURE 0
END
BUTTON B_ISELESCL 2 2
BEGIN
PROMPT 1 8 "Sel. esclusi"
PICTURE TOOL_MULTISEL
FLAGS ""
END
BUTTON B_IESCL 2 2
BEGIN
PROMPT 1 7 "Conf. esclusi"
PICTURE TOOL_WARNING
FLAGS ""
END
BUTTON B_IALLESCL 2 2
BEGIN
PROMPT 1 7 "Sel. tutti"
PICTURE TOOL_MULTISEL
FLAGS ""
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 0 ""
PICTURE 0
END
BUTTON DLG_QUIT 2 2
BEGIN
PROMPT 3 1 "Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENDPAGE
PAGE "Movimenti" 0 2 0 0
STRING F_IIDESTR 18
BEGIN
PROMPT 0 0 "Id estrazione"
FLAGS "D"
END
DATA F_IDATA
BEGIN
PROMPT 45 0 "Data estrazione "
FLAGS "D"
END
BOOLEAN F_IPROV
BEGIN
PROMPT 0 1 "Provvisorio"
FLAGS "D"
END
STRING F_ITIPOD 9
BEGIN
PROMPT 15 1 "Tipo Documenti"
FLAGS "D"
END
STRING F_ISTATOESTR 38
BEGIN
PROMPT 45 1 "Stato estrazione"
FLAGS "D"
END
DATA F_IDAL
BEGIN
PROMPT 0 2 "Dal"
FLAGS "D"
END
DATA F_IAL
BEGIN
PROMPT 15 2 "Al"
FLAGS "D"
END
TEXT F_ETEXT
BEGIN
PROMPT 0 3 "@BMovimenti estratti nel pacchetto:"
END
SPREADSHEET S_INCL -1 -1
BEGIN
PROMPT 0 4 "Movimenti estratti"
ITEM " "
ITEM "Numero\nReg.@8"
ITEM "Data\nReg.@8"
ITEM "Data\nDoc.@8"
ITEM "Codice\nCaus.@8"
ITEM "Tipo Doc.@5"
ITEM "Mese\nliquidazione@8"
ITEM "Numero\nDocumento@8"
ITEM "Totale\nDocumento@8"
ITEM "Cliente/\nFornitore@8"
ITEM "Ragione\nSociale@8"
ITEM "Cod. regis./\nprot.IVA@8"
ITEM "Descrizione@8"
ITEM "ESCLUDI@5"
ITEM "ESCLUSO@6"
END
ENDPAGE
PAGE "Risultato estrazione" 0 0 0 0
SPREADSHEET S_RES -1 -1
BEGIN
PROMPT 0 0 "Movimenti"
ITEM "Estratto"
ITEM "Numero\nReg.@8"
ITEM "Data\nReg.@8"
ITEM "Data\nDoc.@8"
ITEM "Tipo Doc\nSDI@9"
ITEM "Codice\nCaus.@8"
ITEM "Tipo Mov.@5"
ITEM "Mese\nliquidazione@8"
ITEM "Numero\nDocumento@8"
ITEM "Totale\nDocumento@8"
ITEM "Cliente/\nFornitore@8"
ITEM "Ragione\nSociale@8"
ITEM "Cod. regis./\nprot.IVA@8"
ITEM "Descrizione@8"
ITEM "Descrizione Estrazione@30"
END
ENDPAGE
ENDMASK
PAGE "Mov Inclusi" -1 -1 78 13
BOOLEAN FI_SEL
BEGIN
PROMPT 1 1 ""
END
NUMERIC FI_NUMREG 7
BEGIN
PROMPT 1 2 ""
FLAGS "D"
END
DATA FI_DATAREG
BEGIN
PROMPT 1 3 ""
FLAGS "D"
END
DATA FI_DATADOC
BEGIN
PROMPT 1 4 ""
FLAGS "D"
END
STRING FI_CODCAUS 3
BEGIN
PROMPT 1 5 ""
FLAGS "D"
END
STRING FI_TIPOMOV 3
BEGIN
PROMPT 1 6 ""
FLAGS "D"
END
NUMERIC FI_MESELIQ 2
BEGIN
PROMPT 1 7 ""
FLAGS "D"
END
STRING FI_NUMDOC 50
BEGIN
PROMPT 1 8 ""
FLAGS "D"
END
NUMERIC FI_IMPTOTDOC 15 2
BEGIN
PROMPT 1 9 ""
FLAGS "D"
END
NUMERIC FI_FORN 6
BEGIN
PROMPT 1 10 ""
FLAGS "D"
END
STRING FI_RAGSOC 80
BEGIN
PROMPT 1 11 ""
FLAGS "D"
END
STRING FI_PROTIVA 10
BEGIN
PROMPT 1 12 ""
FLAGS "D"
END
STRING FI_DESCR 50
BEGIN
PROMPT 1 13 ""
FLAGS "D"
END
LIST FI_IESCLUDI 2
BEGIN
PROMPT 1 1 "Escludi"
ITEM "|"
ITEM "S|SI"
ITEM "N|NO"
FLAGS "D"
END
BOOLEAN FI_IESCLUSO
BEGIN
PROMPT 1 1 "ESCLUSO"
FLAG "D"
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_USER 2 2
BEGIN
PROMPT 1 1 "Collega"
PICTURE TOOL_LINK
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 0 ""
PICTURE 0
END
BUTTON DLG_QUIT 2 2
BEGIN
PROMPT 3 1 "Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENPAGE
ENDMASK
PAGE "Risultato estratti" -1 -1 78 13
BOOLEAN F_RSEL
BEGIN
PROMPT 1 1 ""
FLAGS "D"
END
NUMERIC F_RNUMREG 7
BEGIN
PROMPT 1 2 ""
FLAGS "D"
END
DATA F_RDATAREG
BEGIN
PROMPT 1 3 ""
FLAGS "D"
END
DATA F_RDATADOC
BEGIN
PROMPT 1 4 ""
FLAGS "D"
END
STRING F_RTIPODOCSDI 4
BEGIN
PROMPT 1 5 ""
FLAGS "D"
END
STRING F_RCODCAUS 3
BEGIN
PROMPT 1 6 ""
FLAGS "D"
END
STRING F_RTIPOMOV 3
BEGIN
PROMPT 1 7 ""
FLAGS "D"
END
NUMERIC F_RMESELIQ 2
BEGIN
PROMPT 1 8 ""
FLAGS "D"
END
STRING F_RNUMDOC 50
BEGIN
PROMPT 1 9 ""
FLAGS "D"
END
NUMERIC F_RIMPTOTDOC 15 2
BEGIN
PROMPT 1 10 ""
FLAGS "D"
END
NUMERIC F_RFORN 6
BEGIN
PROMPT 1 11 ""
FLAGS "D"
END
STRING F_RRAGSOC 80
BEGIN
PROMPT 1 12 ""
FLAGS "D"
END
STRING F_RPROTIVA 10
BEGIN
PROMPT 1 13 ""
FLAGS "D"
END
STRING F_RDESCR 50
BEGIN
PROMPT 1 14 ""
FLAGS "D"
END
STRING F_RDESCRERR 92
BEGIN
PROMPT 1 15 ""
FLAGS "D"
END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_USER 2 2
BEGIN
PROMPT 1 1 "Collega"
PICTURE TOOL_LINK
END
BUTTON DLG_NULL 2 2
BEGIN
PROMPT -1 0 ""
PICTURE 0
END
BUTTON DLG_QUIT 2 2
BEGIN
PROMPT 3 1 "Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENPAGE
ENDMASK