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

Patch level : 12.0 no-patch

Browse Source 
Files correlati     : tf
Commento            : preparazione per esterometro
This commit is contained in:
Simone Palacino 2019-01-21 16:19:30 +01:00
parent ebb5f32763
commit a32dd4a1f7
9 changed files with 75 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
build/fp.sln
View File

@ -8,10 +8,13 @@ EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "fp0", "fp0.vcxproj", "{9C91BACF-9A70-4973-B8CC-FA3D2AF9867C}"
ProjectSection(ProjectDependencies) = postProject
{C575788B-0BE4-4F68-B9C9-3C204EC04E07} = {C575788B-0BE4-4F68-B9C9-3C204EC04E07}
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5} = {7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}
EndProjectSection
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "AgaLib", "AgaLib.vcxproj", "{2D38A763-3D74-4338-9362-B891784EC90E}"
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "tflib", "tflib.vcxproj", "{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Win32 = Debug|Win32
@ -30,6 +33,10 @@ Global
{2D38A763-3D74-4338-9362-B891784EC90E}.Debug|Win32.Build.0 = Debug|Win32
{2D38A763-3D74-4338-9362-B891784EC90E}.Release|Win32.ActiveCfg = Release|Win32
{2D38A763-3D74-4338-9362-B891784EC90E}.Release|Win32.Build.0 = Release|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Debug|Win32.ActiveCfg = Debug|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Debug|Win32.Build.0 = Debug|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Release|Win32.ActiveCfg = Release|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Release|Win32.Build.0 = Release|Win32
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE

2
build/fp0.vcxproj
View File

@ -193,14 +193,12 @@
<ExcludedFromBuild Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">false</ExcludedFromBuild>
</ClCompile>
<ClCompile Include="..\src\fp\fp0300.cpp" />
<ClCompile Include="..\src\tf\tfutility.cpp" />
</ItemGroup>
<ItemGroup>
<ClInclude Include="..\src\fp\fp0.h" />
<ClInclude Include="..\src\fp\fp0100a.h" />
<ClInclude Include="..\src\fp\fp0200a.h" />
<ClInclude Include="..\src\fp\fp0300a.h" />
<ClInclude Include="..\src\tf\tfutility.h" />
</ItemGroup>
<ItemGroup>
<MskCompiler Include="..\src\fp\fp0200a.uml">

6
build/fp0.vcxproj.filters
View File

@ -27,9 +27,6 @@
<ClCompile Include="..\src\fp\fp0.cpp">
<Filter>Sources</Filter>
</ClCompile>
<ClCompile Include="..\src\tf\tfutility.cpp">
<Filter>Sources</Filter>
</ClCompile>
<ClCompile Include="..\src\fp\fp0100.cpp">
<Filter>Sources</Filter>
</ClCompile>
@ -53,9 +50,6 @@
<ClInclude Include="..\src\fp\fp0.h">
<Filter>Headers</Filter>
</ClInclude>
<ClInclude Include="..\src\tf\tfutility.h">
<Filter>Headers</Filter>
</ClInclude>
<ClInclude Include="..\src\fp\fp0200a.h">
<Filter>Headers</Filter>
</ClInclude>

27
build/tf.sln
View File

@ -1,7 +1,12 @@

Microsoft Visual Studio Solution File, Format Version 11.00
# Visual Studio 2010
Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 15
VisualStudioVersion = 15.0.28307.106
MinimumVisualStudioVersion = 10.0.40219.1
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "tf0", "tf0.vcxproj", "{9C91BACF-9A70-4973-B8CC-FA3D2AF9867C}"
ProjectSection(ProjectDependencies) = postProject
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5} = {7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}
EndProjectSection
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "AgaLib", "AgaLib.vcxproj", "{2D38A763-3D74-4338-9362-B891784EC90E}"
EndProject
@ -9,6 +14,13 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "vedoc", "vedoc.vcxproj", "{
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "vedocext", "vedocext.vcxproj", "{0042619A-6B7C-4D3D-9CD9-9BDD8D200C15}"
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "fplib", "fplib.vcxproj", "{C575788B-0BE4-4F68-B9C9-3C204EC04E07}"
EndProject
Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "tflib", "tflib.vcxproj", "{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}"
ProjectSection(ProjectDependencies) = postProject
{C575788B-0BE4-4F68-B9C9-3C204EC04E07} = {C575788B-0BE4-4F68-B9C9-3C204EC04E07}
EndProjectSection
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Win32 = Debug|Win32
@ -31,8 +43,19 @@ Global
{0042619A-6B7C-4D3D-9CD9-9BDD8D200C15}.Debug|Win32.Build.0 = Debug|Win32
{0042619A-6B7C-4D3D-9CD9-9BDD8D200C15}.Release|Win32.ActiveCfg = Release|Win32
{0042619A-6B7C-4D3D-9CD9-9BDD8D200C15}.Release|Win32.Build.0 = Release|Win32
{C575788B-0BE4-4F68-B9C9-3C204EC04E07}.Debug|Win32.ActiveCfg = Debug|Win32
{C575788B-0BE4-4F68-B9C9-3C204EC04E07}.Debug|Win32.Build.0 = Debug|Win32
{C575788B-0BE4-4F68-B9C9-3C204EC04E07}.Release|Win32.ActiveCfg = Release|Win32
{C575788B-0BE4-4F68-B9C9-3C204EC04E07}.Release|Win32.Build.0 = Release|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Debug|Win32.ActiveCfg = Debug|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Debug|Win32.Build.0 = Debug|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Release|Win32.ActiveCfg = Release|Win32
{7BF6939E-DFCD-49ED-B0A8-EDB68DDCE6D5}.Release|Win32.Build.0 = Release|Win32
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
GlobalSection(ExtensibilityGlobals) = postSolution
SolutionGuid = {864F23A5-CCF4-4E1F-9D38-1416F09EEE8D}
EndGlobalSection
EndGlobal

6
build/tf0.vcxproj
View File

@ -64,7 +64,7 @@
</Midl>
<ClCompile>
<Optimization>Disabled</Optimization>
<AdditionalIncludeDirectories>..\src\xvtext\;..\src\cg;..\src\include;..\src\xvaga;..\src\fe;%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
<AdditionalIncludeDirectories>..\src\xvtdb\;..\src\xvtext\;..\src\cg;..\src\include;..\src\xvaga;..\src\fe;%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
<PreprocessorDefinitions>_DEBUG;WIN32;__LONGDOUBLE__;_WINDOWS;%(PreprocessorDefinitions)</PreprocessorDefinitions>
<MinimalRebuild>false</MinimalRebuild>
<RuntimeLibrary>MultiThreadedDebug</RuntimeLibrary>
@ -111,7 +111,7 @@
<ClCompile>
<Optimization>MaxSpeed</Optimization>
<InlineFunctionExpansion>Default</InlineFunctionExpansion>
<AdditionalIncludeDirectories>..\src\cg;..\src\include;..\src\xvaga;%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
<AdditionalIncludeDirectories>..\src\xvtdb\;..\src\xvtext\;..\src\cg;..\src\include;..\src\xvaga;..\src\fe;%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
<PreprocessorDefinitions>NDEBUG;WIN32;_WINDOWS;%(PreprocessorDefinitions)</PreprocessorDefinitions>
<StringPooling>true</StringPooling>
<RuntimeLibrary>MultiThreaded</RuntimeLibrary>
@ -188,7 +188,6 @@
<ClInclude Include="..\src\tf\tf0400a.h" />
<ClInclude Include="..\src\tf\tf0500a.h" />
<ClInclude Include="..\src\tf\tftbcon.h" />
<ClInclude Include="..\src\tf\tfutility.h" />
</ItemGroup>
<ItemGroup>
<ClCompile Include="..\src\cg\cglib01.cpp" />
@ -202,7 +201,6 @@
<ClCompile Include="..\src\tf\tf0300.cpp" />
<ClCompile Include="..\src\tf\tf0400.cpp" />
<ClCompile Include="..\src\tf\tf0500.cpp" />
<ClCompile Include="..\src\tf\tfutility.cpp" />
</ItemGroup>
<ItemGroup>
<MskCompiler Include="..\src\tf\tf0100a.uml">

26
build/tf0.vcxproj.filters
View File

@ -16,7 +16,7 @@
<Filter Include="Ini">
<UniqueIdentifier>{681a7df4-f2b5-4870-8949-6d7adba5aa29}</UniqueIdentifier>
</Filter>
<Filter Include="Ini\Masks">
<Filter Include="Masks">
<UniqueIdentifier>{a3067f4a-a21c-4966-b31b-d0536b8df95f}</UniqueIdentifier>
</Filter>
</ItemGroup>
@ -39,9 +39,6 @@
<ClInclude Include="..\src\tf\tf0400a.h">
<Filter>Headers</Filter>
</ClInclude>
<ClInclude Include="..\src\tf\tfutility.h">
<Filter>Headers</Filter>
</ClInclude>
<ClInclude Include="..\src\tf\tf0100b.h">
<Filter>Headers</Filter>
</ClInclude>
@ -56,9 +53,6 @@
<ClCompile Include="..\src\tf\tf0.cpp">
<Filter>Sources</Filter>
</ClCompile>
<ClCompile Include="..\src\fe\felib.cpp">
<Filter>Sources</Filter>
</ClCompile>
<ClCompile Include="..\src\tf\tf0200.cpp">
<Filter>Sources</Filter>
</ClCompile>
@ -68,9 +62,6 @@
<ClCompile Include="..\src\tf\tf0400.cpp">
<Filter>Sources</Filter>
</ClCompile>
<ClCompile Include="..\src\tf\tfutility.cpp">
<Filter>Sources</Filter>
</ClCompile>
<ClCompile Include="..\src\tf\tf0102.cpp">
<Filter>Sources</Filter>
</ClCompile>
@ -86,25 +77,28 @@
<ClCompile Include="..\src\cg\cglib03.cpp">
<Filter>Sources</Filter>
</ClCompile>
<ClCompile Include="..\src\fe\felib.cpp">
<Filter>Sources</Filter>
</ClCompile>
</ItemGroup>
<ItemGroup>
<MskCompiler Include="..\src\tf\tftbcon.uml">
<Filter>Ini\Masks</Filter>
<Filter>Masks</Filter>
</MskCompiler>
<MskCompiler Include="..\src\tf\tf0100a.uml">
<Filter>Ini\Masks</Filter>
<Filter>Masks</Filter>
</MskCompiler>
<MskCompiler Include="..\src\tf\tf0200a.uml">
<Filter>Ini\Masks</Filter>
<Filter>Masks</Filter>
</MskCompiler>
<MskCompiler Include="..\src\tf\tf0500a.uml">
<Filter>Ini\Masks</Filter>
<Filter>Masks</Filter>
</MskCompiler>
<MskCompiler Include="..\src\tf\tf0400a.uml">
<Filter>Ini\Masks</Filter>
<Filter>Masks</Filter>
</MskCompiler>
<MskCompiler Include="..\src\tf\tf0300a.uml">
<Filter>Ini\Masks</Filter>
<Filter>Masks</Filter>
</MskCompiler>
</ItemGroup>
<ItemGroup>

3
src/tf/tf0100a.h
View File

@ -19,9 +19,10 @@
#define B_TIPO_BOLLADOG 413
#define B_TIPO_STORDOC 414
#define END_BOOLEAN 415
#define F_ESTEROMETRO 416
#define END_MASK 421
#define F_RIGHE 301 // Sheet righe tf

6
src/tf/tf0100a.uml
View File

@ -165,6 +165,12 @@ BEGIN
FLAGS ""
END
BOOLEAN B_ESTEROMETRO
BEGIN
PROMPT 1 10 "Esporta solo fatture attive non inviate con FP"
FLAGS ""
END
ENDPAGE
PAGE "Trasferimento Fatture" 0 2 0 0

23
src/tf/tfutility.cpp
View File

@ -4,6 +4,8 @@
#include "../cg/cglib03.h"
#include "../fe/felib.h"
#include "tfutility.h"
#include "../fp/fplib.h"
#include "tf0100b.h"
// Ritorna il record da trasfatt
@ -102,6 +104,27 @@ bool checkRecord(TISAM_recordset* rec)
TCausale caus(rec->get("23.CODCAUS").as_string(), rec->get("23.DATAREG").as_date().year());
if(caus.soloiva() && (caus.reverse_charge() || caus.regime_speciale() == 3))
return false;
// controllo se la fattura non è già stata spedita con la fatt. elettronica
static TPaf_record paf0100f("PAF0100F");
// controllo se il movimento è agganciato a un documento
if(!rec->get("23.DPROVV").is_empty() && !rec->get("23.DANNO").is_empty() && !rec->get("23.DCODNUM").is_empty() && !rec->get("23.DNDOC").is_empty())
{
TString hfatt, bfatt;
TRectype rdoc(LF_DOC);
rdoc.put(DOC_PROVV, rec->get("23.DPROVV").as_string());
rdoc.put(DOC_PROVV, rec->get("23.DANNO").as_string());
rdoc.put(DOC_PROVV, rec->get("23.DCODNUM").as_string());
rdoc.put(DOC_PROVV, rec->get("23.DNDOC").as_string());
// se riesco a generare la chiave, trovo il record e ha il flag di gestione in errore o un errore esterno, salto la fattura (solo se attivo flag in maschera)
if (msk().get_bool(F_ESTEROMETRO) && chiave_paf(rdoc, hfatt, bfatt) && paf0100f.search(nullptr, hfatt, bfatt) && (paf0100f.sq_get("P1_GESTIONE") == "E" || paf0100f.sq_get("P1_ERREST") == "*"))
{
return false;
}
}
} else if(anaCli.italiano() && anaCli.partita_IVA()[0] != '0' && anaCli.partita_IVA()[0] != '1' && anaCli.codice_fiscale()[0] > '8')
// Salto tutti i fornitori con cod cf che inizia per 8 o 9 e con p.iva non valida
{