cg0500.cpp Aggiunto include <recarray.h>
cg2100a.uml Abbassato groupbox cg21cg.uml Corretta maschera cg3100.cpp Corretto uso movimenti provvisori cg3200.cpp Corretto uso movimenti provvisori cg3600.cpp Aggiunto include <recarray.h> git-svn-id: svn://10.65.10.50/trunk@4762 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
415e230ca3
commit
3ac58423fd
@ -3,6 +3,7 @@
|
||||
#include <applicat.h>
|
||||
#include <config.h>
|
||||
#include <msksheet.h>
|
||||
#include <recarray.h>
|
||||
#include <relapp.h>
|
||||
#include <tabutil.h>
|
||||
#include <utility.h>
|
||||
|
@ -27,7 +27,7 @@ BEGIN
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 78 8
|
||||
GROUPBOX DLG_NULL 78 7
|
||||
BEGIN
|
||||
PROMPT 1 5 "@bMovimento di prima nota"
|
||||
FLAGS "R"
|
||||
@ -83,7 +83,7 @@ END
|
||||
|
||||
STRING F_CODCAUS 3
|
||||
BEGIN
|
||||
PROMPT 3 11 "Causale "
|
||||
PROMPT 3 10 "Causale "
|
||||
FLAGS "UZ"
|
||||
FIELD CODCAUS
|
||||
USE LF_CAUSALI
|
||||
@ -101,7 +101,7 @@ END
|
||||
|
||||
STRING F_DESCRCAUS 50
|
||||
BEGIN
|
||||
PROMPT 23 11 ""
|
||||
PROMPT 23 10 ""
|
||||
USE LF_CAUSALI KEY 2
|
||||
CHECKTYPE NORMAL
|
||||
INPUT DESCR F_DESCRCAUS
|
||||
|
@ -8,7 +8,6 @@ END
|
||||
STRING 108 5
|
||||
BEGIN
|
||||
PROMPT 2 2 ""
|
||||
HELP "Codice della descrizione aggiuntiva della riga"
|
||||
FLAGS "UZ"
|
||||
USE %DPN
|
||||
INPUT CODTAB 108
|
||||
@ -27,7 +26,6 @@ BEGIN
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT 108
|
||||
HELP "Descrizione aggiuntiva della riga"
|
||||
FIELD DESCR
|
||||
END
|
||||
|
||||
@ -39,7 +37,6 @@ END
|
||||
NUMBER CG_DARE 15
|
||||
BEGIN
|
||||
PROMPT 2 5 "Dare "
|
||||
HELP "Importo 'dare' del conto della riga"
|
||||
FLAGS "RV"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -47,7 +44,6 @@ END
|
||||
NUMBER CG_AVERE 15
|
||||
BEGIN
|
||||
PROMPT 43 5 "Avere "
|
||||
HELP "Importo 'avere' del conto della riga"
|
||||
FLAGS "RV"
|
||||
PICTURE "."
|
||||
END
|
||||
@ -55,7 +51,6 @@ END
|
||||
LIST CG_TIPO 1 10
|
||||
BEGIN
|
||||
PROMPT 2 6 "Tipo "
|
||||
HELP "Tipo del conto principale della riga"
|
||||
FLAGS "U"
|
||||
ITEM " |Conto" MESSAGE SHOW,106|HIDE,206|HIDE,306|SHOW,107|HIDE,207|HIDE,307
|
||||
ITEM "C|Cliente" MESSAGE SHOW,206|HIDE,106|HIDE,306|SHOW,207|HIDE,107|HIDE,307
|
||||
@ -65,13 +60,11 @@ END
|
||||
NUMBER CG_GRUPPO 3
|
||||
BEGIN
|
||||
PROMPT 20 6 "Gruppo "
|
||||
HELP "Codice del conto delle riga"
|
||||
END
|
||||
|
||||
NUMBER CG_CONTO 3
|
||||
BEGIN
|
||||
PROMPT 32 6 "Conto "
|
||||
HELP "Codice del conto delle riga"
|
||||
FIELD LF_PCON->CONTO
|
||||
USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO="")
|
||||
INPUT GRUPPO 104
|
||||
@ -93,7 +86,6 @@ END
|
||||
NUMBER CG_SOTTOCONTO 6
|
||||
BEGIN
|
||||
PROMPT 45 6 "Sottoconto "
|
||||
HELP "Codice del conto delle riga"
|
||||
FIELD LF_PCON->SOTTOCONTO
|
||||
USE LF_PCON SELECT SOTTOCONTO!=""
|
||||
INPUT GRUPPO 104
|
||||
@ -115,7 +107,6 @@ END
|
||||
NUMBER 206 6
|
||||
BEGIN
|
||||
PROMPT 45 6 "Cliente "
|
||||
HELP "Codice del cliente delle riga"
|
||||
FIELD LF_PCON->SOTTOCONTO
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "C"
|
||||
@ -135,7 +126,6 @@ END
|
||||
NUMBER 306 6
|
||||
BEGIN
|
||||
PROMPT 45 6 "Fornitore "
|
||||
HELP "Codice del fornitore delle riga"
|
||||
FIELD LF_PCON->SOTTOCONTO
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "F"
|
||||
@ -156,7 +146,6 @@ END
|
||||
STRING 107 50
|
||||
BEGIN
|
||||
PROMPT 2 7 "Descriz. "
|
||||
HELP "Descrizione del conto delle riga"
|
||||
FIELD LF_PCON->DESCR
|
||||
USE LF_PCON KEY 2
|
||||
INPUT DESCR 107
|
||||
@ -173,7 +162,6 @@ END
|
||||
STRING 207 50
|
||||
BEGIN
|
||||
PROMPT 2 7 "Cliente "
|
||||
HELP "Ragione sociale del cliente delle riga"
|
||||
FIELD LF_CLIFO->RAGSOC
|
||||
USE LF_CLIFO KEY 2
|
||||
INPUT TIPOCF "C"
|
||||
@ -192,7 +180,6 @@ END
|
||||
STRING 307 50
|
||||
BEGIN
|
||||
PROMPT 2 7 "Fornitore "
|
||||
HELP "Ragione sociale del fonitore delle riga"
|
||||
FIELD LF_PCON->SOTTOCONTO
|
||||
USE LF_CLIFO KEY 2
|
||||
INPUT TIPOCF "F"
|
||||
@ -216,7 +203,6 @@ END
|
||||
LIST 110 1 10
|
||||
BEGIN
|
||||
PROMPT 2 10 "Tipo "
|
||||
HELP "Tipo del conto di contropartita della riga"
|
||||
FLAGS "U"
|
||||
ITEM " |Conto" MESSAGE SHOW,113|HIDE,213|HIDE,313|SHOW,114|HIDE,214|HIDE,314
|
||||
ITEM "C|Cliente" MESSAGE SHOW,213|HIDE,113|HIDE,313|SHOW,214|HIDE,114|HIDE,314
|
||||
@ -226,13 +212,11 @@ END
|
||||
NUMBER 111 3
|
||||
BEGIN
|
||||
PROMPT 20 10 "Gruppo "
|
||||
HELP "Codice del conto di contropartita delle riga"
|
||||
END
|
||||
|
||||
NUMBER 112 3
|
||||
BEGIN
|
||||
PROMPT 32 10 "Conto "
|
||||
HELP "Codice del conto di contropartita delle riga"
|
||||
FIELD LF_PCON->CONTO
|
||||
COPY USE 105
|
||||
INPUT GRUPPO 111
|
||||
@ -251,7 +235,6 @@ END
|
||||
NUMBER 113 6
|
||||
BEGIN
|
||||
PROMPT 45 10 "Sottoconto "
|
||||
HELP "Codice del conto di contropartita delle riga"
|
||||
FIELD LF_PCON->SOTTOCONTO
|
||||
COPY USE 106
|
||||
COPY INPUT 112
|
||||
@ -267,7 +250,6 @@ END
|
||||
NUMBER 213 6
|
||||
BEGIN
|
||||
PROMPT 45 10 "Cliente "
|
||||
HELP "Codice del cliente di contropartita delle riga"
|
||||
FIELD LF_CLIFO->CODCF
|
||||
COPY USE 206
|
||||
INPUT TIPOCF "C"
|
||||
@ -282,7 +264,6 @@ END
|
||||
NUMBER 313 6
|
||||
BEGIN
|
||||
PROMPT 45 10 "Fornitore "
|
||||
HELP "Codice del fornitore di contropartita delle riga"
|
||||
FIELD LF_CLIFO->CODCF
|
||||
COPY USE 306
|
||||
INPUT TIPOCF "F"
|
||||
@ -297,7 +278,6 @@ END
|
||||
STRING 114 50
|
||||
BEGIN
|
||||
PROMPT 2 11 "Descriz. "
|
||||
HELP "Descrizione del conto di contropartita delle riga"
|
||||
FIELD LF_PCON->DESCR
|
||||
COPY USE 107
|
||||
INPUT DESCR 114
|
||||
@ -310,7 +290,6 @@ END
|
||||
STRING 214 50
|
||||
BEGIN
|
||||
PROMPT 2 11 "Cliente "
|
||||
HELP "Ragione sociale del cliente di contropartita delle riga"
|
||||
FIELD LF_CLIFO->RAGSOC
|
||||
COPY USE 207
|
||||
INPUT TIPOCF "C"
|
||||
@ -325,7 +304,6 @@ END
|
||||
STRING 314 50
|
||||
BEGIN
|
||||
PROMPT 2 11 "Fornitore "
|
||||
HELP "Ragione sociale del fornitore di contropartita delle riga"
|
||||
FIELD LF_CLIFO->RAGSOC
|
||||
COPY USE 307
|
||||
INPUT TIPOCF "F"
|
||||
|
@ -791,7 +791,7 @@ void TListaMov_application::set_page(int file, int count)
|
||||
set_row (_n, "@103greg @3s",FLD(LF_MOV,MOV_REG));
|
||||
set_row (_n, "@111gpr @5n",FLD(LF_MOV,MOV_PROTIVA));
|
||||
}
|
||||
else if (_provvis == 2 && (prov == 'P' || prov == 'N'))
|
||||
else if (_provvis == 2 && prov >= ' ')
|
||||
set_row (_n, "@103gMov.Provvisorio");
|
||||
//15/12/1995
|
||||
/*
|
||||
|
@ -776,14 +776,14 @@ void TMastrini_application::saldi_zero()
|
||||
_mov->read();
|
||||
if (_mov->bad())
|
||||
_mov->zero();
|
||||
int provvis (_mov->curr().get_int(MOV_PROVVIS));
|
||||
char provvis = _mov->curr().get_char(MOV_PROVVIS);
|
||||
int gruppo = atoi(rmov.get(RMV_GRUPPO));
|
||||
int conto = atoi(rmov.get(RMV_CONTO));
|
||||
long sottoc = atol(rmov.get(RMV_SOTTOCONTO));
|
||||
|
||||
if ((gruppo == _gruppo)&&(conto == _conto)&&(sottoc == _sottoc))
|
||||
{
|
||||
if (_stampa_mov_prov || provvis == 0)
|
||||
if (_stampa_mov_prov || provvis <= ' ')
|
||||
{
|
||||
char sezione = rmov.curr().get(RMV_SEZIONE)[0];
|
||||
real importo = rmov.curr().get_real(RMV_IMPORTO);
|
||||
|
@ -6,6 +6,7 @@
|
||||
#include <execp.h>
|
||||
#include <mailbox.h>
|
||||
#include <progind.h>
|
||||
#include <recarray.h>
|
||||
#include <relation.h>
|
||||
#include <urldefid.h>
|
||||
#include <utility.h>
|
||||
@ -14,7 +15,6 @@
|
||||
#include "cg3.h"
|
||||
#include "cglib01.h"
|
||||
#include "cg3600.h"
|
||||
//#include "conto.h"
|
||||
|
||||
#include <causali.h>
|
||||
#include <mov.h>
|
||||
|
Loading…
x
Reference in New Issue
Block a user