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

Rimodernata interfaccia utente distinta base e risolti problemucci per DBService

Browse Source 
git-svn-id: svn://10.65.10.50/branches/R_10_00@22783 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2013-01-25 08:39:10 +00:00
parent 505d6ce4a8
commit 11621eed74
6 changed files with 364 additions and 359 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

78
db/db0500.cpp
View File

@ -8,7 +8,9 @@
#include <relapp.h> #include <relapp.h>
#include <sheet.h> #include <sheet.h>
#include <treectrl.h> #include <treectrl.h>
#include <toolfld.h>
#include <utility.h> #include <utility.h>
#include <urldefid.h>
#include "db0.h" #include "db0.h"
#include "../mg/mglib.h" #include "../mg/mglib.h"
@ -242,7 +244,7 @@ protected:
void remove_desc(const TMask& m); void remove_desc(const TMask& m);
public: public:
TRelation & relation() {return *_therel;} TRelation& relation() { return *_therel; }
}; };
TDistinta_app& app() TDistinta_app& app()
@ -366,7 +368,7 @@ void TQuery_mask::create_browse1(TEdit_field& kfld, int level, short key_id) con
while (scan.pop() != "EN") while (scan.pop() != "EN")
kfld.parse_item(scan); kfld.parse_item(scan);
xvt_fsys_removefile(tmp); tmp.fremove();
} }
void TQuery_mask::create_browse2(TEdit_field& kfld, int level, short key_id, short des_id) const void TQuery_mask::create_browse2(TEdit_field& kfld, int level, short key_id, short des_id) const
@ -399,7 +401,7 @@ void TQuery_mask::create_browse2(TEdit_field& kfld, int level, short key_id, sho
while (scan.pop() != "EN") while (scan.pop() != "EN")
kfld.parse_item(scan); kfld.parse_item(scan);
xvt_fsys_removefile(tmp); tmp.fremove();
} }
bool TQuery_mask::ask_new_code(const TCodice_articolo& oldcode, TCodice_articolo& newcode) const bool TQuery_mask::ask_new_code(const TCodice_articolo& oldcode, TCodice_articolo& newcode) const
@ -410,7 +412,8 @@ bool TQuery_mask::ask_new_code(const TCodice_articolo& oldcode, TCodice_articolo
const int last_level = _livart.last_level(); const int last_level = _livart.last_level();
const int width = last_level > 0 ? _livart.packed_length(last_level)+last_level*3+16 : 38; const int width = last_level > 0 ? _livart.packed_length(last_level)+last_level*3+16 : 38;
TMask m(TR("Copia articolo/distinta"), 1, width, 5); TMask m(TR("Copia articolo/distinta"), 1, width, 5);
m.add_button_tool(DLG_OK, "", TOOL_OK);
m.add_button_tool(DLG_CANCEL, "", TOOL_CANCEL);
m.add_static(DLG_NULL, 0, PR("Vecchio codice "), 1, 1); m.add_static(DLG_NULL, 0, PR("Vecchio codice "), 1, 1);
m.add_static(DLG_NULL, 0, PR("Nuovo codice "), 1, 2); m.add_static(DLG_NULL, 0, PR("Nuovo codice "), 1, 2);
int tab0 = 16; int tab0 = 16;
@ -453,8 +456,6 @@ bool TQuery_mask::ask_new_code(const TCodice_articolo& oldcode, TCodice_articolo
m.set(101, oldcode); m.set(101, oldcode);
m.set(201, newcode); m.set(201, newcode);
} }
m.add_button(DLG_OK, 0, "", -12, -1, 10, 2);
m.add_button(DLG_CANCEL, 0, "", -22, -1, 10, 2);
if (m.run() == K_ENTER) if (m.run() == K_ENTER)
{ {
@ -649,7 +650,7 @@ bool TQuery_mask::copy_distinct(const TCodice_articolo& oldcode,
bool TQuery_mask::restart_tree() bool TQuery_mask::restart_tree()
{ {
if (!_tree.restart()) if (!_tree.restart())
return FALSE; return false;
int d =get_int(F_MIN_DEPTH); int d =get_int(F_MIN_DEPTH);
int dir=1; // direzione di scorrimento albero int dir=1; // direzione di scorrimento albero
do do
@ -682,7 +683,7 @@ bool TQuery_mask::restart_tree()
TTree_field& tf = tfield(F_TREE); TTree_field& tf = tfield(F_TREE);
tf.win().update_thumb(0, 0); tf.win().update_thumb(0, 0);
tf.win().force_update(); tf.win().force_update();
return TRUE; return true;
} }
bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly) bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
@ -752,14 +753,14 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
{ {
_tree.curr_id(_curr); _tree.curr_id(_curr);
TCodice_articolo code; _tree.curr_code(code); TCodice_articolo code; _tree.curr_code(code);
set(F_CODICE, code); set(F_CODICE, code, 0x2);
} }
break; break;
case DLG_SELECT: case DLG_SELECT:
if (e == fe_button) if (e == fe_button)
{ {
const TString& str = get(F_CODICE); const TString& str = get(F_CODICE);
if (str.not_empty()) if (str.full())
set(F_CODICEQ, str); set(F_CODICEQ, str);
else else
return false; return false;
@ -829,7 +830,7 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
if (_tree.goto_root()) if (_tree.goto_root())
{ {
TIndwin iw(0, caption, FALSE, FALSE); TIndwin iw(0, caption, false, false);
_tree.explode(a.rows_array(), mb, gr, md, fi, sk, sp); _tree.explode(a.rows_array(), mb, gr, md, fi, sk, sp);
} }
a.run(); a.run();
@ -900,7 +901,7 @@ bool TQuery_mask::on_field_event(TOperable_field& o, TField_event e, long jolly)
default: default:
break; break;
} }
return TRUE; return true;
} }
bool TQuery_mask::redraw_tree(TField_event e) bool TQuery_mask::redraw_tree(TField_event e)
@ -914,9 +915,9 @@ bool TQuery_mask::redraw_tree(TField_event e)
return on_field_event((TOperable_field &)field(F_CODICE), fe_modify, 0l); return on_field_event((TOperable_field &)field(F_CODICE), fe_modify, 0l);
} }
restart_tree(); restart_tree();
return TRUE; return true;
} }
return FALSE; return false;
} }
@ -980,7 +981,7 @@ void TDistinta_mask::sheetrighe_get(TSheet_field &fld_righe, int item)
{ {
TDistinta_mask &m=(TDistinta_mask &)fld_righe.mask(); TDistinta_mask &m=(TDistinta_mask &)fld_righe.mask();
// prende il record della riga corrente dal record array // prende il record della riga corrente dal record array
TRectype &rec= fld_righe.record()->row(item, TRUE); TRectype &rec= fld_righe.record()->row(item, true);
TToken_string &row= fld_righe.row(item-1); TToken_string &row= fld_righe.row(item-1);
// codici di livello // codici di livello
row.add(m._livelli_giac->unpack_grpcode(rec.get("LIVELLO") ,1),fld_righe.cid2index(F_LIV1) ); row.add(m._livelli_giac->unpack_grpcode(rec.get("LIVELLO") ,1),fld_righe.cid2index(F_LIV1) );
@ -993,7 +994,7 @@ void TDistinta_mask::sheetrighe_put(TSheet_field &fld_righe, int item)
TDistinta_mask &m=(TDistinta_mask &)fld_righe.mask(); TDistinta_mask &m=(TDistinta_mask &)fld_righe.mask();
TToken_string &row= fld_righe.row(item-1); TToken_string &row= fld_righe.row(item-1);
TRectype &recrighe= fld_righe.record()->row(item, TRUE); TRectype &recrighe= fld_righe.record()->row(item, true);
// codici livello // codici livello
if (m._livelli_giac->enabled()) if (m._livelli_giac->enabled())
{ {
@ -1103,8 +1104,8 @@ void TDistinta_mask::set_um_rif(int row)
if (r == row) if (r == row)
{ {
priga->add("X", chk); priga->add("X", chk);
set(F_UM, priga->get(cod), TRUE); set(F_UM, priga->get(cod), true);
set(F_FCUMART, priga->get(fc), TRUE); set(F_FCUMART, priga->get(fc), true);
} }
else else
priga->add("", chk); priga->add("", chk);
@ -1128,7 +1129,7 @@ bool TDistinta_mask::on_unitsheet_event(TOperable_field& o, TField_event e, long
break; break;
case se_query_add: case se_query_add:
if (!get_bool(F_VIRTUALE)) if (!get_bool(F_VIRTUALE))
return FALSE; return false;
break; break;
case se_notify_add: case se_notify_add:
if (jolly == 0L) if (jolly == 0L)
@ -1192,7 +1193,7 @@ bool TDistinta_mask::on_distsheet_event(TOperable_field& o, TField_event e, long
if (!code.blank()) if (!code.blank())
{ {
if (!test_row(row)) if (!test_row(row))
return FALSE; return false;
for (int m = n - 1; m >= 0; m--) for (int m = n - 1; m >= 0; m--)
{ {
const TToken_string& row = sheet.row(m); const TToken_string& row = sheet.row(m);
@ -1324,7 +1325,7 @@ bool TDistinta_mask::on_distsheet_event(TOperable_field& o, TField_event e, long
default: default:
break; break;
} }
return TRUE; return true;
} }
bool TDistinta_mask::on_parmsheet_event(TOperable_field& o, TField_event e, long jolly) bool TDistinta_mask::on_parmsheet_event(TOperable_field& o, TField_event e, long jolly)
@ -1350,7 +1351,7 @@ bool TDistinta_mask::on_parmsheet_event(TOperable_field& o, TField_event e, long
TDistinta_expr e; TDistinta_expr e;
const TTypeexp exprtype = _tree.get_var_type(var); const TTypeexp exprtype = _tree.get_var_type(var);
if (!e.set(expr, exprtype)) if (!e.set(expr, exprtype))
return FALSE; return false;
for (int v = e.numvar()-1; v >= 0; v--) for (int v = e.numvar()-1; v >= 0; v--)
{ {
@ -1367,7 +1368,7 @@ bool TDistinta_mask::on_parmsheet_event(TOperable_field& o, TField_event e, long
default: default:
break; break;
} }
return TRUE; return true;
} }
@ -1405,7 +1406,7 @@ bool TDistinta_mask::on_field_event(TOperable_field& o, TField_event e, long jol
{ {
case 'A': case 'A':
{ {
set(F_TIPO, "A", TRUE); set(F_TIPO, "A", true);
const TArticolo mag(code); const TArticolo mag(code);
set(F_DESCR, mag.get(ANAMAG_DESCR)); set(F_DESCR, mag.get(ANAMAG_DESCR));
@ -1416,7 +1417,7 @@ bool TDistinta_mask::on_field_event(TOperable_field& o, TField_event e, long jol
break; break;
case 'L': case 'L':
{ {
set(F_TIPO, "L", TRUE); set(F_TIPO, "L", true);
const TLavorazione lav(code); const TLavorazione lav(code);
set(F_DESCR, lav.descr()); set(F_DESCR, lav.descr());
@ -1425,7 +1426,7 @@ bool TDistinta_mask::on_field_event(TOperable_field& o, TField_event e, long jol
} }
break; break;
default: default:
set(F_TIPO, "V", TRUE); set(F_TIPO, "V", true);
// le distinte virtuali non possono essere master // le distinte virtuali non possono essere master
break; break;
} }
@ -1465,7 +1466,6 @@ bool TDistinta_mask::on_field_event(TOperable_field& o, TField_event e, long jol
if (e == fe_button) if (e == fe_button)
{ {
TSheet_field& sheet = o.mask().sfield(F_SHEET); TSheet_field& sheet = o.mask().sfield(F_SHEET);
sheet.sort(); sheet.sort();
sheet.force_update(); sheet.force_update();
} }
@ -1619,7 +1619,7 @@ bool TDistinta_mask::on_field_event(TOperable_field& o, TField_event e, long jol
else else
{ {
if (yesno_box("Vuoi stampare le etichette")) if (yesno_box("Si desidera stampare le etichette"))
{ {
const long annoes = TDate(TODAY).year(); const long annoes = TDate(TODAY).year();
const TString codart(get(F_CODICE)); const TString codart(get(F_CODICE));
@ -1650,14 +1650,14 @@ bool TDistinta_mask::on_field_event(TOperable_field& o, TField_event e, long jol
} }
break; break;
} }
return TRUE; return true;
} }
TDistinta_mask::TDistinta_mask(TDistinta_tree& dt) TDistinta_mask::TDistinta_mask(TDistinta_tree& dt)
: TAutomask("db0500b"), _tree(dt) : TAutomask("db0500b"), _tree(dt)
{ {
TSheet_field& sf = sfield(F_SHEET); TSheet_field& sf = sfield(F_SHEET);
sf.set_append(FALSE); sf.set_append(false);
TMask& sm = sf.sheet_mask(); TMask& sm = sf.sheet_mask();
TString16 key; TString16 key;
int i; int i;
@ -1692,17 +1692,17 @@ TDistinta_mask::TDistinta_mask(TDistinta_tree& dt)
cache().test_file_changes(LF_TAB); cache().test_file_changes(LF_TAB);
} }
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////
// TDistinta_app // TDistinta_app
/////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////
bool TDistinta_app::user_create() bool TDistinta_app::user_create()
{ {
_therel = new TRelation(LF_DIST); _therel = new TRelation(LF_DIST);
_querymask = new TQuery_mask(_tree); _querymask = new TQuery_mask(_tree);
_themask = new TDistinta_mask(_tree); _themask = new TDistinta_mask(_tree);
return TRUE; return true;
} }
bool TDistinta_app::user_destroy() bool TDistinta_app::user_destroy()
@ -1710,21 +1710,21 @@ bool TDistinta_app::user_destroy()
delete _themask; delete _themask;
delete _querymask; delete _querymask;
delete _therel; delete _therel;
return TRUE; return true;
} }
void TDistinta_app::init_insert_mode(TMask &m) void TDistinta_app::init_insert_mode(TMask &m)
{ {
TSheet_field& f = m.sfield(F_UNITA); TSheet_field& f = m.sfield(F_UNITA);
if (f.items() == 0) if (f.empty())
f.row(0) = " |1"; // aggiunge una riga allo sheet f.row(0) = " |1"; // aggiunge una riga allo sheet
m.set(F_MASTER,"X"); m.set(F_MASTER,"X");
} }
bool TDistinta_app::changing_mask(int mode) bool TDistinta_app::changing_mask(int mode)
{ {
bool was_query = _mode == MODE_QUERY || _mode == MODE_QUERYINS; const bool was_query = _mode == MODE_QUERY || _mode == MODE_QUERYINS;
bool is_query = mode == MODE_QUERY || mode == MODE_QUERYINS; const bool is_query = mode == MODE_QUERY || mode == MODE_QUERYINS;
return was_query != is_query; return was_query != is_query;
} }
@ -1848,7 +1848,7 @@ bool TDistinta_app::parms2rel(const TMask& m)
// Azzera albero per rispecchiare eventuali modifiche // Azzera albero per rispecchiare eventuali modifiche
_querymask->restart_tree(); _querymask->restart_tree();
return TRUE; return true;
} }
void TDistinta_app::remove_desc(const TMask& m) void TDistinta_app::remove_desc(const TMask& m)
@ -1895,7 +1895,7 @@ int TDistinta_app::write(const TMask& m)
{ {
TSheet_field& f = m.sfield(F_UNITA); // prende lo sheet delle unità di misura TSheet_field& f = m.sfield(F_UNITA); // prende lo sheet delle unità di misura
f.record()->renum_key(UMART_CODART, m.get(F_CODICE)); f.record()->renum_key(UMART_CODART, m.get(F_CODICE));
err = f.record()->write(FALSE); err = f.record()->write(false);
} }
return err; return err;
} }
@ -1909,7 +1909,7 @@ int TDistinta_app::rewrite(const TMask& m)
{ {
TSheet_field& f= m.sfield(F_UNITA); // prende lo sheet delle unità di misura TSheet_field& f= m.sfield(F_UNITA); // prende lo sheet delle unità di misura
f.record()->renum_key(UMART_CODART, m.get(F_CODICE)); f.record()->renum_key(UMART_CODART, m.get(F_CODICE));
err = f.record()->write(TRUE); err = f.record()->write(true);
} }
return err; return err;
} }

1
db/db0500a.h
View File

@ -20,6 +20,7 @@
#define F_MIN_DEPTH 516 #define F_MIN_DEPTH 516
#define F_SORTA 517 #define F_SORTA 517
#define F_DESCRDIST 518 #define F_DESCRDIST 518
#define F_NOSOSP 519
#define F_DESCR 520 #define F_DESCR 520
#define F_ARTPROD 521 #define F_ARTPROD 521

36
db/db0500a.uml
View File

@ -4,9 +4,9 @@ TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_SELECT 10 2 BUTTON DLG_SELECT 10 2
BEGIN BEGIN
PROMPT -16 -11 "~Selezione" PROMPT -16 -11 "Modifica"
MESSAGE EXIT,K_ENTER MESSAGE EXIT,K_ENTER
PICTURE TOOL_MULTISEL PICTURE TOOL_EDIT
END END
BUTTON DLG_NEWREC 10 2 BUTTON DLG_NEWREC 10 2
@ -23,27 +23,20 @@ BEGIN
PICTURE TOOL_DELREC PICTURE TOOL_DELREC
END END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -66 -11 "~Fine"
MESSAGE EXIT,K_QUIT
PICTURE TOOL_QUIT
END
ENDPAGE
TOOLBAR "" 0 -2 0 2
BUTTON F_COPY 10 2 BUTTON F_COPY 10 2
BEGIN BEGIN
PROMPT -12 -11 "~Copia" PROMPT -12 -11 "~Copia"
PICTURE TOOL_COPY
END END
BUTTON F_EXPLODE 10 2 BUTTON F_EXPLODE 10 2
BEGIN BEGIN
PROMPT -22 -11 "E~splodi" PROMPT -22 -11 "E~splodi"
PICTURE TOOL_MULTISEL
END END
#include <helpbar.h>
ENDPAGE ENDPAGE
PAGE "Distinta base" 0 2 0 0 PAGE "Distinta base" 0 2 0 0
@ -58,7 +51,7 @@ END
STRING F_CODICE 20 STRING F_CODICE 20
BEGIN BEGIN
PROMPT 2 1 "Cerca " PROMPT 2 1 "Cerca "
FLAGS "GU" FLAGS "GUP"
USE LF_DIST USE LF_DIST
JOIN LF_ANAMAG INTO CODART==CODDIST JOIN LF_ANAMAG INTO CODART==CODDIST
INPUT CODDIST F_CODICE INPUT CODDIST F_CODICE
@ -77,20 +70,26 @@ BEGIN
FLAGS "D" FLAGS "D"
END END
BOOLEAN F_NOSOSP
BEGIN
PROMPT 62 3 "Nascondi SOSPESI"
END
STRING F_CODICEQ 20 STRING F_CODICEQ 20
BEGIN BEGIN
PROMPT 2 2 "Articolo " PROMPT 2 2 "Articolo "
FIELD CODDIST FIELD CODDIST
KEY 1 KEY 1
USE LF_ANAMAG USE LF_ANAMAG SELECT SOSPESO!=#F_NOSOSP
JOIN LF_UMART INTO CODART=CODART NRIGA=1 JOIN LF_UMART INTO CODART=CODART NRIGA=1
INPUT CODART F_CODICEQ INPUT CODART F_CODICEQ
DISPLAY "Codice@20" CODART DISPLAY "Codice@20" CODART
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
DISPLAY "Sospeso@C" SOSPESO
OUTPUT F_CODICEQ CODART OUTPUT F_CODICEQ CODART
OUTPUT F_CODICE CODART
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
ADD RUN ve2 -3 ADD RUN ve2 -3
MESSAGE COPY,F_CODICE
FLAGS "U" FLAGS "U"
DEFAULT NONE DEFAULT NONE
END END
@ -99,11 +98,12 @@ STRING F_DESCR 50 40
BEGIN BEGIN
KEY 2 KEY 2
PROMPT 34 2 "" PROMPT 34 2 ""
USE LF_ANAMAG KEY 2 USE LF_ANAMAG KEY 2 SELECT SOSPESO!=#F_NOSOSP
JOIN LF_UMART INTO CODART=CODART NRIGA=1 JOIN LF_UMART INTO CODART=CODART NRIGA=1
INPUT DESCR F_DESCR INPUT DESCR F_DESCR
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
DISPLAY "Codice@20" CODART DISPLAY "Codice@20" CODART
DISPLAY "Sospeso@C" SOSPESO
OUTPUT F_CODICEQ CODART OUTPUT F_CODICEQ CODART
OUTPUT F_CODICE CODART OUTPUT F_CODICE CODART
CHECKTYPE NORMAL CHECKTYPE NORMAL
@ -247,7 +247,7 @@ END
ENDPAGE ENDPAGE
PAGE "Visualizza" -1 -1 80 20 PAGE "Opzioni" -1 -1 80 20
BOOL F_HIDE_GHOST BOOL F_HIDE_GHOST
BEGIN BEGIN
FLAGS "FD" FLAGS "FD"

23
db/db0500b.uml
View File

@ -6,9 +6,9 @@ ENDPAGE
PAGE "Distinta" -1 -1 80 20 PAGE "Distinta" -1 -1 80 20
GROUPBOX DLG_NULL 78 3 GROUPBOX DLG_NULL 78 5
BEGIN BEGIN
PROMPT 1 0 "Distinta" PROMPT 1 0 "@bDistinta"
END END
STRING F_CODICE 20 STRING F_CODICE 20
@ -19,7 +19,6 @@ BEGIN
FIELD CODDIST FIELD CODDIST
END END
LIST F_TIPO 1 12 LIST F_TIPO 1 12
BEGIN BEGIN
PROMPT 54 1 "Tipo " PROMPT 54 1 "Tipo "
@ -41,14 +40,9 @@ BEGIN
FIELD VIRTUALE FIELD VIRTUALE
END END
GROUPBOX DLG_NULL 78 7
BEGIN
PROMPT 1 2 ""
END
STRING F_DESCR 50 STRING F_DESCR 50
BEGIN BEGIN
PROMPT 2 3 "Descrizione " PROMPT 2 2 "Descrizione "
FIELD DESCR FIELD DESCR
GROUP 1 GROUP 1
FLAGS "D" FLAGS "D"
@ -56,10 +50,15 @@ END
ZOOM F_NOTE 50 ZOOM F_NOTE 50
BEGIN BEGIN
PROMPT 2 4 "Annotazioni " PROMPT 2 3 "Annotazioni "
FIELD NOTE FIELD NOTE
END END
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 1 4 ""
END
BOOLEAN F_ARTPROD BOOLEAN F_ARTPROD
BEGIN BEGIN
PROMPT 2 5 "Articolo di produzione" PROMPT 2 5 "Articolo di produzione"
@ -137,9 +136,9 @@ BEGIN
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
BUTTON F_SORTA 15 BUTTON F_SORTA 17
BEGIN BEGIN
PROMPT 60 7 "Ordina per codice" PROMPT 58 7 "Ordina per codice"
END END
NUMBER F_SORT 1 NUMBER F_SORT 1

11
db/db0500c.uml
View File

@ -78,14 +78,17 @@ BEGIN
ITEM "5|Raggruppa all'unita' di misura di distinta" ITEM "5|Raggruppa all'unita' di misura di distinta"
END END
ENDPAGE
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_OK 10 2 BUTTON DLG_OK 10 2
BEGIN BEGIN
PROMPT -12 -1 "" PROMPT -12 -1 ""
END END
BUTTON DLG_CANCEL 10 2 #include <helpbar.h>
BEGIN
PROMPT -22 -1 "" ENDPAGE
END
ENDMASK ENDMASK

20
db/db0500d.uml
View File

@ -1,5 +1,15 @@
#include "db0500a.h" #include "db0500a.h"
TOOLBAR "topbar" 0 0 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
#include <helpbar.h>
ENDPAGE
PAGE "Movimenti" -1 -1 80 21 PAGE "Movimenti" -1 -1 80 21
DATE F_DATAREG DATE F_DATAREG
@ -156,14 +166,6 @@ BEGIN
ADD RUN CG0 -1 ADD RUN CG0 -1
END END
BUTTON DLG_OK 10 2 ENDPAGE
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDMASK ENDMASK