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

Patch level : 10.0 no patch

Browse Source 
Files correlati     : PS0398.exe
Ricompilazione Demo : [ ]
Commento

Trasferimento degli ordini da ftp direttamente


git-svn-id: svn://10.65.10.50/branches/R_10_00@20985 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2010-10-11 14:20:21 +00:00
parent 8219f58494
commit 7ab0a6d529
2 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
ps/ps0398100.cpp
View File

@ -387,12 +387,13 @@ bool TTrasferimento_ordini::elabora_file_txt(TTrasferimento_ordini_recordset& re
bool TTrasferimento_ordini::sposta_file_elaborato(const TFilename& dst_file, const TFilename& curr_fname, bool TTrasferimento_ordini::sposta_file_elaborato(const TFilename& dst_file, const TFilename& curr_fname,
TLog_report& log) TLog_report& log)
{ {
bool copia_riuscita = fcopy(curr_fname, dst_file); bool copia_riuscita = fcopy(curr_fname, dst_file, false, true);
if (copia_riuscita) if (copia_riuscita)
{ {
const long src_size = fsize(curr_fname); const long src_size = fsize(curr_fname);
const long dst_size = fsize(dst_file); const long dst_size = fsize(dst_file);
copia_riuscita = src_size == dst_size;
copia_riuscita = src_size == dst_size;
} }
if (!copia_riuscita) if (!copia_riuscita)
{ {
@ -401,15 +402,12 @@ bool TTrasferimento_ordini::sposta_file_elaborato(const TFilename& dst_file, con
log.log(2, msg); log.log(2, msg);
} }
else //se va tutto bene elimina il file dalla directory di origine else //se va tutto bene elimina il file dalla directory di origine
{ if (!remove_file(curr_fname))
const bool src_file_removed = remove_file(curr_fname);
if (!src_file_removed)
{ {
TString msg; TString msg;
msg.format("Impossibile eliminare il file origine %s ", curr_fname.name()); msg.format("Impossibile eliminare il file origine %s ", curr_fname.name());
log.log(1, msg); log.log(1, msg);
} }
}
return copia_riuscita; return copia_riuscita;
} }
@ -417,7 +415,7 @@ bool TTrasferimento_ordini::sposta_file_elaborato(const TFilename& dst_file, con
bool TTrasferimento_ordini::elabora() bool TTrasferimento_ordini::elabora()
{ {
TFilename src_files = _mask->get(F_PATH_SRC); TFilename src_files = _mask->get(F_PATH_SRC);
src_files.add("*header.txt"); src_files.add("*HEADER.txt");
TString_array src_files_list; TString_array src_files_list;
//dalla cartella origine prende tutti i files *HEADER.txt e crea una simpatica lista //dalla cartella origine prende tutti i files *HEADER.txt e crea una simpatica lista
const int n_files_txt = list_files(src_files, src_files_list); const int n_files_txt = list_files(src_files, src_files_list);
@ -453,9 +451,13 @@ bool TTrasferimento_ordini::elabora()
//file in formato filename (è l'ordine corrente da elaborare) //file in formato filename (è l'ordine corrente da elaborare)
const TFilename curr_fname = src_files_list.row(i); const TFilename curr_fname = src_files_list.row(i);
TFilename tempfile(tmp);
tempfile << '/' << curr_fname.name();
fcopy(curr_fname, tempfile, false, true);
//creazione del recordset associato al file //creazione del recordset associato al file
TTrasferimento_ordini_recordset recset(curr_fname); TTrasferimento_ordini_recordset recset(tempfile);
//se il file non è di GF (si vede dal codart) viene saltato! ohp! //se il file non è di GF (si vede dal codart) viene saltato! ohp!
if (!ordine_gf(recset)) if (!ordine_gf(recset))

2
ps/ps0398100a.uml
View File

@ -85,7 +85,7 @@ STRING F_CODMAG 3
BEGIN BEGIN
PROMPT 2 9 "Magazzino " PROMPT 2 9 "Magazzino "
USE MAG USE MAG
INPUT CODTAB F_TIPODOC INPUT CODTAB F_CODMAG
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_CODMAG CODTAB OUTPUT F_CODMAG CODTAB