24 Commits

Author SHA1 Message Date
426e95377f Patch level : 12.0 1080
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;"
2021-09-23 16:14:48 +02:00
30e1e22190 Patch level : 12.0 nopatch
Files correlati     :

Commento        :
sistemata add_between_filter. Aggiunte add_between_num_filter add_between_date_filter
2021-05-22 21:50:20 +02:00
c1637d9147 Patch level : 12.0 nopatch
Files correlati     :

Commento        :
Aggiunta get_custom_query ai recordset per modifiche Straccia
Aggiunta in_module a dongle per modifiche Straccia
2021-05-17 21:20:57 +02:00
Macchina_Compilatrice
9770d9ee6b Revert "Patch level : 12.0 nopatch"
This reverts commit 1ad8ac1a4a80635dc83461232aed59a76f5172c8.
2021-04-13 22:16:04 +02:00
1ad8ac1a4a Patch level : 12.0 nopatch
Files correlati     :

definizioni eliminate
2021-04-13 22:06:58 +02:00
70013337fa Revert "Patch level : 12.0 no-patch"
This reverts commit 65ceeee069e4dddc1dbffe396092f35bde98c8d9.
2020-12-10 21:12:16 +01:00
65ceeee069 Patch level : 12.0 no-patch
Files correlati     :
Commento            :

Rimossa la cartella exe
2020-12-10 18:04:42 +01:00
f911ddbd7c Patch level : 12.0 no-patch
Files correlati     :
Commento            :

Aggiunte
 sistemate funzioni freze, unfreeze, frozen, not_frozen nei recordset
2020-08-31 18:56:22 +02:00
ba2c68bba4 Patch level : 12.0 no-patch
Files correlati     :
Commento            :

Aggiunte

 get_string(const char* field)
get_string_zerofilled
get_int
get_long
get_bool
get_real
get_date(const char* field)

ai recordset

zerofill alle stringhe
2020-08-27 13:02:32 +02:00
683725fd11 Patch level : 12.0 no-patch
Files correlati     :
Commento            :

Inserite SAFE_DELETE
2020-07-26 09:54:00 +02:00
Mattia Tollari
751102232e Patch level : 12.0 no-patch
Files correlati     : include
Commento            : Tolta funzione get_tmp_var() da TRecordset e messa in TVariant, inoltre aggiornata l'implementazione come quella di get_tmp_string (creato array da 1024 celle, messo un controllo diverso per tornare alla prima posizione)
2019-06-12 17:26:14 +02:00
Mattia Tollari
3260e84ab5 Patch level : 12.0 no-patch
Files correlati     : include
Commento            : Aggiunta funzione TISAM_recordset::add_between_filter() che passato nome campo, from_val e to_val restituisce between, >= o <= in CampoSQL
2019-03-12 12:59:03 +01:00
Sirio Builder
85f6b2a5cc Patch level : 12.0 690
Files correlati     : mr
Commento            :
- Sistemata esportazione tabella p01b per Compass
- Revert modifiche a recordset, creavano problemi, si perdevano records
- Aggiunto boolean _disable_variables che disabilita le variabili in recordset
2019-01-31 12:23:41 +01:00
Mattia Tollari
d23c88824e Patch level : 12.0 no-patch
Files correlati     : sy
Commento            : Tolti i dati all'interno dei valori nelle query di TODBC_recordset in modo tale da non chiedere la variabile se un valore all'interno rispetta la sintassi di campo
2019-01-15 10:10:28 +01:00
bonazzi
ba1d2edb95 Patch level : 12.0 556
Files correlati     : ba8.exe

Costruttore variant nullo errato, non trovava piu i campi della query principale dalla sottosezione.

git-svn-id: svn://10.65.10.50/branches/R_10_00@24450 c028cbd2-c16b-5b4b-a496-9718f37d4682
2018-04-02 10:09:41 +00:00
bonazzi
e5101cb85c Patch level : 12.0 536
Files correlati     :   cg7.exe cg7800a.rep cg7600a.png cg7700a.png cg7800a.png


I recordset non arrivavano mai a settare EOF

git-svn-id: svn://10.65.10.50/branches/R_10_00@24383 c028cbd2-c16b-5b4b-a496-9718f37d4682
2018-02-19 01:00:42 +00:00
bonazzi
d0696d8126 Patch level : 12.0 426
Files correlati     : ve0.exe ve0300a.ini ve0100a.msk ve0200g.msk ve1300.alx ve1.exe ve17001.rep ve17002.rep ve1700a.msk ve1700a.msk ve2.exe ve6.exe ve61000a.msk ve17001.rep ve17002.rep ve17002.rep ve17001.rep ve1700a.msk ve6b00a.msk


MODIFICHE CRPA

Se si mette il flag P sulla data documento della maschera di un tipo documento viene proposta l’ultima data inserita.
Possibilità di impostare il numero di copie nell’inserimento/modifica di un documento.
Righe documento massime 10000
Aggiunta ricerca per riferimento cliente (ricerca alternativa).
Aggiunto indirizzo cliente/fornitore sulla ricerca documenti.
Lista documenti avanzata (report).
Aggiunte le regolarizzazioni nella contabilizzazione documenti
Sistema abilitazione della data registrazione in contabilizzazione documenti
Aggiunta la possibilità di usare campi del documento nella dicitura del riferimento.
Gestiti i movimenti di sola iva in contabilizzazione.
Riferimento per mese nelle partite.
Ordinamento per documento nell’evasione ordini con un flag in configurazione
Impostato il tipo CF in base al tipo documento
Aggiunto il messaggio cliente alla stampa report delle vendite



git-svn-id: svn://10.65.10.50/branches/R_10_00@24025 c028cbd2-c16b-5b4b-a496-9718f37d4682
2017-07-29 14:18:40 +00:00
mtollari
55cbe98cd1 Patch level : 12.0 no-patch
Files correlati     : 
Commento            : 
- Aggiunto custom_box, permette di creare messaggi con al massimo 3 bottoni customizzati
- Modificato costruttore TDate(int,int,int) adesso passando come giorno 31 mette in automatico l'ultimo del mese
- Aggiunto commento esplicativo alle variabili della funzione FOR_EACH_SHEET_ROW in msksheet.h
- recset & variant: corretto problema che poteva dare crash



git-svn-id: svn://10.65.10.50/branches/R_10_00@23876 c028cbd2-c16b-5b4b-a496-9718f37d4682
2017-06-23 13:36:06 +00:00
bonazzi
efeee74b79 rimosso commit errato
git-svn-id: svn://10.65.10.50/branches/R_10_00@23752 c028cbd2-c16b-5b4b-a496-9718f37d4682
2017-04-21 01:33:36 +00:00
bonazzi
ae3ad3cfc2 git-svn-id: svn://10.65.10.50/branches/R_10_00@23751 c028cbd2-c16b-5b4b-a496-9718f37d4682 2017-04-21 01:30:58 +00:00
mtollari
3fecc57026 Patch level : 12.0 no-patch
Files correlati     : 
Commento            : Corretto controllo spostamento in TISAM_recordset: adesso prima di muoversi controlla che la posizione attuale non superi gli elementi totali dell'array.

git-svn-id: svn://10.65.10.50/branches/R_10_00@23694 c028cbd2-c16b-5b4b-a496-9718f37d4682
2017-03-17 13:39:20 +00:00
bonazzi
02ea84247d Patch level : 12.0 nopatch
Files correlati     : 

Corretto test nella requery

git-svn-id: svn://10.65.10.50/branches/R_10_00@23490 c028cbd2-c16b-5b4b-a496-9718f37d4682
2017-01-04 16:31:47 +00:00
bonazzi
b6fe9f2419 Patch level : 12.0 no patch
Files correlati     : 
Commento            :

Aggiunta macro SAFE_DELETE

git-svn-id: svn://10.65.10.50/branches/R_10_00@23340 c028cbd2-c16b-5b4b-a496-9718f37d4682
2016-09-27 14:39:28 +00:00
mtollari
1b14ec9415 Spostamento cartella sorgenti
git-svn-id: svn://10.65.10.50/branches/R_10_00@23236 c028cbd2-c16b-5b4b-a496-9718f37d4682
2016-09-09 13:59:02 +00:00