swap
Tue Jan 23 2024 11:14:10 GMT+0000 (Coordinated Universal Time)
Saved by @MinaTimo
https://filetransfer.io/data-package/7DTAA9aK#link https://filetransfer.io/data-package/No4U22go#link https://filetransfer.io/data-package/flYoUGD7#link https://community.dynamics.com/forums/thread/details/?threadid=58f9c824-d2d0-4f21-b47b-28550390329c https://www.dynamicsuser.net/t/how-to-create-purchase-agreement-via-job/60843/2 https://filetransfer.io/data-package/syh2BNQi#link "AccountNumber": "PNJ01", "D_VALN_AS_OF": "2022-06-30 00:00:00.0", "T_DTL_DESC": "EWTP ARABIA TECHONLOGY INNOVATION FUND ILP", "N-INV-SUB-CATG": "Partnerships", "Asset Super Category Name": "Venture Capital and Partnerships", "A_ADJ_BAS_BSE": "47947573", "A_UNRL_MKT_GNLS": "50275681", "ProprietarySymbol": "993FD3998", 86e7ad1e-c84f-438a-a309-cd1216565dab "Success": "True", "Error": "", "results": [ { "ID": 88, "LASTNAME": "Duhaish ", "FIRSTNAME": "Hamad ", "MIDNAME": " ", "SSNO": "27079 ", "DAYNAME": "Sunday ", "DAYNUM": 23, "MONTHNAME": "June ", "MONTHNUM": 6, "QUARTER": 2, "YEAR": 2024, "DATE": "2024-06-23", "ATTENDANCESTATUS": 1, "TIMEIN": "09:02:32", "DATETIMEIN": "2024-06-23 09:02:32.0", "TIMEOUT": "16:48:18", "DATETIMEOUT": "2024-06-23 16:48:18.0", "NUMBEROFTIMEIN": 2, "NUMBEROFTIMEOUT": 1, "WEEKEND": 0, "EARLYACCESSIN": 0, "EARLYACCESSINHOURS": 0.00, "LATEACCESSIN": 0, "LATEACCESSOUT": 0, "LATEACCESSOUTHOURS": 0.00, "EARLYACCESSOUT": 0, "TOTALHOURS": 7.77, "ACTUALTOTALWORKINGHOURS": 7.77, "RECID": null }, { "ID": 88, "LASTNAME": "Duhaish ", "FIRSTNAME": "Hamad https://filetransfer.io/data-package/QFOWGJiY#link [3:31 PM] Ahmed Saadeldin IBAN = SA0380000000608010167519 [3:31 PM] Ahmed Saadeldin Account Num = 000000608010167519 [3:31 PM] Ahmed Saadeldin SABBSARI https://filetransfer.io/data-package/e6Y8IQRT#link https://filetransfer.io/data-package/n9iLVidY#link https://filetransfer.io/data-package/yzmQNeGK#link https://filetransfer.io/data-package/NuQIKmYd#link https://usnconeboxax1aos.cloud.onebox.dynamics.com/api/services/NW_AttachementServiceGroup/NW_AttatchementService/getAttachment ?cmp=shc&mi=sysclassrunner&cls=NW_UpdateVendTrans public void processReport() { NW_GeneralContract contract; PurchTable PurchTable; PurchLine PurchLine; //LOGISTICSELECTRONICADDRESS LOGISTICSELECTRONICADDRESS; VendTable VendTable; DirPartyTable DirPartyTable; PurchTotals PurchTotals; HcmWorker HcmWorker; //DLVMODE DLVMODE; //PURCHREQTABLE PURCHREQTABLE; //DlvTerm DlvTerm; //VENDPAYMMODETABLE VENDPAYMMODETABLE; //PAYMTERM PAYMTERM; //PURCHRFQCASETABLE PURCHRFQCASETABLE; //PURCHREQLINE PURCHREQLINE,PURCHREQLINESelected; //LOGISTICSPOSTALADDRESS LOGISTICSPOSTALADDRESS; //VendPurchOrderJour VendPurchOrderJour; //LOGISTICSLOCATION LOGISTICSLOCATION; //DIRPARTYLOCATION DIRPARTYLOCATION; //TaxOnItem TaxOnItem; //TAXDATA TAXDATA; contract = this.parmDataContract() as NW_GeneralContract; select PurchTable where PurchTable.RecId == contract.parmRecordId(); while select PurchLine where PurchLine.PurchId == PurchTable.PurchId { PurchTableTmp.clear(); PurchTableTmp.PurchId = PurchTable.PurchId; PurchTableTmp.DeliveryDate = PurchTable.DeliveryDate; PurchTableTmp.PurchName = PurchTable.PurchName; PurchTableTmp.Payment = PurchTable.Payment; PurchTableTmp.AdditionalNotes = PurchTable.AdditionalNotes; PurchTableTmp.PURCHQTY = PurchLine.PURCHQTY; PurchTableTmp.PURCHPRICE = PurchLine.PURCHPRICE; PurchTableTmp.LINEPERCENT = PurchLine.LINEPERCENT; PurchTableTmp.PurchUnit = PurchLine.PurchUnit; PurchTableTmp.LineAmount = PurchLine.LineAmount; PurchTableTmp.NameDescription = PurchLine.itemName(); HcmWorker = HcmWorker::find(PurchTable.Requester); PurchTableTmp.Requester = HcmWorker.name(); PurchTableTmp.RequesterAdd = HcmWorker.primaryAddress(); PurchTableTmp.RequesterPhone = HcmWorker.phone(); PurchTableTmp.RequesterDep = PurchTable.DepartmentName(); VendTable = VendTable::find(PurchTable.OrderAccount); PurchTableTmp.Phone = VendTable.phone(); PurchTableTmp.Email = VendTable.email(); PurchTableTmp.VendName = PurchTable.PurchName; PurchTableTmp.Fax = PurchTable.NonPrimaryVendPhone(); PurchTableTmp.Termnote = PurchTable.ContcatPersonName(); PurchTableTmp.Warranty = PurchTable.Warranty; PurchTotals = PurchTotals::newPurchTable(PurchTable); PurchTotals.calc(); PurchTableTmp.SubTotal = PurchTotals.purchBalance(); // sub PurchTableTmp.Total = PurchTotals.purchTotalAmount(); // total PurchTableTmp.Currency = PurchTotals.purchCurrency(); PurchTableTmp.VAT = PurchTotals.taxTotal(); PurchTableTmp.TotalTxt = numeralsToTxt(PurchTableTmp.Total); PurchTableTmp.SubTotalTxt = numeralsToTxt(PurchTableTmp.SubTotal); PurchTableTmp.TaxCode = any2Str((PurchTableTmp.VAT / PurchTableTmp.SubTotal)*100); //select PURCHREQTABLE where PURCHREQTABLE.PURCHREQID==PURCHLINE.PURCHREQID; //Select DLVMODE where DLVMODE.CODE==PURCHREQTABLE.DLVMODE; //Select DlvTerm where DlvTerm.Code == PurchTable.DlvTerm; //Select VENDPAYMMODETABLE where VENDPAYMMODETABLE.PAYMMODE==PURCHREQTABLE.PAYMMODE; //Select PAYMTERM where PAYMTERM.PAYMTERMID==PURCHREQTABLE.PAYMENT; PurchTableTmp.DlvModeTxt = DlvMode::find(PurchTable.DlvMode).Txt; PurchTableTmp.DlvTermTxt = DlvTerm::find(PurchTable.DlvTerm).Txt; //PurchTableTmp.PayModeName=VENDPAYMMODETABLE.NAME; PurchTableTmp.PAYTERMNAME = PaymTerm::find(PurchTable.Payment).DESCRIPTION; //PurchTableTmp.Termnote=PURCHREQTABLE.termsnote; PurchTableTmp.Address = CompanyInfo::find().postalAddress().Address; //select PURCHREQLINE where PURCHREQLINE.PURCHREQTABLE == PURCHREQTABLE.RECID; //select PURCHRFQCASETABLE where PURCHRFQCASETABLE.RFQCASEID == PURCHREQLINE.PURCHRFQCASEID; //PurchTableTmp.RFQCASEID=PURCHRFQCASETABLE.RFQCASEID; //select PURCHREQLINESelected where PURCHREQLINESelected.LINEREFID==PURCHLINE.PURCHREQLINEREFID; //PurchTableTmp.Name=PURCHREQLINESelected.ITEMIDNONCATALOG; //PurchTableTmp.NameDescription=PURCHREQLINESelected.ITEMIDNONCATALOG + ' - ' + PURCHREQLINESelected.NAME; //PurchTableTmp.Currency=PURCHREQLINESelected.CurrencyCode; //Select firstonly VendPurchOrderJour where VendPurchOrderJour.purchid==PURCHTABLE.purchid; //PurchTableTmp.DateConf=VendPurchOrderJour.PurchOrderDate; //Select LOGISTICSPOSTALADDRESS where PURCHTABLE.DELIVERYPOSTALADDRESS==LOGISTICSPOSTALADDRESS.RECID; //PurchTableTmp.ShipingAddress=LOGISTICSPOSTALADDRESS.ADDRESS; //select DIRPARTYTABLE where VENDTABLE::find(PurchTable.OrderAccount).PARTY==DIRPARTYTABLE.RECID; //select DIRPARTYLOCATION where DIRPARTYTABLE.RECID == DIRPARTYLOCATION.PARTY; //select LOGISTICSLOCATION where DIRPARTYLOCATION.LOCATION == LOGISTICSLOCATION.RECID; //select LOGISTICSPOSTALADDRESS where LOGISTICSPOSTALADDRESS.Location==LOGISTICSLOCATION.RECID; //PurchTableTmp.VendAdress=LOGISTICSPOSTALADDRESS.Address; //select TaxOnItem where TaxOnItem.TAXITEMGROUP==PURCHLINE.TaxItemGroup; //select TAXDATA where TAXDATA.TAXCODE==TAXONITEM.TAXCODE // && TAXDATA.TAXFROMDATE<=PURCHTABLE.ACCOUNTINGDATE && TAXDATA.TAXTODATE>=PURCHTABLE.ACCOUNTINGDATE; PurchTableTmp.insert(); } }
Comments