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

ba2100b.uml : aggiunto FLAGS "U" sul campo del tipo profilo

Browse Source 
ba2400.cpp  : modificata la validate del messaggio per stampare il
  centro di servizio; con un parametro in piu', relativo al campo
  sul form, si puo' ora stampare anche il codice numerico.


git-svn-id: svn://10.65.10.50/trunk@1973 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1995-10-18 11:27:59 +00:00
parent 3b0fee2a45
commit bd702079cc
2 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ba/ba2100b.uml
View File

@ -6,6 +6,7 @@ STRING F_BASE 8
BEGIN
PROMPT 2 1 "Profilo base "
FIELD TIPOPROF
FLAGS "U"
HELP "Specificare il nome del profilo di base utilizzato"
USE LF_FORM SELECT CODPROF==""
INPUT TIPOPROF F_BASE

13
ba/ba2400.cpp
View File

@ -55,14 +55,17 @@ bool TTab_form::validate(TForm_item& fld, TToken_string& s)
{
const int a_comres = s.get_int(); // Alias del comune di residenza (fiscale)
const int a_anagr = s.get_int(); // Alias dell'anagrafica della persona
TString i_cod(s.get()); // Eventuale Id del campo codice (solo se != 0)
TString16 cod_us_uid; // Codice del Centro servizio o ufficio imposte dirette (NON E' IL CODICE DEL COMUNE)
TString80 desc; // Denominzazione centro servizi o ufficio imposte
const TLocalisamfile& com = relation()->lfile(-a_comres);
TString16 cod = com.get("UFFCSERV");
if (cod.not_empty()) // Se specificato ...
{
cod_us_uid = cod;
TTable ucc("%UCC"); // ... usa il centro servizi del comune
ucc.put("CODTAB", cod);
if (ucc.read() == NOERR)
@ -83,7 +86,8 @@ bool TTab_form::validate(TForm_item& fld, TToken_string& s)
uff[7] = u;
cod = com.get(uff);
}
}
}
cod_us_uid = cod;
TTable uffiva("%UID");
uffiva.put("CODTAB", cod);
if (uffiva.read() == NOERR)
@ -102,6 +106,11 @@ bool TTab_form::validate(TForm_item& fld, TToken_string& s)
_result = " ";
_result << " " << desc;
if (i_cod.not_empty())
{
TForm_item& fi = fld.find_field(i_cod);
fi.set(cod_us_uid);
}
fld.set(_result);
return TRUE;
}