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

Patch level : 2.0 540

Browse Source 
Files correlati     : cg2.exe cg2100c.msk cg6.exe
Ricompilazione Demo : [ ]
Commento            :

EP20100
DA TASTIERA:  ALT+C NON FUNZIONA

EP20104
Al'interno di un movimento contabile non posso effettuare la ricerca del
cli/for per descrizione alternativa


git-svn-id: svn://10.65.10.50/trunk@11354 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-07-25 14:51:45 +00:00
parent 2a104387cb
commit f2f3964a40
4 changed files with 49 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cg/cg2100.h
View File

@ -24,10 +24,12 @@
#define F_STATOPAIV 153
#define F_PIVACLIENTE 154
#define F_COFICLIENTE 155
#define F_RICALTCLIENTE 156
#define F_FORNITORE 161
#define F_RAGSOCFORNITORE 162
#define F_PIVAFORNITORE 164
#define F_COFIFORNITORE 165
#define F_RICALTFORNITORE 166
#define F_GRUPPOCLIFO 170
#define F_CONTOCLIFO 171
#define F_TOTALE 118

49
cg/cg2100c.uml
View File

@ -238,6 +238,7 @@ BEGIN
OUTPUT F_STATOPAIV STATOPAIV
OUTPUT F_PIVACLIENTE PAIV
OUTPUT F_COFICLIENTE COFI
OUTPUT F_RICALTCLIENTE RICALT
MESSAGE COPY,F_FORNITORE
CHECKTYPE REQUIRED
WARNING "Cliente assente"
@ -262,6 +263,7 @@ BEGIN
OUTPUT F_STATOPAIV STATOPAIV
OUTPUT F_PIVAFORNITORE PAIV
OUTPUT F_COFIFORNITORE COFI
OUTPUT F_RICALTFORNITORE RICALT
MESSAGE COPY,F_CLIENTE
CHECKTYPE REQUIRED
WARNING "Fornitore assente"
@ -300,7 +302,7 @@ END
STRING F_COFICLIENTE 16
BEGIN
PROMPT 1 11 "C.F. "
PROMPT 1 11 "C.F. "
GROUP 1
USE LF_CLIFO KEY 4
INPUT TIPOCF "C"
@ -317,7 +319,7 @@ END
STRING F_COFIFORNITORE 16
BEGIN
PROMPT 1 11 "C.F. "
PROMPT 1 11 "C.F. "
GROUP 2
USE LF_CLIFO KEY 4
INPUT TIPOCF "F"
@ -330,7 +332,7 @@ END
STRING F_PIVACLIENTE 12
BEGIN
PROMPT 28 11 "Partita IVA "
PROMPT 26 11 "P.I. "
GROUP 1
USE LF_CLIFO KEY 5
INPUT TIPOCF "C"
@ -348,7 +350,7 @@ END
STRING F_PIVAFORNITORE 12
BEGIN
PROMPT 28 11 "Partita IVA "
PROMPT 26 11 "P.I. "
GROUP 2
USE LF_CLIFO KEY 5
INPUT TIPOCF "F"
@ -362,7 +364,7 @@ END
STRING F_STATOPAIV 2
BEGIN
PROMPT 57 11 ""
PROMPT 48 11 ""
FLAGS "U"
USE %SCE
INPUT CODTAB F_STATOPAIV
@ -370,9 +372,46 @@ BEGIN
DISPLAY "Descrizione@50" S0
OUTPUT F_STATOPAIV CODTAB
CHECKTYPE NORMAL
END
STRING F_RICALTCLIENTE 21 18
BEGIN
PROMPT 54 11 "Alt. "
USE LF_CLIFO KEY 6
INPUT TIPOCF "C"
INPUT RICALT F_RICALTCLIENTE
DISPLAY "Codice alternativo@21" RICALT
DISPLAY "Ragione Sociale@50" RAGSOC
DISPLAY "Codice" CODCF
DISPLAY "Sospeso" SOSPESO
DISPLAY "Partita IVA@12" PAIV
DISPLAY "Codice Fiscale@16" COFI
COPY OUTPUT F_CLIENTE
CHECKTYPE NORMAL
ADD RUN cg0 -1 C
GROUP 1
END
STRING F_RICALTFORNITORE 21 18
BEGIN
PROMPT 54 11 "Alt. "
USE LF_CLIFO KEY 6
INPUT TIPOCF "F"
INPUT RICALT F_RICALTFORNITORE
DISPLAY "Codice alternativo@21" RICALT
DISPLAY "Ragione Sociale@50" RAGSOC
DISPLAY "Codice" CODCF
DISPLAY "Sospeso" SOSPESO
DISPLAY "Partita IVA@12" PAIV
DISPLAY "Codice Fiscale@16" COFI
COPY OUTPUT F_FORNITORE
CHECKTYPE NORMAL
ADD RUN cg0 -1 F
GROUP 2
END
BUTTON F_OCCASEDIT 56
BEGIN
PROMPT 1 11 "Dati anagrafici del cliente o fornitore occasionale"

6
cg/cg2102.cpp
View File

@ -639,7 +639,7 @@ HIDDEN bool imptot_error(const TImporto& imptot, const TImporto& impsal, bool va
TString msg(255);
if (codval.not_empty())
msg << TR("Il totale documento in valuta") << codval;
msg << TR("Il totale documento in valuta") << ' ' << codval;
else
msg << TR("Il totale documento inserito");
msg << TR(" e' ") << euro.string(TRUE) << ' ' << imptot.sezione() << ",\n";
@ -772,7 +772,7 @@ bool TPrimanota_application::cg_handler(TMask_field& f, KEY k)
const TImporto imp_spe(importo.sezione(), spe.get_num());
saldaconto_val += imp_spe;
} else
if (tipo == 'K')
if (tipo == 'K' || tipo == 'T')
saldaconto_val += a.partite().importo_speso(numreg, i+1, TRUE, 0x1);
}
}
@ -1922,8 +1922,6 @@ bool TPrimanota_application::num_handler(TMask_field& f, KEY key)
const TRectype& mov = cache().get(LF_MOV, f.get());
if (!mov.empty())
{
bool ok = TRUE;

2
cg/cgsaldac.cpp
View File

@ -1231,7 +1231,7 @@ TRiga_partite& TPartita::new_row(int r)
TRiga_partite& TPartita::riga(int r) const
{
if (!_part.exist(r))
if (r > 0 && !_part.exist(r))
{
yesnofatal_box("La partita %d %s del conto %c %d %d %ld (%s) è incoerente: manca la riga %d",
anno(), (const char*)numero(),