Corretta gestione tipo c/r in prima nota

Aggiustamenti minori (-> e .) negli altri


git-svn-id: svn://10.65.10.50/trunk@453 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1994-10-25 15:59:13 +00:00
parent 1cd883b4b2
commit 7058d6e5f4
7 changed files with 10 additions and 9 deletions

@ -139,6 +139,9 @@ bool TPrimanota_application::user_create()
return TRUE;
}
bool TPrimanota_application::save_and_new() const
{ return TRUE; }
bool TPrimanota_application::user_destroy()
{

@ -172,7 +172,7 @@ int TMovimentoPN::registra(bool re, bool force)
int tipoatt = 1;
if (att_mista)
{
const char tipo = r.get_char("TIPO");
const char tipo = r.get_char("TIPOC");
if (tipo == ' ')
{
TBill c(r.get_int("GRUPPO"), r.get_int("CONTO"), r.get_long("SOTTOCONTO"));

@ -95,6 +95,7 @@ protected:
virtual void init_query_mode(TMask& m);
virtual void init_insert_mode(TMask& m);
virtual void init_modify_mode(TMask& m);
virtual bool save_and_new() const;
virtual const char* get_next_key();
virtual int read(TMask& m);
virtual int write(const TMask& m);

@ -131,7 +131,6 @@ BEGIN
DISPLAY "Conto" CONTO
OUTPUT 209 CODCF
OUTPUT 210 RAGSOC
OUTPUT 105 ""
CHECKTYPE NORMAL
ADD RUN cg0 -1
MESSAGE COPY,109
@ -151,10 +150,9 @@ BEGIN
OUTPUT 108 CONTO
OUTPUT 309 CODCF
OUTPUT 310 RAGSOC
OUTPUT 105 ""
CHECKTYPE NORMAL
ADD RUN cg0 -1
MESSAGE COPY,109|RESET,105
MESSAGE COPY,109
VALIDATE REQIF_FUNC 1 101
WARNING "Fornitore inesistente nella riga IVA"
END

@ -1435,8 +1435,7 @@ bool CG3100_application::segnala_errori_ogniriga()
if ((_tiporegistro == 1)||(_tiporegistro == 2)) //movimento iva
{
long record, numreg;
TLocalisamfile* rmoviva = &(current_cursor()->file(LF_RMOVIVA))
;
TLocalisamfile& rmoviva = current_cursor()->file(LF_RMOVIVA);
_numreg = current_cursor()->file(LF_MOV).get_long(MOV_NUMREG);
if (current_cursor()->is_first_match(LF_RMOVIVA))
{

@ -451,7 +451,7 @@ END
ENDPAGE
PAGE "" -1 -1 60 10
PAGE "Stampa Mastrini" -1 -1 60 10
LIST F_NUMCARAT 10
BEGIN

@ -18,7 +18,7 @@ BEGIN
OUTPUT PAGINA_DA I1
// OUTPUT DATA_DA D0
// OUTPUT DATA_A D1
// CHECKTYPE NORMAL
CHECKTYPE NORMAL
FLAGS "U"
END
@ -33,7 +33,7 @@ BEGIN
DISPLAY "Data scarico" D2
OUTPUT ANNO_ESER CODTAB
// CHECKTYPE REQUIRED
FLAGS "HR"
FLAGS "HZ"
END
STRING REG_DESC 50