corretto errori MI6194,MI6195,MI2288,MI2290,MI2295,MI2297

git-svn-id: svn://10.65.10.50/trunk@4191 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
cris 1997-03-10 14:56:33 +00:00
parent a20f793f78
commit dc0dd1b564
2 changed files with 336 additions and 333 deletions

View File

@ -151,7 +151,7 @@ void Libribollati_print::set_page(int , int counter)
TString s(_indulc);
s << " " << _civulc << " " << _capulc << " " << _com << " " << _prov;
set_row(1, "@52g%-68s1", (const char*) s);
set_row(1, "@52g%-68s", (const char*) s);
set_row(2, "@1g%-50s", (const char*) _descr);
set_row(2, "@52gCODICE FISCALE %-16s", (const char*) _cofi);
set_row(2, "@85gPARTITA I.V.A. %-11s", (const char*) _paiv);
@ -191,6 +191,7 @@ bool Libribollati_print::set_print(int)
_paiv = _msk->get(F_PAIV);
_cofi = _msk->get(F_COFI);
_anno_stampa = _msk->get_int(F_ANNOSTAMPA);
_descr = _msk->get(F_REGISTRO);
if (_inizia_dopo) _num_pag++;
enable_print_menu();
return TRUE;

View File

@ -14,7 +14,7 @@ BEGIN
FLAGS "R"
USE LF_NDITTE KEY 1
INPUT CODDITTA F_CODDITTA
DISPLAY "Codice" CODDITTA
DISPLAY "Codice@10" CODDITTA
DISPLAY "Ragione sociale@50" RAGSOC
OUTPUT F_CODDITTA CODDITTA
OUTPUT F_RAGSOC RAGSOC
@ -24,14 +24,14 @@ BEGIN
MESSAGE EMPTY DISABLE,3@
END
STRING F_RAGSOC 60 50
STRING F_RAGSOC 50
BEGIN
PROMPT 2 3 "Rag. Soc. "
USE LF_NDITTE KEY 2
HELP "Ragione sociale dell'intestatario del libro bollato"
INPUT RAGSOC F_RAGSOC
DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Codice" CODDITTA
DISPLAY "Codice@10" CODDITTA
COPY OUTPUT F_CODDITTA
CHECKTYPE SEARCH
VALIDATE NOT_EMPTY_FUNC
@ -67,6 +67,7 @@ BEGIN
OUTPUT F_CODCOM COM
OUTPUT F_COM DENCOM
OUTPUT F_PROV PROVCOM
OUTPUT F_CAP CAPCOM
CHECKTYPE NORMAL
WARNING "Comune assente"
HELP "Codice del comune dell'intestatario"
@ -119,12 +120,13 @@ END
STRING F_COFI 16
BEGIN
PROMPT 2 8 "Cod. fisc. "
FLAGS "U"
HELP "Codice fiscale dell'intestatario"
VALIDATE CF_FUNC F_STATO
WARNING "Codice fiscale errato"
END
GROUPBOX DLG_NULL 77 9
GROUPBOX DLG_NULL 77 7
BEGIN
PROMPT 1 10 "Dati registro"
END
@ -258,7 +260,7 @@ END
NUMBER F_NPAGFI 6
BEGIN
PROMPT 2 15 "Numero pagina finale "
PROMPT 42 14 "Numero pagina finale "
HELP "Numero dell'ultima pagina da numerare"
FLAGS "R"
NUM_EXPR {#THIS_FIELD>=(#F_NPAGINI+2)}
@ -267,13 +269,13 @@ END
BOOLEAN F_PRIMO
BEGIN
PROMPT 2 16 "Inizio numerazione dopo primo foglio "
PROMPT 2 15 "Inizio numerazione dopo primo foglio "
HELP "Indicare se iniziare la numerazione nel secondo foglio"
END
NUMBER F_ANNOSTAMPA 4
BEGIN
PROMPT 2 17 "Anno per numerazione pagina "
PROMPT 42 15 "Anno per numerazione pagina "
HELP "Indicare l'anno se si vuole la numerazione pagine con indicazione anno"
END