Files correlati : tp0100.cpp, tp0100a.h, tp0100a.uml
Commento:
Aggiunto alla maschera di estrazione da PACK a CAMPO il flag "Indirizzi di spedizione".
Ora gli Indirizzi di spedizione vengono trasferiti solo in caso di flag attivo (precedentemente venivano trasferiti ogni volta che si faceva il trasferimento dei Clienti/Fornitori)
Files correlati : tp0101.cpp
Commento:
La stringa AgentCode non veniva trimmata ed a volte succedeva che mandasse in palla la query se il dato contenuto al suo interno conteneva spazi bianchi sporchi
Files correlati : tp0.exe
Commento :
Aggiunte query personalizzabili per cliente al trasferimento Pack.
Interno:
Bisogna definire nel paragrafo tp di ditta.ini o studio.ini una variabile
tra le seguenti :
query personalizzabili
archivio variabile standard
CLIENTI/AGENTI Qtp0100Clienti "SELECT Customers_Suppliers.*, Unit_Measure.UMDesc FROM Customers_Suppliers LEFT JOIN Unit_Measure
ON (CurrencyCode = Unit_Measure.UMCode AND Unit_Measure.UMType='9') "
WHERE (StatusFlag=1 OR StatusFlag=2 OR StatusFlag=3) AND " dietro viene messa una condizione per clienti o agenti
ARTICOLI Qtp0100Articoli "SELECT Paper_Composition_Group.CompDesc FROM Mag_Existing_Article, Articles_Composition, Paper_Composition_Group
WHERE (Mag_Existing_Article.ArtCode='" << key << "') AND (Mag_Existing_Article.ArticleCode=Articles_composition.ArticleCode) AND (Mag_Existing_Article.VariantCode=Articles_composition.VariantCode) AND
(Articles_Composition.CompCode=Paper_Composition_Group.CompCode);"
INFORMAZIONI AGGIUNTIVE ARTICOLI Qtp0100Extra_info_articoli "SELECT Mag_Existing_Article.ArticleCustCode, Mag_Existing_Article.ArticleCode
FROM Mag_Existing_Article WHERE Mag_Existing_Article.ArtCode='" << key << "';"
CONAI Qtp0100Conai "SELECT SubclassCode,Weight FROM Articles_environmentTax WHERE Articles_environmentTax.ArticleCode=" dietro viene messo il codice articolo
IVA Qtp0100IVA "SELECT * FROM IVA WHERE IVACode=#CODIVA;"
Composizione imballi Qtp0100OrderPaperComp "SELECT Paper_Composition_Group.CompDesc FROM CDoc_Rows, Paper_Composition_Group
WHERE (CDoc_Rows.DocNumber=#NDOC) AND (CDoc_Rows.RowNumber=#NROW) AND (CDoc_Rows.CompCode=Paper_Composition_Group.CompCode);"; #NROW deve essere lasciato così
BOLLE Qtp010Bolle "SELECT DISTINCT PDdT_Header.DocCode, PDdT_Header.StoreDocType, PDdT_Header.DocRefNumber,PDdT_Header.DocDate, Store_Year.SyReferenceYear, PDdT_Header.CustSuppCode,
Customers_Suppliers.FlagCustSupp, Customers_Suppliers.CodContab, Customers_Suppliers.CategoryCode, Customers_Suppliers.ZoneCode,Customers_Suppliers_1.CodContab AS AgentCode,
PDdT_Header.Change, CAMPOCurrencies.UMDesc AS Currency,PDdT_Header.PaymentCode, PDdT_Header.ApplyEnvTax, PDdT_Header.DiscountOnPayment,
CausaliTrasporto.Code AS CodTrasporto, Porto.Code AS CodResa, CausaliTrasporto.Description1 AS TipoTrasporto,Porto.Description1 AS TipoResa, PDdT_Header.Appearance, PDdT_Header.GrossWeight, PDdT_Header.NetWeight,
PDdT_Header.ShiverNumber, (select case when PDdT_Header.BankDesc is null Or [PDdT_Header].[BankDesc]<>''then PDdT_Header.BankDesc else customers_suppliers.bankname end) AS BankDesc, PDdT_Header.CodIvaNI,
Customers_Suppliers_2.CustSuppCode AS DestCode, Customers_Suppliers_2.FlagCustSupp AS FlagDestCode, Customers_Suppliers_2.CodContab AS DestCodContab,Customers_Suppliers_2.TradeName1, Customers_Suppliers_2.Address, Customers_Suppliers_2.Locality,
Customers_Suppliers_2.ZipCode, Customers_Suppliers_2.Region, PDdT_Row.DocRow, PDdT_Row.ArtCode,PDdT_Row.ArtDesc, PDdT_Row.CDocNumber, PDdT_Row.CDocRow,CDoc_Rows.CustReference AS RowCustReference, CDoc_Header.CustReference, PDdT_Row.Provv,
PDdT_Row.DiscountRowDesc, CDoc_Header.DocDate AS OrderDate,PDdT_Row.Quantity, Unit_Measure.UMDesc, PDdT_Row.Quantity1, Unit_Measure_1.UMDesc AS UMDesc1,PDdT_Row.Quantity2, Unit_Measure_2.UMDesc AS UMDesc2, PDdT_Row.AdvanceSale, PDdT_Row.Price,
PDdT_Row.DefPrice, PDdT_Row.PriceNet, PDdT_Row.PriceNetDef, PDdT_Row.AmountNet, PDdT_Row.AmountNetDef,PDdT_Row.Amount, PDdT_Row.AmountDef, PDdT_Row.FlagUMPrice, IVA.IVACode, PDdT_Row.AccountCode, "
PDdT_Row.AccountSubCode, PDdT_Row.WeightETUnit, PDdT_Row.ClassCode, PDdT_Row.SubclassCode,PDdT_Row.DDTRowType, PDdT_Header.StatusFlag, PDdT_Row.Report, PDdT_Row.FamilyCode,
Mag_Existing_Article.ArtType, Mag_Existing_Article.Height, Mag_Existing_Article.Width, Mag_Existing_Article.Lenght,(select case when [Modalità Fornitura Bancali].[Value1] is null then 1 else [Modalità Fornitura Bancali].[Value1] end) AS FornituraBancali,
PDdT_Header.InvoicingType, PDdT_Header.DocProvv, PDdT_Header.ReceiptBook
FROM ((((((PDdT_Header LEFT JOIN Customers_Suppliers ON PDdT_Header.CustSuppCode = Customers_Suppliers.CustSuppCode)
LEFT JOIN Unit_Measure AS CAMPOCurrencies ON (CAMPOCurrencies.UMcode=PDdT_Header.CurrencyCode AND CAMPOCurrencies.UMType='9')
LEFT JOIN Customers_Suppliers AS Customers_Suppliers_1 ON PDdT_Header.AgentCode = Customers_Suppliers_1.CustSuppCode)
LEFT JOIN Porto ON PDdT_Header.PortCode = Porto.Code) "
LEFT JOIN Store_Year ON PDdT_Header.DocYear = Store_Year.SyCode) "
LEFT JOIN Customers_Suppliers AS Customers_Suppliers_2 ON PDdT_Header.DestCode = Customers_Suppliers_2.CustSuppCode) "
LEFT JOIN CausaliTrasporto ON PDdT_Header.DocCausalCode = CausaliTrasporto.Code)
RIGHT JOIN (Mag_Existing_Article RIGHT JOIN ((CDoc_Header RIGHT JOIN (((IVA RIGHT JOIN (((CDoc_Rows RIGHT JOIN PDdT_Row ON (CDoc_Rows.DocNumber = PDdT_Row.CDocNumber)AND (CDoc_Rows.RowNumber = PDdT_Row.CDocRow))
LEFT JOIN Unit_Measure ON PDdT_Row.UMQty = Unit_Measure.UMCode)
LEFT JOIN [Modalità Fornitura Bancali] ON PDdT_Row.DeliveryPalletType = [Modalità Fornitura Bancali].Code)ON IVA.IVACode = PDdT_Row.IVACode) LEFT JOIN Unit_Measure AS Unit_Measure_1 ON PDdT_Row.UMQta1 = Unit_Measure_1.UMCode)
LEFT JOIN Unit_Measure AS Unit_Measure_2 ON PDdT_Row.UMQta2 = Unit_Measure_2.UMCode)ON CDoc_Header.DocNumber = CDoc_Rows.DocNumber)
LEFT JOIN CDoc_Rows_Detail ON (CDoc_Rows.RowNumber = CDoc_Rows_Detail.RowNumber) AND (CDoc_Rows.DocNumber = CDoc_Rows_Detail.DocNumber))ON Mag_Existing_Article.ArtCode = PDdT_Row.ArtCode) ON PDdT_Header.DocCode = PDdT_Row.DocCode
WHERE (((PDdT_Row.DDTRowType)='0' Or (PDdT_Row.DDTRowType)='2') AND ((PDdT_Header.StatusFlag)='1' OR (PDdT_Header.StatusFlag)='2' Or (PDdT_Header.StatusFlag)='3') AND ((select case when [Modalità Fornitura Bancali].[Value1] is null then 1 else [Modalità Fornitura Bancali].[Value1] end)=1) AND ((PDdT_Header.InvoicingType) Is Not Null) AND ((PDdT_Header.DocProvv)<>-1))
ORDER BY PDdT_Header.DocRefNumber, PDdT_Row.DocRow;"
Files correlati : tp0900ac.rep tp0900al.rep tp0900ca.rep tp0900le.rep tp0900pl.rep tp0900ve.rep
Commento :
Corretta la stampa dei totali nella dichiarazione conai
Files correlati : tp0.exe
Commento :
Modificata la gestione degli addebiti a accrediti di solo CONAI per la dichiarazione.
Bisogna utilizzare righe di spesa a quantità e prezzo con codice corrispondente al codice spesa CONAI corrispondente emettere il codice della sottocategoria nel primo camp CONAI. Il peso unitario non serve e NON viene utilizzato.
Files correlati : tp0.exe
Commento :
Modificata la gestione degli addebiti a accrediti di solo CONAI per la dichiarazione.
Bisogna utilizzare righe di spesa a quantità e przzo con codice crispondente al codice spesa CONAI cirrispondente emettere il codice della sottocategoria nel primo camp CONAI. Il peso unitario non serve e NON viene utilizzato.
Files correlati : tp0.exe.exe tp0900ac.rep tp0900al.rep tp0900ca.rep tp0900le.rep tp0900pl.rep tp0900ve.rep vetbscc.msk
Commento :
- Corretto controllo nel caso di esenzione e esposizione esenti.
- Modificato il report del modulo 6.1 per le descrizioni
- Aggiunto campo descrizione per dichiarazione nella tabella sotoocategorie CONAI
Files correlati : lv2.exe
Commento to :
aggiornati i dati di testat dei clienti nelle varie bolle di consegne ritiro pui
ito buoni etc
IN fatturazione se indicato in configurazione
Files correlati :
Commento : tp0.exe
Sistemato calcolo peso per categorie conai inserite in bolla per DANIA Bisogna definire una variabile ConaiScheme = 1 nel paragrfo tp del file ditta.ini
