Patch level : 10.0 646
Files correlati : ce0400a.msk ce1.exe Ricompilazione Demo : [ ] Commento : 0001584: insermento movimenti cespiti In fase di richiamo dei movimenti non risulta visibile il gruppo specie di appartenenza git-svn-id: svn://10.65.10.50/trunk@20235 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
c33efa541c
commit
d7158f0007
@ -5,12 +5,10 @@ TOOLBAR "topbar" 0 0 0 2
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -11 ""
|
||||
PICTURE TOOL_SAVEREC
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -11 ""
|
||||
END
|
||||
#include <helpbar.h>
|
||||
|
||||
ENDPAGE
|
||||
|
||||
@ -72,12 +70,13 @@ BEGIN
|
||||
PROMPT 2 4 "Gruppo "
|
||||
FIELD GRUPPOCORR
|
||||
FLAGS "Z"
|
||||
USE CCB KEY 1
|
||||
USE CCB
|
||||
JOIN %CGR ALIAS 106 INTO CODTAB==CODTAB[5,6]
|
||||
JOIN %CAT ALIAS 107 INTO CODTAB==CODTAB[5,10]
|
||||
INPUT CODTAB[1,4] F_ESERCORR SELECT
|
||||
INPUT CODTAB[5,6] F_GRUPPOCORR
|
||||
INPUT CODTAB[7,10] F_SPECIECORR
|
||||
DISPLAY "Esercizio" CODTAB[1,4]
|
||||
DISPLAY "Gruppo" CODTAB[5,6]
|
||||
DISPLAY "Specie" CODTAB[7,10]
|
||||
DISPLAY "Descrizione@60" 107@->S0
|
||||
|
@ -308,19 +308,13 @@ int TMov_qmask::create_fields(int x, int y, short key_id)
|
||||
switch(tipo_campo)
|
||||
{
|
||||
case _wordfld: add_number (kid, 0, prompt, x, i+y, len, search ? "BU" : "U"); break;
|
||||
|
||||
case _intfld :
|
||||
case _longfld: add_number (kid, 0, prompt, x, i+y, len, search ? "B" : ""); break;
|
||||
|
||||
case _intzerofld:
|
||||
case _longzerofld: add_number (kid, 0, prompt, x, i+y, len, search ? "BZ" : "Z"); break;
|
||||
|
||||
case _realfld: add_number (kid, 0, prompt, x, i+y, len, "", ndec_campo); break;
|
||||
|
||||
case _datefld: add_date (kid, 0, prompt, x, i+y, search ? "B" : ""); break;
|
||||
|
||||
case _memofld: add_zoom(kid, 0, prompt, x, i+y, 50); break;
|
||||
|
||||
default : add_string (kid, 0, prompt, x, i+y, len, search ? "BU" : ""); break;
|
||||
}
|
||||
|
||||
@ -473,6 +467,20 @@ bool TMov_emask::on_field_event(TOperable_field& o, TField_event e, long jolly)
|
||||
{
|
||||
switch (o.dlg())
|
||||
{
|
||||
case F_ESERCIZIO:
|
||||
if (e == fe_init)
|
||||
{
|
||||
int esercizio;
|
||||
TString4 gruppo, specie;
|
||||
TDitta_cespiti& dc = ditta_cespiti();
|
||||
dc.get_attivita(esercizio, gruppo, specie);
|
||||
if (gruppo.full())
|
||||
{
|
||||
set(F_GRUPPO, gruppo);
|
||||
set(F_SPECIE, specie.rtrim(), 0x2); // Output description
|
||||
}
|
||||
}
|
||||
break;
|
||||
case F_CODMOV:
|
||||
if ((e == fe_modify || e == fe_init))
|
||||
{
|
||||
|
Loading…
x
Reference in New Issue
Block a user