Patch level : 2.0 504

Files correlati     : batbgmc.msk batbmag.msk ve1100a.msk
Ricompilazione Demo : [ ]
Commento            :

EP20091
La pagina che si apre dopo l'indicazione del codice magazzino ha lo stesso
nome della testata.

EP20092
Entrando in ricerca sul campo "codice comune" le maschere di ricerca per
"codice" e per "descrizione" non riportano gli stessi bottoni (in
descrizione mancano i bottoni di COLLEGA e NUOVO)

EP20093
A pagina due:Entrando in ricerca sul campo "unità locale:codice"
la maschera non riporta bottoni  COLLEGA e NUOVO

EP20095
Apro la ricerca sui campi di codice sottoconto e passo in modalità ricerca
per descrizione. Se voglio tornare in modalità ricerca per sottoconto non
posso perché la finestra di ricerca mi per errore la possibilità di vedere
in ordine di conto.


git-svn-id: svn://10.65.10.50/trunk@11256 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-06-19 14:35:45 +00:00
parent 405617dfae
commit 7b7326bafb
4 changed files with 81 additions and 72 deletions

View File

@ -184,7 +184,10 @@ BEGIN
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCV
OUTPUT F_DESCRV DESCR
OUTPUT F_SOTTOCV SOTTOCONTO
OUTPUT F_GRUPPOV GRUPPO
OUTPUT F_CONTOV CONTO
CHECKTYPE NORMAL
WARNING "Il conto deve essere un ricavo"
ADD RUN CG0 -0
@ -246,7 +249,10 @@ BEGIN
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCA
OUTPUT F_DESCRA DESCR
OUTPUT F_SOTTOCA SOTTOCONTO
OUTPUT F_GRUPPOA GRUPPO
OUTPUT F_CONTOA CONTO
CHECKTYPE NORMAL
WARNING "Il conto deve essere un ricavo"
ADD RUN CG0 -0

View File

@ -1,10 +1,10 @@
#include "batbmag.h"
TOOLBAR "" 0 20 60 2
TOOLBAR "" 0 -3 60 3
#include <toolbar.h>
ENDPAGE
PAGE "Gestione magazzini" 11 60 14
PAGE "Magazzini" -1 -1 78 20
GROUPBOX DLG_NULL 75 6
BEGIN
@ -110,14 +110,14 @@ BEGIN
END
GROUPBOX DLG_NULL 72 6
GROUPBOX DLG_NULL 75 6
BEGIN
PROMPT 4 7 "Sede magazzino/deposito"
PROMPT 1 7 "Sede magazzino/deposito"
END
STRING F_IND 35
BEGIN
PROMPT 6 8 "Indirizzo "
PROMPT 2 8 "Indirizzo "
FIELD S2
END
@ -129,7 +129,7 @@ END
STRING F_COM 4
BEGIN
PROMPT 6 9 "Codice comune "
PROMPT 2 9 "Codice comune "
FLAGS "U"
FIELD S5
USE LF_COMUNI
@ -147,17 +147,18 @@ END
STRING F_LOC 50
BEGIN
PROMPT 6 10 "Comune "
PROMPT 2 10 "Comune "
USE LF_COMUNI KEY 2
INPUT DENCOM F_LOC
#include <comdden.h>
COPY OUTPUT F_COM
ADD RUN ba4 -0
CHECKTYPE NORMAL
END
STRING F_PROV 2
BEGIN
PROMPT 6 11 "Provincia "
PROMPT 2 11 "Provincia "
FLAGS "D"
END
@ -188,7 +189,7 @@ END
ENDPAGE
PAGE "Gestione magazzini" 11 60 14
PAGE "Parametri" -1 -1 78 20
NUMBER F_ANNO 4
BEGIN
@ -198,13 +199,57 @@ END
BOOLEAN F_GESTGIA
BEGIN
PROMPT 2 2 "Gestione giacenze in piu' depositi "
PROMPT 5 2 "Gestione giacenze in piu' depositi "
FIELD B0
MESSAGE TRUE CLEAR,F_MAGSTD
MESSAGE FALSE ENABLE,F_MAGSTD
GROUP G_INFOMAG
END
STRING F_CODLGIOR 3
BEGIN
PROMPT 5 4 "Codice libro giornale "
FLAGS "U"
FIELD S8
USE REG SELECT I0=9
INPUT CODTAB[1,4] F_ANNO
INPUT CODTAB[5,7] F_CODLGIOR
DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Giornale" CODTAB[5,7]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODLGIOR CODTAB[5,7]
OUTPUT F_ANNO CODTAB[1,4]
WARNING "Registro non valido come Libro giornale "
GROUP G_INFOMAG
END
/*STRING F_CODLUNICO 3
BEGIN
PROMPT 26 5 "Codice libro unico "
FLAGS "HU"
FIELD S9
USE %LBU
INPUT CODTAB[1,4] F_ANNO SELECT
INPUT CODTAB[5,7] F_CODLUNICO
DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Libro" CODTAB[5,7]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODLUNICO CODTAB[5,7]
CHECKTYPE REQUIRED
WARNING "Codice errato o non relativo a questo anno"
END
BOOLEAN F_USALUNICO
BEGIN
PROMPT 52 5 "Usa libro unico "
FLAGS "HU"
FIELD B6
MESSAGE FALSE HIDE,F_CODLUNICO|SHOW,F_CODLGIOR
MESSAGE TRUE SHOW,F_CODLUNICO|HIDE,F_CODLGIOR
END
*/
GROUPBOX DLG_NULL 72 5
BEGIN
PROMPT 4 6 "Unita' locale"
@ -233,7 +278,8 @@ BEGIN
OUTPUT H_LOC LF_COMUNI->DENCOM
OUTPUT H_PROV LF_COMUNI->PROVCOM
CHECKTYPE NORMAL
GROUP G_INFOMAG
GROUP G_INFOMAG
ADD RUN ba4 -3
END
STRING H_COM 4
@ -301,49 +347,6 @@ BEGIN
CHECKTYPE REQUIRED
END*/
STRING F_CODLGIOR 3
BEGIN
PROMPT 2 4 "Codice libro giornale "
FLAGS "U"
FIELD S8
USE REG SELECT I0=9
INPUT CODTAB[1,4] F_ANNO
INPUT CODTAB[5,7] F_CODLGIOR
DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Giornale" CODTAB[5,7]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODLGIOR CODTAB[5,7]
OUTPUT F_ANNO CODTAB[1,4]
WARNING "Registro non valido come Libro giornale "
GROUP G_INFOMAG
END
/*STRING F_CODLUNICO 3
BEGIN
PROMPT 26 5 "Codice libro unico "
FLAGS "HU"
FIELD S9
USE %LBU
INPUT CODTAB[1,4] F_ANNO SELECT
INPUT CODTAB[5,7] F_CODLUNICO
DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Libro" CODTAB[5,7]
DISPLAY "Descrizione@50" S0
OUTPUT F_CODLUNICO CODTAB[5,7]
CHECKTYPE REQUIRED
WARNING "Codice errato o non relativo a questo anno"
END
BOOLEAN F_USALUNICO
BEGIN
PROMPT 52 5 "Usa libro unico "
FLAGS "HU"
FIELD B6
MESSAGE FALSE HIDE,F_CODLUNICO|SHOW,F_CODLGIOR
MESSAGE TRUE SHOW,F_CODLUNICO|HIDE,F_CODLGIOR
END
*/
ENDPAGE

View File

@ -163,13 +163,13 @@ TDocumento_form::TDocumento_form(TRectype& doc, TRelation& rel, bool definitiva,
TFilename test(nomeform); test.ext("frm");
if (!test.exist())
{
error_box("Nome form di stampa '%s' non valido per il tipo documento %s ", (const char*)nomeform, (const char*)tipodoc);
error_box(FR("Nome form di stampa '%s' non valido per il tipo documento %s"), (const char*)nomeform, (const char*)tipodoc);
return;
}
}
else
{
error_box("Tipo di documento non valido: '%s'", (const char*)tipodoc);
error_box(FR("Tipo di documento non valido: '%s'"), (const char*)tipodoc);
return;
}
_valid = TRUE;
@ -285,8 +285,8 @@ bool TDocumento_form::doc_arrange()
{
if (offset_x() != 0 || offset_y() != 0)
{
error_box("Non e' possibile settare contemporaneamente gli offset"
" e i parametri di posizionamento del modulo %s.", (const char*)name());
error_box(FR("Non e' possibile settare contemporaneamente gli offset"
" e i parametri di posizionamento del modulo %s."), (const char*)name());
return FALSE;
}
else
@ -1271,7 +1271,7 @@ void TStampaDoc_application::print_selected()
pr.open();
TProgind* pi = pr.printtype() != screenvis ?
new TProgind(cur.items(),"Stampa documenti in corso...",FALSE,TRUE) :
new TProgind(cur.items(), TR("Stampa documenti in corso..."),FALSE,TRUE) :
NULL;
if (!_is_lista)
{
@ -1343,7 +1343,7 @@ void TStampaDoc_application::print_selected()
{
if (numerazione_definitiva(mainform->doc()) != NOERR)
{
error_box("Non è possibile completare la procedura di numerazione definitiva dei documenti. Errore %d", doc.status());
error_box(FR("Non è possibile completare la procedura di numerazione definitiva dei documenti. Errore %d"), doc.status());
break;
}
}
@ -1400,7 +1400,7 @@ void TStampaDoc_application::print_documento(TDocumento_form& f)
const bool is_vis = printer().printtype() == screenvis;
if (!is_vis)
{
TString status("Documento: ");
TString status(TR("Documento: "));
status << doc.get(DOC_CODNUM);
status << '\\' << doc.get(DOC_NDOC);
xvt_statbar_set(status);
@ -1416,8 +1416,8 @@ behaviour TStampaDoc_application::on_module_change(const TString &modulo, TStrin
if (!_interattivo) return skip; // se siamo in interattivo il documento viene saltato...
else
{ // ...altrimenti viene chiesto all'utente il da farsi
int risp= yesnocancel_box("Il modulo di carta è cambiato: inserire il modulo '%s' e premere 'Si' per continuare,"
"'No' per saltare il documento o 'Annulla' per interrompere la stampa", (const char*) modulo);
int risp= yesnocancel_box(FR("Il modulo di carta è cambiato: inserire il modulo '%s' e premere 'Si' per continuare,"
"'No' per saltare il documento o 'Annulla' per interrompere la stampa"), (const char*) modulo);
behaviour ret;
switch (risp)
{
@ -1440,7 +1440,7 @@ bool TStampaDoc_application::query_final_print()
{
if (_interattivo)
{ // se siamo in interattivo viene richiesto all'utente se la stampa è definitiva o meno
if (yesno_box("E' una stampa definitiva?")) return TRUE;
if (yesno_box(TR("E' una stampa definitiva?"))) return TRUE;
else return FALSE;
} else return _definitiva; // altrimenti ritorna il valore letto dalla linea di comando
}
@ -1734,7 +1734,7 @@ bool TStampaDoc_application::range_handler(TMask_field& f, KEY key)
const long lim_sup = atol(f.get());
const long lim_inf = f.mask().get_long(F_DA_NDOC);
if (lim_sup < lim_inf)
rt = f.error_box("Il limite superiore deve essere maggiore del limite inferiore");
rt = f.error_box(TR("Il limite superiore deve essere maggiore del limite inferiore"));
}
return rt;
}
@ -1746,7 +1746,7 @@ bool TStampaDoc_application::tipodoc_handler(TMask_field& f, KEY key)
{
case K_F9: //caso del bottone di selezione
{
TArray_sheet as(-1,-1,70,20,"Tipi documento","Codice|Descrizione@50"); //costruisce uno sheet di selezione dei tipi doc
TArray_sheet as(-1,-1,70,20,TR("Tipi documento"),"Codice|Descrizione@50"); //costruisce uno sheet di selezione dei tipi doc
const TRectype& recnum = cache().get("%NUM",m.get(101)); //cache sulla tabella numerazione documento con il numero doc immesso nella maschera
const TString80 s2 = recnum.get("S2"); //prende tutto il contenuto del campo S2 della tabella %NUM (numerazione docs)
for (int i = 0; i < s2.len(); i+=4)
@ -1779,7 +1779,7 @@ bool TStampaDoc_application::tipodoc_handler(TMask_field& f, KEY key)
if (tipodoc == f.get())
return TRUE;
}
return f.error_box("Tipo documento non valido per la numerazione %s", (const char*)m.get(101));
return f.error_box(FR("Tipo documento non valido per la numerazione %s"), (const char*)m.get(101));
}
break;
@ -1831,7 +1831,7 @@ bool TStampaDoc_application::create()
{
_clifo_rel = new TRelation(LF_CLIFO);
_clifo_cur = new TCursor(_clifo_rel);
_clifo_sheet = new TCursor_sheet(_clifo_cur, " |CODCF|RAGSOC", "Selezione Clienti/Fornitori",
_clifo_sheet = new TCursor_sheet(_clifo_cur, " |CODCF|RAGSOC", TR("Selezione Clienti/Fornitori"),
"@1|Codice@6R|Descrizione@50", 0, 1);
build_clifo_list(); // Costruisce l'array sheet dei clienti (si parte!!)
_selection_mask->set_handler(F_TIPOCF, tipocf_handler);
@ -1951,6 +1951,6 @@ int ve1100(int argc, char* argv[])
{
TStampaDoc_application a;
const bool cond = argc == 4 && argv[2][0] == 'L'; // Lista documenti
a.run(argc, argv, cond ? "Lista documenti" : "Stampa documenti di vendita");
a.run(argc, argv, cond ? TR("Lista documenti") : TR("Stampa documenti di vendita"));
return (0);
}

View File

@ -17,7 +17,7 @@ END
NUMBER F_ANNO 4 0
BEGIN
PROMPT 38 1 "Anno "
FLAG "P"
FLAG "AP"
CHECKTYPE REQUIRED
END