X++ | Cálculo de impuesto sobre las ventas en facturas de servicio

Hola a tod@s:

En reiteradas ocasiones nos hemos visto en la necesidad de calcular el monto de impuesto sobre las ventas en distintas propuestas hechas por los usuarios. Comparto con ustedes la forma de realizar dicho cálculo.
Esperando sea de su ayuda.

 //Cálculo de monto de impuesto sobre las ventas para facturas de servicios  
 static void calcTaxSalesInvoice(Args _args)  
 {  
  CustInvoiceTable     custInvoiceTable;  
  CustInvoiceCalcTax    custInvoiceCalcTax;  
  TaxFreeInvoice      taxFreeInvoice;  
  TaxAmountCur       totalTax;  
  ;  
  ttsbegin;  
  select firstonly custInvoiceTable  
  where custInvoiceTable.RecId == 5637554835;  
  custInvoiceCalcTax = new CustInvoiceCalcTax_Table(custInvoiceTable);  
  taxFreeInvoice   = new TaxFreeInvoice(custInvoiceCalcTax,true,true,false);  
  totalTax = taxFreeInvoice.calculateTax();  
  ttscommit;  
  print(totalTax);  
   pause;  
 }  

 //Cálculo de monto de impuesto sobre las ventas para ódenes de venta  
 static void calcTaxSales(Args _args)  
 {  
   SalesTotals   salesTotals;  
   SalesTable   salesTable;  
   container    displayFields;  
   str       totalTax, amountWithoutTax, amountInclTax;  
   salesTable   = salesTable::find('V000003585');  
   salesTotals   = SalesTotals::construct(salesTable, salesUpdate::All);  
   salesTotals.calc();  
   displayFields  = salesTotals.displayFieldsCurrency(salesTotals.currencyCode());  
   amountWithoutTax  = conpeek(displayFields, TradeTotals::posBalance());  
   amountInclTax    = conpeek(displayFields, TradeTotals::posTotalAmount());  
   totalTax      = conpeek(displayFields,TradeTotals::posTaxTotal());  
   info(strFmt(totalTax));  
 }  

by NASIV