po report
Mon Feb 19 2024 10:44:11 GMT+0000 (Coordinated Universal Time)
Saved by @MinaTimo
[ SRSReportParameterAttribute(classStr(NW_PurchaseConfirmContract)) ] class NW_PurchaseConfirmDP extends SRSReportDataProviderBase { NW_PurchaseConfirmTmp _NW_PurchaseConfirmTmp; [SRSReportDataSetAttribute("NW_PurchaseConfirmTmp")] public NW_PurchaseConfirmTmp getNW_PurchaseConfirmTmp() { select * from _NW_PurchaseConfirmTmp; return _NW_PurchaseConfirmTmp; } public void processReport() { PurchId PurId; PurchaseOrderId JournID; VendPurchOrderJour NW_VendPurchOrderJour ,_VendPurchOrderJour ; PurchLineAllVersions NW_PurchLineAllVersions,_NW_PurchLineAllVersions; TmpTaxWorkTrans tmpTax; PurchTable purchTable; PurchTotals purchTotals; taxJournalTrans taxJournalTrans; InventLocation InventLocation; PurchLine PurchLine; WordToNumAR _WordToNumAR; _WordToNumAR = new WordToNumAR(); NW_PurchaseConfirmContract datacontract = this.parmDataContract(); PurId = datacontract.parmPurchId(); JournID = datacontract.parmPurchaseOrderId(); select purchTable where purchTable.PurchId == PurId outer join InventLocation where purchTable.InventLocationId == InventLocation.InventLocationId outer join firstonly PurchLine where PurchLine.PurchId == purchTable.PurchId; select NW_VendPurchOrderJour where NW_VendPurchOrderJour.PurchId == PurId && NW_VendPurchOrderJour.PurchOrderDocNum == JournID; _NW_PurchaseConfirmTmp.clear(); _NW_PurchaseConfirmTmp.NW_OrderedByName = HcmWorker::find(NW_VendPurchOrderJour.purchTable().Requester).name(); _NW_PurchaseConfirmTmp.NW_CompanyLogo = FormLetter::companyLogo(); _NW_PurchaseConfirmTmp.Warehouse = InventLocation.Name; _NW_PurchaseConfirmTmp.PurchReqId = PurchLine.PurchReqId; _NW_PurchaseConfirmTmp.NW_VendorName = VendTable::find(NW_VendPurchOrderJour.OrderAccount).name() + NW_VendPurchOrderJour.OrderAccount; _NW_PurchaseConfirmTmp.NW_VendorAddress = DirParty::primaryPostalAddress(VendTable::find(NW_VendPurchOrderJour.OrderAccount).Party).Address; _NW_PurchaseConfirmTmp.NW_VendorTele = VendTable::find(NW_VendPurchOrderJour.OrderAccount).telefax(); _NW_PurchaseConfirmTmp.NW_VendorTele = VendTable::find(NW_VendPurchOrderJour.OrderAccount).phone(); _NW_PurchaseConfirmTmp.NW_Po = NW_VendPurchOrderJour.PurchId; _NW_PurchaseConfirmTmp.NW_PoDate = NW_VendPurchOrderJour.PurchOrderDate; _NW_PurchaseConfirmTmp.NW_DeliveryAddress = LogisticsLocation::find(purchTable.deliveryLocation()).Description;// PurchTable::find(NW_VendPurchOrderJour.PurchId).deliveryAddressing(); _NW_PurchaseConfirmTmp.NW_DeliveryDate = PurchTable::find(NW_VendPurchOrderJour.PurchId).DeliveryDate; _NW_PurchaseConfirmTmp.NW_Currency = NW_VendPurchOrderJour.purchTable().CurrencyCode; _NW_PurchaseConfirmTmp.NW_Amount = NW_VendPurchOrderJour.Amount; if(NW_VendPurchOrderJour.purchTable().CurrencyCode =="SAR") { _WordToNumAR.bigCurrency(" ريـال سعودي"); _WordToNumAR.smallCurrency(" هلله"); } if(NW_VendPurchOrderJour.Amount<0) { _NW_PurchaseConfirmTmp.NW_AmountArabic = _WordToNumAR.WordToNumAR(num2str((NW_VendPurchOrderJour.Amount*-1),0,2,1,0)) + " فقط لاغير "; _NW_PurchaseConfirmTmp.NW_AmountEng= numeralsToTxt_EN(NW_VendPurchOrderJour.Amount*-1); _NW_PurchaseConfirmTmp.NW_VatAmountArabic = _WordToNumAR.WordToNumAR(num2str(( NW_VendPurchOrderJour.SumTax*-1),0,2,1,0)) + " فقط لاغير "; _NW_PurchaseConfirmTmp.NW_VatAmountEng = numeralsToTxt_EN(NW_VendPurchOrderJour.SumTax*-1); } else { _NW_PurchaseConfirmTmp.NW_AmountArabic = _WordToNumAR.WordToNumAR(num2str((NW_VendPurchOrderJour.Amount),0,2,1,0)) + " فقط لاغير "; _NW_PurchaseConfirmTmp.NW_AmountEng= numeralsToTxt_EN(NW_VendPurchOrderJour.Amount); _NW_PurchaseConfirmTmp.NW_VatAmountArabic = _WordToNumAR.WordToNumAR(num2str(( NW_VendPurchOrderJour.SumTax),0,2,1,0)) + " فقط لاغير "; _NW_PurchaseConfirmTmp.NW_VatAmountEng = numeralsToTxt_EN(NW_VendPurchOrderJour.SumTax); } _NW_PurchaseConfirmTmp.NW_DeliveryTerms = DlvTerm::find(NW_VendPurchOrderJour.purchTable().DlvTerm).Txt; _NW_PurchaseConfirmTmp.NW_PaymentTerms = PaymTerm::find(NW_VendPurchOrderJour.purchTable().Payment).Description; while select NW_PurchLineAllVersions where NW_PurchLineAllVersions.PurchTableVersionRecId == NW_VendPurchOrderJour.PurchTableVersion { _NW_PurchaseConfirmTmp.NW_ItemName = NW_PurchLineAllVersions.Name; _NW_PurchaseConfirmTmp.NW_ItemId = NW_PurchLineAllVersions.ItemId; _NW_PurchaseConfirmTmp.NW_Qty = NW_PurchLineAllVersions.PurchQty; _NW_PurchaseConfirmTmp.NW_Price = NW_PurchLineAllVersions.PurchPrice; _NW_PurchaseConfirmTmp.NW_Unit = NW_PurchLineAllVersions.PurchUnit; /* purchTable = PurchTable::find(NW_PurchLineAllVersions.PurchId); purchTotals = purchTotals::newPurchTable(purchTable); purchTotals.calc(); tmpTax.setTmpData(purchTotals.tax().tmpTaxWorkTrans()); _NW_PurchaseConfirmTmp.NW_VatRatio = tmpTax.TaxCode; _NW_PurchaseConfirmTmp.NW_LineAmountIncVat = (NW_PurchLineAllVersions.LineAmount + tmpTax.TaxAmount)- NW_PurchLineAllVersions.LineDisc;;*/ select sum(SourceRegulateAmountCur) from taxJournalTrans where taxJournalTrans.TransRecId == NW_PurchLineAllVersions.RECID && taxJournalTrans.TransTableId == tableNum(PurchLineAllVersions); _NW_PurchaseConfirmTmp.NW_VatAmount = taxJournalTrans.SourceRegulateAmountCur; _NW_PurchaseConfirmTmp.NW_LineAmountIncVat = _NW_PurchaseConfirmTmp.NW_VatAmount + NW_PurchLineAllVersions.LineAmount; _NW_PurchaseConfirmTmp.insert(); } } }
Comments