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

- Correzione errore MI2179 sulla Variazione SC da ricevere.

Browse Source 
- Correzione errore MI2162 su Ripristino movimenti da inviare.
- Correzione errore MI3480 su invio PC e invio Sistema.
- Correzione errore MI3479 su ricezione da PC e ricezione da Sistema.


git-svn-id: svn://10.65.10.50/trunk@3862 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
ale 1996-11-04 11:48:07 +00:00
parent 3333d79604
commit 4779f273e5
8 changed files with 222 additions and 158 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
cg/cg6400b.uml
View File

@ -1,10 +1,10 @@
#include "cg6400.h" #include "cg6400.h"
PAGE "" -1 -1 44 8 PAGE "" -1 -1 48 8
LIST F_DRIVE 2 LIST F_DRIVE 2
BEGIN BEGIN
PROMPT 2 2 "Disco " PROMPT 2 2 "Disco "
ITEM "A:|A:" ITEM "A:|A:"
ITEM "B:|B:" ITEM "B:|B:"
ITEM "C:|C:" ITEM "C:|C:"
@ -15,7 +15,7 @@ END
STRING F_PATHNAME 30 STRING F_PATHNAME 30
BEGIN BEGIN
PROMPT 2 4 "Percorso " PROMPT 2 4 "Indirizzario "
HELP "Specificare il percorso completo dove ricercare il file di ricezione dati" HELP "Specificare il percorso completo dove ricercare il file di ricezione dati"
FLAGS "U" FLAGS "U"
//VALIDATE FILENAME_FUNC //VALIDATE FILENAME_FUNC

13
cg/cg6804.cpp
View File

@ -189,6 +189,12 @@ bool TVar_sc::gestione_handler(TMask_field& f, KEY k)
rp.sheet_mask().set_handler(116, importo_handler); rp.sheet_mask().set_handler(116, importo_handler);
rp.sheet_mask().set_handler(117, impval_handler); rp.sheet_mask().set_handler(117, impval_handler);
rp.sheet_mask().set_handler(DLG_DELREC, elimina_scadenza); rp.sheet_mask().set_handler(DLG_DELREC, elimina_scadenza);
rp.swap_columns(105,106);
rp.swap_columns(105,107);
rp.swap_columns(105,108);
rp.swap_columns(105,109);
rp.swap_columns(105,110);
app().setta_mask_scad(tipocf,gruppo,conto,sottoc,anno,npart,nriga,*msk); app().setta_mask_scad(tipocf,gruppo,conto,sottoc,anno,npart,nriga,*msk);
@ -236,6 +242,13 @@ bool TVar_sc::gestione_handler(TMask_field& f, KEY k)
rp.sheet_mask().set_handler(118, sezione_dc_handler); rp.sheet_mask().set_handler(118, sezione_dc_handler);
rp.sheet_mask().set_handler(119, diffcambio_handler); rp.sheet_mask().set_handler(119, diffcambio_handler);
rp.sheet_mask().set_handler(DLG_DELREC, elimina_pagamenti); rp.sheet_mask().set_handler(DLG_DELREC, elimina_pagamenti);
rp.swap_columns(105,106);
rp.swap_columns(105,107);
rp.swap_columns(105,108);
rp.swap_columns(105,109);
rp.swap_columns(105,110);
rp.swap_columns(105,111);
app().setta_mask_pagsca(tipocf,gruppo,conto,sottoc,anno,npart,nriga,*msk); app().setta_mask_pagsca(tipocf,gruppo,conto,sottoc,anno,npart,nriga,*msk);

122
cg/cg6804d.uml
View File

@ -1,62 +1,62 @@
#include "cg6804a.h" #include "cg6804a.h"
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
BUTTON DLG_SAVEREC 10 2 BUTTON DLG_SAVEREC 10 2
BEGIN BEGIN
PROMPT -13 -1 "~Registra" PROMPT -13 -1 "~Registra"
MESSAGE EXIT,K_SAVE MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC PICTURE BMP_SAVEREC
END END
BUTTON DLG_CANCEL 10 2 BUTTON DLG_CANCEL 10 2
BEGIN BEGIN
PROMPT -23 -1 "" PROMPT -23 -1 ""
MESSAGE EXIT,K_ESC MESSAGE EXIT,K_ESC
END END
BUTTON DLG_QUIT 10 2 BUTTON DLG_QUIT 10 2
BEGIN BEGIN
PROMPT -33 -1 "" PROMPT -33 -1 ""
MESSAGE EXIT,K_QUIT MESSAGE EXIT,K_QUIT
END END
ENDPAGE ENDPAGE
PAGE "Variazione Movimenti Saldaconto" -1 -1 78 20 PAGE "Variazione Movimenti Saldaconto" -1 -1 78 20
SPREADSHEET F_RIGASCAD 0 16 SPREADSHEET F_RIGASCAD 0 16
BEGIN BEGIN
PROMPT 0 1 "" PROMPT 0 1 ""
ITEM "Tipo" ITEM "Tipo@4"
ITEM "Gruppo" ITEM "Gruppo"
ITEM "Conto" ITEM "Conto"
ITEM "Sottoconto" ITEM "Sottoconto"
ITEM "Descrizione conto / Ragione sociale C/F@50" ITEM "Descrizione conto / Ragione sociale C/F@50"
ITEM "Anno" ITEM "Anno"
ITEM "Numero@7" ITEM "Numero@7"
ITEM "N.riga" ITEM "N.riga"
ITEM "N.rata" ITEM "N.rata"
ITEM "Data scad." ITEM "Data scad."
ITEM "Cod.pag." ITEM "Cod.pag."
ITEM "Tipopag" ITEM "Tipopag"
ITEM "Ult.class." ITEM "Ult.class."
ITEM "Descrizione condizioni pagamento@50" ITEM "Descrizione condizioni pagamento@50"
ITEM "Sez" ITEM "Sez"
ITEM "Importo@15" ITEM "Importo@15"
ITEM "Importo in valuta" ITEM "Importo in valuta"
ITEM "Descrizione@50" ITEM "Descrizione@50"
ITEM "Ns.ABI" ITEM "Ns.ABI"
ITEM "Ns.CAB" ITEM "Ns.CAB"
ITEM "Vs.ABI" ITEM "Vs.ABI"
ITEM "Vs.CAB" ITEM "Vs.CAB"
ITEM "Cod.Agente" ITEM "Cod.Agente"
ITEM "Data soll." ITEM "Data soll."
ITEM "Num. soll." ITEM "Num. soll."
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK
#include "cg6804f.uml" #include "cg6804f.uml"

134
cg/cg6804e.uml
View File

@ -1,68 +1,68 @@
#include "cg6804a.h" #include "cg6804a.h"
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
BUTTON DLG_SAVEREC 10 2 BUTTON DLG_SAVEREC 10 2
BEGIN BEGIN
PROMPT -13 -1 "~Registra" PROMPT -13 -1 "~Registra"
MESSAGE EXIT,K_SAVE MESSAGE EXIT,K_SAVE
PICTURE BMP_SAVEREC PICTURE BMP_SAVEREC
END END
BUTTON DLG_CANCEL 10 2 BUTTON DLG_CANCEL 10 2
BEGIN BEGIN
PROMPT -23 -1 "" PROMPT -23 -1 ""
MESSAGE EXIT,K_ESC MESSAGE EXIT,K_ESC
END END
BUTTON DLG_QUIT 10 2 BUTTON DLG_QUIT 10 2
BEGIN BEGIN
PROMPT -33 -1 "" PROMPT -33 -1 ""
MESSAGE EXIT,K_QUIT MESSAGE EXIT,K_QUIT
END END
ENDPAGE ENDPAGE
PAGE "Variazione Movimenti Saldaconto" -1 -1 78 20 PAGE "Variazione Movimenti Saldaconto" -1 -1 78 20
SPREADSHEET F_RIGAPAGSCA 0 16 SPREADSHEET F_RIGAPAGSCA 0 16
BEGIN BEGIN
PROMPT 0 1 "" PROMPT 0 1 ""
ITEM "Tipo" ITEM "Tipo@4"
ITEM "Gruppo" ITEM "Gruppo"
ITEM "Conto" ITEM "Conto"
ITEM "Sottoconto" ITEM "Sottoconto"
ITEM "Descrizione conto / Ragione sociale C/F@50" ITEM "Descrizione conto / Ragione sociale C/F@50"
ITEM "Anno" ITEM "Anno"
ITEM "Numero@7" ITEM "Numero@7"
ITEM "N.riga fatt." ITEM "N.riga fatt."
ITEM "N.rata fatt." ITEM "N.rata fatt."
ITEM "N.riga" ITEM "N.riga"
ITEM "Acc./Sal." ITEM "Acc./Sal."
ITEM "Sez" ITEM "Sez"
ITEM "Importo pagato" ITEM "Importo pagato"
ITEM "Sez" ITEM "Sez"
ITEM "Ritenute prof." ITEM "Ritenute prof."
ITEM "Sez" ITEM "Sez"
ITEM "Abbuoni@15" ITEM "Abbuoni@15"
ITEM "Sez" ITEM "Sez"
ITEM "Diff. cambio@15" ITEM "Diff. cambio@15"
ITEM "Importo in valuta" ITEM "Importo in valuta"
ITEM "Tipo" ITEM "Tipo"
ITEM "Gruppo" ITEM "Gruppo"
ITEM "Conto" ITEM "Conto"
ITEM "Sottoconto" ITEM "Sottoconto"
ITEM "Descrizione contropartita@50" ITEM "Descrizione contropartita@50"
ITEM "Ns.ABI" ITEM "Ns.ABI"
ITEM "Ns.CAB" ITEM "Ns.CAB"
ITEM "Vs.ABI" ITEM "Vs.ABI"
ITEM "Vs.CAB" ITEM "Vs.CAB"
ITEM "Cod.Agente" ITEM "Cod.Agente"
ITEM "Attivo/Passivo" ITEM "Attivo/Passivo"
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK
#include "cg6804g.uml" #include "cg6804g.uml"

84
cg/cg6900.cpp
View File

@ -188,17 +188,38 @@ bool TInv_cont::main_loop()
TMask* mask = new TMask("cg6900b"); TMask* mask = new TMask("cg6900b");
KEY k; KEY k;
TString floppy,percorso;
k = mask->run(); int num_disk;
if (k == K_ENTER) bool ok = FALSE;
{ bool abbandona = FALSE;
TString floppy = mask->get(F_FLOPPY); do
int num_disk = calcola_numero_dischi(*mask,floppy); {
TString percorso = mask->get(F_PATH); k = mask->run();
if (percorso.not_empty())
floppy << ":/" << percorso;
if (k != K_ENTER)
{
abbandona = TRUE;
break;
}
floppy = mask->get(F_FLOPPY);
num_disk = calcola_numero_dischi(*mask,floppy);
percorso = mask->get(F_PATH);
if (percorso.not_empty())
{
floppy << ":/" << percorso;
if (fexist(floppy))
ok = TRUE;
else
message_box("Il percorso indicato non e' corretto");
}
else
ok = TRUE; // Se scelgo il dischetto non eseguo il controllo sulla correttezza del path
}
while (!ok);
if (!abbandona)
{
str.format("%02d", num_disk); str.format("%02d", num_disk);
aggiorna_marker(str,29); aggiorna_marker(str,29);
@ -265,17 +286,38 @@ bool TInv_cont::main_loop()
TMask* mask = new TMask("cg6900b"); TMask* mask = new TMask("cg6900b");
KEY k; KEY k;
TString floppy,percorso;
k = mask->run(); int num_disk;
if (k == K_ENTER) bool ok = FALSE;
{ bool abbandona = FALSE;
TString floppy = mask->get(F_FLOPPY); do
int num_disk = calcola_numero_dischi(*mask,floppy); {
TString percorso = mask->get(F_PATH); k = mask->run();
if (percorso.not_empty())
floppy << ":/" << percorso; if (k != K_ENTER)
{
abbandona = TRUE;
break;
}
floppy = mask->get(F_FLOPPY);
num_disk = calcola_numero_dischi(*mask,floppy);
percorso = mask->get(F_PATH);
if (percorso.not_empty())
{
floppy << ":/" << percorso;
if (fexist(floppy))
ok = TRUE;
else
message_box("Il percorso indicato non e' corretto");
}
else
ok = TRUE; // Se scelgo il dischetto non eseguo il controllo sulla correttezza del path
}
while (!ok);
if (!abbandona)
{
str.format("%02d", num_disk); str.format("%02d", num_disk);
aggiorna_marker(str,32); aggiorna_marker(str,32);

12
cg/cg6900b.uml
View File

@ -7,22 +7,24 @@ BEGIN
PROMPT 1 1 "Disco " PROMPT 1 1 "Disco "
ITEM "A|A:" ITEM "A|A:"
MESSAGE HIDE,F_PATH MESSAGE HIDE,F_PATH
MESSAGE ENABLE,F_DIM MESSAGE ENABLE,F_DIM
MESSAGE RESET,F_PATH
ITEM "B|B:" ITEM "B|B:"
MESSAGE HIDE,F_PATH MESSAGE HIDE,F_PATH
MESSAGE ENABLE,F_DIM MESSAGE ENABLE,F_DIM
MESSAGE RESET,F_PATH
ITEM "C|C:" ITEM "C|C:"
MESSAGE SHOW,F_PATH MESSAGE SHOW,F_PATH
MESSAGE DISABLE,F_DIM MESSAGE DISABLE,F_DIM
ITEM "D|D:" ITEM "D|D:"
MESSAGE SHOW,F_PATH MESSAGE SHOW,F_PATH
MESSAGE DISABLE,F_DIM MESSAGE DISABLE,F_DIM
ITEM "E|E:" ITEM "E|E:"
MESSAGE SHOW,F_PATH MESSAGE SHOW,F_PATH
MESSAGE DISABLE,F_DIM MESSAGE DISABLE,F_DIM
ITEM "F|F:" ITEM "F|F:"
MESSAGE SHOW,F_PATH MESSAGE SHOW,F_PATH
MESSAGE DISABLE,F_DIM MESSAGE DISABLE,F_DIM
END END
LIST F_DIM 7 LIST F_DIM 7
@ -37,7 +39,7 @@ END
STRING F_PATH 30 STRING F_PATH 30
BEGIN BEGIN
PROMPT 1 5 "Percorso " PROMPT 1 5 "Indirizzario "
END END
BUTTON DLG_OK 9 2 BUTTON DLG_OK 9 2

8
cg/cg6903.cpp
View File

@ -35,7 +35,13 @@ bool TRip_flag::set()
bool rippn = msk->get_bool(F_RIPPN); bool rippn = msk->get_bool(F_RIPPN);
bool ripiva = msk->get_bool(F_RIPIVA); bool ripiva = msk->get_bool(F_RIPIVA);
bool ripsc = msk->get_bool(F_RIPSC); bool ripsc = msk->get_bool(F_RIPSC);
if (!prefix().exist(ditta))
{
error_box("Libreria archivi ditta non presente su disco");
return FALSE;
}
if (!rippn && !ripiva && !ripsc) if (!rippn && !ripiva && !ripsc)
{ {
delete msk; delete msk;

1
cg/cg6903.h
View File

@ -5,6 +5,7 @@
#include <urldefid.h> #include <urldefid.h>
#include <mask.h> #include <mask.h>
#include <progind.h> #include <progind.h>
#include <prefix.h>
#include "cg2.h" #include "cg2.h"