method GetTaxEnvAndCalculateTaxByItemClass

Description

Calculate the tax amounts to post, based on an input amount with or without tax. It is different with GetTaxEnviormentAndCalculateTax. it will use different class to retrieve env and rate.

Parameters

icShipFromTaxZone	input	character
icShipToTaxZone	input	character
icTxclTaxCls	input	character
icCurrencyCode	input	character
icTransactionType	input	character
icDocumentReference	input	character
icDocumentNumber	input	character
ilTaxIsIncluded	input	logical
itTaxPointDate	input	date
itPostingDate	input	date
icTaxUsageCode	input	character
idAmountTC	input	decimal
idExchangeRateScale	input	decimal
idExchangeRate	input	decimal
icCompanyCode	input	character
icPaymentCondition	input	character
ilIsTaxInCityFromCompany	input	logical
ilIsTaxInCityFromShipTo	input	logical
ilIsTaxable	input	logical
idAdjustmentFactor	input	decimal
iiShipFromAddressID	input	integer
iiShipToAddressID	input	integer
icCustomerCode	input	character
icInvoiceType	input	character
icItemTaxClass	input	character
tTaxDetail	input-output	temp-table
tTaxParametersExtVAT	output	temp-table
ocTxenvTaxEnv	output	character
oiReturnStatus	output	integer	Return status of the method.

Internal usage

QadFinancials

method BCDocument.CalculateBankChargeTax

program code (program7/bvat.p)

<I-57 {bFcStartAndOpenInstance
     &CLASS                = "PGTM"}>

<M-15 run GetTaxEnvironment
   (input  false (ilStartAndOpenPGTM), 
    input  icShipFromTaxZone (icShipFromTaxZone), 
    input  icShipToTaxZone (icShipToTaxZone), 
    input  icTxclTaxCls (icTxclTaxCls), 
    output ocTxenvTaxEnv (ocTxenvTaxEnv), 
    output viFcReturnSuper (oiReturnStatus)) in BVAT>

if viFcReturnSuper >= 0
then do:
    <M-2 run CalculateTax
       (input  false (ilStartAndOpenPGTM), 
        input  icCurrencyCode (icCurrencyCode), 
        input  icTransactionType (icTransactionType), 
        input  icDocumentReference (icDocumentReference), 
        input  icDocumentNumber (icDocumentNumber), 
        input  ilTaxIsIncluded (ilTaxIsIncluded), 
        input  itTaxPointDate (itTaxPointDate), 
        input  itPostingDate (itPostingDate), 
        input  ocTxenvTaxEnv (icTaxEnvCode), 
        input  icShipFromTaxZone (icFromTaxZoneCode), 
        input  icShipToTaxZone (icToTaxZoneCode), 
        input  icItemTaxClass (icTaxClassCode), 
        input  icTaxUsageCode (icTaxUsageCode), 
        input  idAmountTC (idAmountTC), 
        input  idExchangeRateScale (idExchangeRateScale), 
        input  idExchangeRate (idExchangeRate), 
        input  icCompanyCode (icCompanyCode), 
        input  icPaymentCondition (icPaymentCondition), 
        input  ilIsTaxInCityFromCompany (ilIsTaxInCityFromCompany), 
        input  ilIsTaxInCityFromShipTo (ilIsTaxInCityFromShipTo), 
        input  ilIsTaxable (ilIsTaxable), 
        input  idAdjustmentFactor (idAdjustmentFactor), 
        input  iiShipToAddressID (iiShipToAddressID), 
        input  iiShipFromAddressID (iiShipFromAddressID), 
        input  icCustomerCode (icCustomerCode), 
        input  icInvoiceType (icInvoiceType), 
        input-output tTaxDetail (tTaxDetail), 
        output tTaxParametersExtVAT (tTaxParametersExtVAT), 
        output viFcReturnSuper (oiReturnStatus)) in BVAT>
end.
    
if viFcReturnSuper < 0 or
   oiReturnStatus  = 0
then assign oiReturnStatus = viFcReturnSuper.

<I-25 {bFcCloseAndStopInstance
     &CLASS           = "PGTM"}>