Patch level : 4.0 911
Files correlati : Ricompilazione Demo : [ ] Commento : Riportata la versione 3.2 1010 git-svn-id: svn://10.65.10.50/trunk@16380 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
87d96f2733
commit
d16bbbeb15
@ -1054,7 +1054,7 @@ void TAlleg_mask::add_0_9(int trc, TPadoaSchioppa_set& pss, TAlleg_log& log)
|
||||
|
||||
// Dati dell'intermediario che si cucca 50 Euro senza fare una mazza!
|
||||
const TString& inter = get(F_INTR);
|
||||
if (inter.full())
|
||||
if (inter.full() && codfis != inter)
|
||||
{
|
||||
pss.set("CodiceIntermediario" , inter);
|
||||
pss.set("NumeroIscrizioneAlboCAF", get(F_CAF));
|
||||
|
@ -98,8 +98,8 @@ END
|
||||
STRING F_INTR 16
|
||||
BEGIN
|
||||
PROMPT 2 13 "Codice fiscale "
|
||||
STR_EXPR #F_INTR!=#F_CONT
|
||||
WARNING "Il codice dell'intermediario deve essere diverso da quello del contribuente"
|
||||
// STR_EXPR #F_INTR!=#F_CONT
|
||||
// WARNING "Il codice dell'intermediario deve essere diverso da quello del contribuente"
|
||||
FLAGS "U"
|
||||
FIELD INTERMEDIARIO
|
||||
END
|
||||
|
@ -1,14 +1,9 @@
|
||||
#include <applicat.h>
|
||||
#include <automask.h>
|
||||
#include <execp.h>
|
||||
#include <progind.h>
|
||||
#include <reputils.h>
|
||||
#include <utility.h>
|
||||
#include <config.h>
|
||||
#include <recarray.h>
|
||||
#include <relation.h>
|
||||
#include <sheet.h>
|
||||
#include <tabutil.h>
|
||||
#include <textset.h>
|
||||
#include <reprint.h>
|
||||
|
||||
@ -191,15 +186,14 @@ long TClifoCSV::find_clifo(const char tipo, const TString& cofi, const TString&
|
||||
TString up_ragsoc = ragsoc;
|
||||
up_ragsoc.upper();
|
||||
|
||||
for (int key = 2; key<=5 && !found; key++)
|
||||
for (int key = 4; key<=5 && !found; key++)
|
||||
{
|
||||
bool good_key = false; // Assumiamo che la chiave sia icompleta
|
||||
|
||||
rec.zero();
|
||||
rec.put(CLI_TIPOCF,tipo);
|
||||
switch (key)
|
||||
{
|
||||
case 2: rec.put(CLI_RAGSOC,ragsoc); good_key = ragsoc.full(); break;
|
||||
{
|
||||
case 4: rec.put(CLI_COFI,cofi); good_key = cofi.full(); break;
|
||||
case 5: rec.put(CLI_PAIV,paiv); good_key = paiv.full(); break;
|
||||
default: break;
|
||||
|
@ -243,6 +243,12 @@ void TDocTS::upload_causali(const TFilename& file, TLog_report& log) const
|
||||
errore <<" la causale con codice " << cod << " non può essere inserita (codice max 3 caratteri)";
|
||||
log.log(2,errore);
|
||||
}
|
||||
|
||||
//il codice causale deve essere sempre di tre caratteri zero-filled
|
||||
while (cod.len() < 3)
|
||||
{
|
||||
cod.insert("0",0);
|
||||
}
|
||||
|
||||
causa.zero();
|
||||
|
||||
|
20
tc/tc8.cpp
Executable file
20
tc/tc8.cpp
Executable file
@ -0,0 +1,20 @@
|
||||
#include <xvt.h>
|
||||
|
||||
#include "tc8.h"
|
||||
|
||||
int main(int argc, char** argv)
|
||||
{
|
||||
const int op = argc < 2 ? 0 : argv[1][1]-'0';
|
||||
switch (op)
|
||||
{
|
||||
case 0: tc8100(argc,argv); break; // importazione da Semetra
|
||||
default: tc8100(argc,argv); break;
|
||||
}
|
||||
exit(0);
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
|
20
tc/tc8.h
Executable file
20
tc/tc8.h
Executable file
@ -0,0 +1,20 @@
|
||||
#ifndef __TC8_H
|
||||
#define __TC8_H
|
||||
|
||||
int tc8100(int argc, char** argv);
|
||||
|
||||
#endif // __TC8_H
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
@ -5,8 +5,8 @@
|
||||
#include <textset.h>
|
||||
#include <reprint.h>
|
||||
|
||||
#include "tc0.h"
|
||||
#include "tc0900a.h"
|
||||
#include "tc8.h"
|
||||
#include "tc8100a.h"
|
||||
|
||||
#include "../ve/velib.h"
|
||||
|
||||
@ -122,7 +122,7 @@ public:
|
||||
TImportaClifo_mask();
|
||||
};
|
||||
|
||||
TImportaClifo_mask::TImportaClifo_mask() :TAutomask ("tc0900a")
|
||||
TImportaClifo_mask::TImportaClifo_mask() :TAutomask ("tc8100a")
|
||||
{
|
||||
}
|
||||
|
||||
@ -797,10 +797,10 @@ void TClifoCSV::upload_fattEric(const TFilename& file, TLog_report& log, const i
|
||||
|
||||
const long cod = s.get(4).as_int(); //estrai dal file il codice utente
|
||||
|
||||
if (find_clifo('C',cod)) //controllo se il cliente esiste sulla tabella delle anagrafiche
|
||||
if (!find_clifo('C',cod)) //controllo se il cliente esiste sulla tabella delle anagrafiche
|
||||
{
|
||||
TString str;
|
||||
str << "Il cliente con codice " << cod << " non è presente nella tabella delle anagrafiche ";
|
||||
str << "Il cliente con codice " << cod << " non è presente in anagrafica ";
|
||||
log.log(1, str);
|
||||
}
|
||||
|
||||
@ -931,14 +931,14 @@ void TClifoCSV::main_loop()
|
||||
{
|
||||
if (transfer())
|
||||
{
|
||||
message_box(TR("Importazione documenti completata"));
|
||||
message_box(TR("Importazione completata"));
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
int tc0900 (int argc, char* argv[])
|
||||
int tc8100 (int argc, char* argv[])
|
||||
{
|
||||
TClifoCSV main_app;
|
||||
main_app.run(argc, argv, TR("Importazione Documenti da Teamsystem"));
|
||||
main_app.run(argc, argv, TR("Importazione da Semetra"));
|
||||
return true;
|
||||
}
|
@ -1,9 +1,9 @@
|
||||
// campi della maschera pt003100a Importazione Clienti/Fornitori, Fatture, Ricevute da file CSV
|
||||
// campi della maschera tc8100a Importazione da Semetra
|
||||
|
||||
#define F_CODDITTA 101
|
||||
#define F_RAGSOC 102
|
||||
#define F_PATH 103
|
||||
#define F_CLIFIS 104
|
||||
#define F_PATH 103
|
||||
#define F_CLIFIS 104
|
||||
#define F_CLIGIU 105
|
||||
#define F_NAMEFAT 106
|
||||
#define F_NUMFAT 107
|
@ -1,4 +1,4 @@
|
||||
#include "tc0900a.h"
|
||||
#include "tc8100a.h"
|
||||
|
||||
TOOLBAR "" 0 -3 0 3
|
||||
|
||||
@ -23,7 +23,7 @@ END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Importazione documenti da TeamSystem" 0 0 0 -3
|
||||
PAGE "Importazione da Semetra" 0 0 0 -3
|
||||
|
||||
GROUPBOX DLG_NULL 76 3
|
||||
BEGIN
|
@ -7,6 +7,7 @@ Item_01 = "TeamSystem", [TCMENU_002]
|
||||
Item_02 = "Zucchetti", [TCMENU_005]
|
||||
Item_03 = "Proforma", "tc9 -0", ""
|
||||
Item_04 = "Sispac", "tc9 -1", ""
|
||||
Item_05 = "Semetra", "tc8 -0", ""
|
||||
|
||||
[TCMENU_002]
|
||||
Caption = "TeamSystem"
|
||||
|
@ -67,7 +67,7 @@ void TFatturazione_bolle::campi_raggruppamento(TToken_string& campi) const
|
||||
const char* cond[] = { "CAMBIO", "SCONTO", "TIPODOC", "CODNUM",
|
||||
"CODPAG", "CODABIA|CODCABA", "CODLIST", "CODAG",
|
||||
"CODSPMEZZO", "CODPORTO", "CAUSTRASP", "CODVETT1|CODVETT2|CODVETT3",
|
||||
"CODINDSP",
|
||||
"CODINDSP", "CODCMS",
|
||||
NULL };
|
||||
|
||||
for (int u = 0; cond[u]; u++)
|
||||
|
@ -2579,6 +2579,7 @@ bool TElabora_mask::elabora()
|
||||
set(F_CODNUM_ELAB, num_in);
|
||||
set(F_NDOC_ELAB, "");
|
||||
set(F_NUMDOCRIF_ELAB, "");
|
||||
((TDocumento_mask *)_main)->set_focus_field(F_SHEET);
|
||||
}
|
||||
if (e->tipo() == _consegna_ordini)
|
||||
{
|
||||
|
Loading…
x
Reference in New Issue
Block a user