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
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -11 ""
|
PROMPT -12 -11 ""
|
||||||
|
PICTURE TOOL_SAVEREC
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 10 2
|
#include <helpbar.h>
|
||||||
BEGIN
|
|
||||||
PROMPT -22 -11 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
@ -72,12 +70,13 @@ BEGIN
|
|||||||
PROMPT 2 4 "Gruppo "
|
PROMPT 2 4 "Gruppo "
|
||||||
FIELD GRUPPOCORR
|
FIELD GRUPPOCORR
|
||||||
FLAGS "Z"
|
FLAGS "Z"
|
||||||
USE CCB KEY 1
|
USE CCB
|
||||||
JOIN %CGR ALIAS 106 INTO CODTAB==CODTAB[5,6]
|
JOIN %CGR ALIAS 106 INTO CODTAB==CODTAB[5,6]
|
||||||
JOIN %CAT ALIAS 107 INTO CODTAB==CODTAB[5,10]
|
JOIN %CAT ALIAS 107 INTO CODTAB==CODTAB[5,10]
|
||||||
INPUT CODTAB[1,4] F_ESERCORR SELECT
|
INPUT CODTAB[1,4] F_ESERCORR SELECT
|
||||||
INPUT CODTAB[5,6] F_GRUPPOCORR
|
INPUT CODTAB[5,6] F_GRUPPOCORR
|
||||||
INPUT CODTAB[7,10] F_SPECIECORR
|
INPUT CODTAB[7,10] F_SPECIECORR
|
||||||
|
DISPLAY "Esercizio" CODTAB[1,4]
|
||||||
DISPLAY "Gruppo" CODTAB[5,6]
|
DISPLAY "Gruppo" CODTAB[5,6]
|
||||||
DISPLAY "Specie" CODTAB[7,10]
|
DISPLAY "Specie" CODTAB[7,10]
|
||||||
DISPLAY "Descrizione@60" 107@->S0
|
DISPLAY "Descrizione@60" 107@->S0
|
||||||
|
@ -308,19 +308,13 @@ int TMov_qmask::create_fields(int x, int y, short key_id)
|
|||||||
switch(tipo_campo)
|
switch(tipo_campo)
|
||||||
{
|
{
|
||||||
case _wordfld: add_number (kid, 0, prompt, x, i+y, len, search ? "BU" : "U"); break;
|
case _wordfld: add_number (kid, 0, prompt, x, i+y, len, search ? "BU" : "U"); break;
|
||||||
|
|
||||||
case _intfld :
|
case _intfld :
|
||||||
case _longfld: add_number (kid, 0, prompt, x, i+y, len, search ? "B" : ""); break;
|
case _longfld: add_number (kid, 0, prompt, x, i+y, len, search ? "B" : ""); break;
|
||||||
|
|
||||||
case _intzerofld:
|
case _intzerofld:
|
||||||
case _longzerofld: add_number (kid, 0, prompt, x, i+y, len, search ? "BZ" : "Z"); break;
|
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 _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 _datefld: add_date (kid, 0, prompt, x, i+y, search ? "B" : ""); break;
|
||||||
|
|
||||||
case _memofld: add_zoom(kid, 0, prompt, x, i+y, 50); 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;
|
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())
|
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:
|
case F_CODMOV:
|
||||||
if ((e == fe_modify || e == fe_init))
|
if ((e == fe_modify || e == fe_init))
|
||||||
{
|
{
|
||||||
|
Loading…
x
Reference in New Issue
Block a user