Accepted Solutions (1)
I have tested this code and this is working fine.
This code was written in a BeforeSave of a CustomBO.
It also contains the code for creating and releasing the Invoice after creating Request.
So, please find the syntax of creating invoice from a request(incase you missed this from studio)
I request you to use this function based on your use case.
You might see some errors after executing this code. You can ignore them. However, both InvoiceRequest and Invoice will be created successfully.
Whatever you do, I request you NOT to change the sequence of code.
Invoice Item needs either a product or a GL account assignment. So, I have given you both examples in this code by commenting one.
Also, please make a note that you can eliminate some coding by right customer account setup.
For eg., Currency and Pricing terms can be assigned in the Sales Data of the Customer Account and so, whenever this customer along with the sales unit is used in any Customer Invoice Request, those values are picked up automatically so that you don't have to maintain them in your coding.
May be your CRM leads can help you in this setup.
import
ABSL;
import
AP.CustomerInvoicing.Global;
// define CustomerInvoiceRequest root node
var
elCustomerInvoiceRequest_Root: elementsof CustomerInvoiceRequest;
var
instCustomerInvoiceRequest;
// define CustomerInvoiceRequest BusinessProcessVariantType node
var
elCustomerInvoiceRequest_BPVT: elementsof CustomerInvoiceRequest.BusinessProcessVariantType;
var
instCustomerInvoiceRequest_BPVT;
// define CustomerInvoiceRequest buyer party node
var
elCustomerInvoiceRequest_BuyerParty: elementsof CustomerInvoiceRequest.Party;
var
instCustomerInvoiceRequest_BuyerParty;
// define CustomerInvoiceRequest sales unit party node
var
elCustomerInvoiceRequest_SalesUnitParty: elementsof CustomerInvoiceRequest.Party;
var
instCustomerInvoiceRequest_SalesUnitParty;
// define CustomerInvoiceRequest item node
var
elCustomerInvoiceRequest_Item: elementsof CustomerInvoiceRequest.Item;
var
instCustomerInvoiceRequest_Item;
var
ItemProduct : elementsof CustomerInvoiceRequest.Item.ItemProduct;
// define CustomerInvoiceRequest item accounting coding block node
var
elCustomerInvoiceRequest_ItemACBD: elementsof CustomerInvoiceRequest.Item.ItemAccountingCodingBlockDistribution;
var
instCustomerInvoiceRequest_ItemACBD;
// define CustomerInvoiceRequest item price component
var
elCustomerInvoiceRequest_Item_MainPrice: elementsof CustomerInvoiceRequest.PriceAndTaxCalculation.Item.ItemPriceComponent;
var
instCustomerInvoiceRequest_Item_MainPrice;
// InvoiceDate setting to current date for this example.
var
InvoiceDate = Context.GetCurrentUserDate();
// CustomerInvoiceRequest: create new instance
// CustomerInvoiceRequest: maintain BPVT node
// BusinessProcessVariantTypeCode = 3 describes type 'Manual Invoice'
elCustomerInvoiceRequest_BPVT
.BusinessProcessVariantTypeCode = "3";
elCustomerInvoiceRequest_Root
.CustomerInvoiceProcessingTypeCode = "CI";
instCustomerInvoiceRequest
= CustomerInvoiceRequest.Create(elCustomerInvoiceRequest_Root);
// CustomerInvoiceRequest: create new BPVT instance
// Without the BPVT node no modifications can be made to the CustomerInvoiceRequest
instCustomerInvoiceRequest_BPVT
= instCustomerInvoiceRequest.BusinessProcessVariantType.Create(elCustomerInvoiceRequest_BPVT);
// Assign currencycode
if
(!instCustomerInvoiceRequest.PricingTerms.IsSet()){
var temp = instCustomerInvoiceRequest.PricingTerms.Create();
temp.CurrencyCode = "GBP";
}
else
{
instCustomerInvoiceRequest.PricingTerms.CurrencyCode = "GBP";
}
// CustomerInvoiceRequest: maintain customer invoice processing type - mandatory
instCustomerInvoiceRequest
.CustomerInvoiceProcessingTypeCode = "CI";
// CustomerInvoiceRequest: maintain description - optional
instCustomerInvoiceRequest
.Name = "CIR From ABSL";
// CustomerInvoiceRequest:: maintain buyer party - mandatory
elCustomerInvoiceRequest_BuyerParty
.PartyKey.PartyID.content = "CP100992";
// CustomerInvoiceRequest: create new party instance
instCustomerInvoiceRequest_BuyerParty
= instCustomerInvoiceRequest.BuyerParty.Create(elCustomerInvoiceRequest_BuyerParty);
// CustomerInvoiceRequest:: maintain sales unit party - mandatory
elCustomerInvoiceRequest_SalesUnitParty
.PartyKey.PartyID.content = "P1110";
// CustomerInvoiceRequest: create new party instance
instCustomerInvoiceRequest_SalesUnitParty
= instCustomerInvoiceRequest.SalesUnitParty.Create(elCustomerInvoiceRequest_SalesUnitParty);
// Assign Cash Discount Terms
if
(!instCustomerInvoiceRequest.CashDiscountTerms.IsSet()){
var PaymentTerms = instCustomerInvoiceRequest.CashDiscountTerms.Create();
PaymentTerms.Code.content = "001";
}
else
{
instCustomerInvoiceRequest.CashDiscountTerms.Code.content = "0001";
}
// CustomerInvoiceRequest: maintain item with product
// CustomerInvoiceRequest.Item: maintain description - mandatory
elCustomerInvoiceRequest_Item
.Description.content = "Test from ABSL";
// CustomerInvoiceRequest.Item: maintain quantity - mandatory
elCustomerInvoiceRequest_Item
.Quantity.content = 1;
elCustomerInvoiceRequest_Item
.Quantity.unitCode = "EA";
// CustomerInvoiceRequest: create item instance
instCustomerInvoiceRequest_Item
= instCustomerInvoiceRequest.Item.Create(elCustomerInvoiceRequest_Item);
if
(!instCustomerInvoiceRequest_Item.ItemProduct.IsSet()){
var instItemProduct = instCustomerInvoiceRequest_Item.ItemProduct.Create();
instItemProduct.ProductKey.ProductID.content = "P100202";
}
// CustomerInvoiceRequest.Item.ItemAccountingCodingBlockDistribution: maintain GL-account - mandatory
//elCustomerInvoiceRequest_ItemACBD.GeneralLedgerAccountAliasCode.content = "A-1500";
// CustomerInvoiceRequest.Item: create new ItemAccountingCodingBlockDistribution instance
//instCustomerInvoiceRequest_ItemACBD = instCustomerInvoiceRequest_Item.ItemAccountingCodingBlockDistribution.Create(elCustomerInvoiceRequest_ItemACBD);
// CustomerInvoiceRequest.Item.PATCItem: maintain tax code - mandatory (code 501 = Sales Tax - Standard Rate)
instCustomerInvoiceRequest_Item
.PriceAndTaxCalculationItem.TaxationCharacteristicsCode.content = "509";
// CustomerInvoiceRequest.Item.PriceAndTaxCalculationItem.ItemMainTotal: Maintain price
instCustomerInvoiceRequest_Item
.PriceAndTaxCalculationItem.ItemMainTotal.Rate.BaseDecimalValue = 150;
instCustomerInvoiceRequest_Item
.PriceAndTaxCalculationItem.ItemMainTotal.Rate.CurrencyCode = "GBP";
// To Create Invoice from this request and to release it.
// Use the parameters of this function based on your need. Setting second parameter to "true" releases the invoice.
// Incase you miss the syntax from ByD, here you go CreateCustomerInvoices(CustomerInvoiceDate,AutomaticReleaseIndicator,BBTDBasedSeperationReqdIndicator,PDBasedSeperationReqdIndicator,InvClearingRequestedIndicator)
instCustomerInvoiceRequest
.CreateCustomerInvoices(InvoiceDate,true,false,false,false);
Message was edited by: Srivatsava Janaswamy
Hi, Srivatsava Janaswamy, thanks for sharing this valuable information with me.
I already tried that code that you provide me, but I'm getting the following error:
Answers (5)
Hello everyone,
First, thank you very much for your example,Srivatsava, it's being very useful for me.
I am trying to make something similar with SupplierInvoice, but all my properties are locked.
Trying to following your example I have the same issue, so I think there must be related to another problem.
I'm working with a Solution-Template.
Thank you very much for your time!
Regards,
Óscar
Thank you for your answer, Arnulfo.
SupplierInvoice is writable according to PSM:
So maybe it's a issue about my ByD System...
Regards.
Hi Oscar, even when the BO is write access allowed, sometimes some of its nodes or elements don't, so you need to go deeper to know if you can write something.
Maybe an element/node that you're trying to write have no this write access, but again, if you need it, you can raise an element requesting for it.
Regards.
Hi Peter,
You can find a sample in SupplierInvoice Business Object, into ByD Studio Repository Explorer:
Please, note that your BO must be in the same Deployment Unit:
If you have further question I'll be glad to help you.
Best Regards,
Óscar
Here is the sample code:
// ABSL example for Supplier Invoice
import ABSL;
import AP.FO.Product.Global;
import AP.SupplierInvoicing.Global;
import AP.FO.Party.Global;
import AP.Common.GDT;
var SI_Root: elementsof SupplierInvoice;
var SI_SParty: elementsof SupplierInvoice.Party;
var SI_BParty: elementsof SupplierInvoice.Party;
var SI_Item: elementsof SupplierInvoice.Item;
var SI_DueDate: elementsof SupplierInvoice.CashDiscountTerms;
var qrySIV_Root_QueryByElements = SupplierInvoice.QueryByElements;
var selParamsSIV_Root_QueryByElement = SupplierInvoice.QueryByElements.CreateSelectionParams();
var BTDRef: elementsof SupplierInvoice.BusinessTransactionDocumentReference;
var SI;
var inst;
var inst1;
var SI_Item1;
var SI_Root1;
var RootTempID;
var RootTempUUID;
// Set document type to Invoice
SI_Root.TypeCode = "004";
// Set Invoice Date
SI_Root.Date = Context.GetCurrentSystemDate();
SI_Root.DocumentItemsGrossAmountIndicator = false;
SI_Root.ReceiptDate = Context.GetCurrentSystemDate();
// SI_Root.TaxAmount = this.TotalTaxAmount;
SI_Root.TransactionDate = Context.GetCurrentSystemDate();
// Root node creation
SI = SupplierInvoice.Create(SI_Root);
//Set TypeCode to "CustomerInvoice"
// Set External Document ID
BTDRef.BusinessTransactionDocumentReference.ID.content = "EXT12345";
SI.CustomerInvoiceReference.Create(BTDRef);
// Set Supplier ID
SI_SParty.PartyKey.PartyID.content = "MC4000";
SI.SellerParty.Create(SI_SParty);
// Set Bill-To Party
SI_BParty.PartyKey.PartyID.content = "MC10000";
//SI.BillToParty.Create(SI_BParty);
SI.BuyerParty.Create(SI_BParty);
// Set Due Date
SI_DueDate.FullPaymentEndDate = Context.GetCurrentSystemDate();
SI.CashDiscountTerms.Create(SI_DueDate);
// Set Product Quantity
SI_Item.Quantity.content = 3;
SI_Item.Quantity.unitCode = "EA";
// Set Net Price or Gross Price
SI_Item.NetUnitPrice.Amount.content = 60;
// Set Price Per Item
SI_Item.NetUnitPrice.BaseQuantity.content = 10;
// Line Item Creation
SI_Item1 = SI.Item.Create(SI_Item);
// Set Product ID
//SI_ItemProduct.ProductKey.ProductID.content = "MCA-0002";
SI_Item1.ItemProduct.ProductKey.ProductID.content = "MCA-0001";
// set Item Location
// SI_ItemLocation.LocationID.content = "MC10000";
SI_Item1.ShipToItemLocation.LocationID.content = "MC64000";
// Set Tax Code
SI_Item1.TaxCalculationItem.TaxationCharacteristicsCode.content = "2";
foreach(inst in SI_Item1.ItemAccountingCodingBlockDistribution.AccountingCodingBlockAssignment)
{
// Set Account Assignment Type to "Project Task"
inst.AccountingCodingBlockTypeCode.content = "PRO";
}
// var temTest = SI_Root.ReceiptDate.ToString();
foreach(inst in SI_Item1.ItemAccountingCodingBlockDistribution.AccountingCodingBlockAssignment){
// Set Project Task ID
inst.ProjectTaskKey.TaskID.content = "MC-1239-1"; // ItemIns.ProjectTaskID;
}
// SI_Item1.ItemAccountingCodingBlockDistribution.AccountingCodingBlockAssignment.Create(AccAsmt);
//Association with the Standard BO
if(!SI.IsSet())
{
raise Error.Create("E");
}
this.toSIV = SI;
this.SIV_ID = this.toSIV.ID.content;
// calculation of gross amount
this.toSIV.GrossAmount = this.toSIV.TotalGrossAmount;
SI.FinishDataEntryProcessing();
//raise success message
raise Success.Create("S",this.SIV_ID);
| User | Count |
|---|---|
| 94 | |
| 11 | |
| 11 | |
| 10 | |
| 9 | |
| 8 | |
| 6 | |
| 5 | |
| 4 | |
| 4 |
%2008.51.40.png){kind=link}
You must be a registered user to add a comment. If you've already registered, sign in. Otherwise, register and sign in.