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

Corretta registrazione dell'UFFIVA e UFFIIDD sulle anagrafiche.

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@2078 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1995-11-03 09:56:29 +00:00
parent 64affc68db
commit efdfedc249
2 changed files with 9 additions and 2 deletions

10
ba/ba4200.cpp

@ -284,11 +284,17 @@ bool gest_uff_imp(TMask_field& f, KEY key)
TString s(comuni.get(N_IMPDIR1)) ;
if (s.empty()) s = comuni.get(N_IMPDIR2) ;
if (s.empty()) s = comuni.get(N_IMPDIR3) ;
msk.set(F_UFFIIDD, s) ; msk.field(F_UFFIIDD).on_key(K_TAB);
if (msk.get(F_UFFIIDD).empty() || msk.is_running())
{
msk.set(F_UFFIIDD, s) ; msk.field(F_UFFIIDD).on_key(K_TAB);
}
s = comuni.get(N_IVA1);
if (s.empty()) s = comuni.get(N_IVA2) ;
if (s.empty()) s = comuni.get(N_IVA3) ;
msk.set(F_UFFIVA, s) ; msk.field(F_UFFIVA).on_key(K_TAB);
if (msk.get(F_UFFIVA).empty() || msk.is_running())
{
msk.set(F_UFFIVA, s) ; msk.field(F_UFFIVA).on_key(K_TAB);
}
msk.set(F_UFFREG, comuni.get("UFFREG")); msk.field(F_UFFREG).on_key(K_TAB);
if (msk.get_bool(F_TITCF))
{

1
ba/ba4200c.uml

@ -1186,6 +1186,7 @@ STRING F_UFFIVA 3
BEGIN
PROMPT 1 9 "Ufficio IVA "
FLAGS "Z"
FIELD LF_ANAG->UFFIVA
USE %UIV
INPUT CODTAB F_UFFIVA
DISPLAY "Ufficio" CODTAB