mht_brerp10.adempiere

Parameters

Name	Type	Mode
client_id	numeric	IN
org_id	numeric	IN
taxname	character varying	IN
taxstatus	character varying	IN
cfop_id	numeric	IN
tpoperation	character varying	IN

Definition

DECLARE
 	ICMS_Code 	CHARACTER VARYING;
 	TaxName_ID	INTEGER  =  get_sysconfig(taxname, '0', CLIENT_ID, ORG_ID);
	DateNow		TIMESTAMP = getDate();
BEGIN
    BEGIN
		SELECT 
			taxCL.COF_Classification
		INTO STRICT ICMS_Code
		FROM 
			COF_C_TaxClassification taxC 
		LEFT JOIN COF_C_TaxClassificationLine taxCL ON (taxC.COF_C_TaxClassification_ID=taxCL.COF_C_TaxClassification_ID)

WHERE 
			CASE WHEN TaxName_ID <=0 THEN taxC.LBR_TaxName_ID IS NULL AND taxC.cof_isSimpleNational='Y' ELSE taxC.LBR_TaxName_ID=TaxName_ID AND taxC.cof_isSimpleNational='N'END AND taxC.IsActive='Y' AND taxCL.IsActive='Y' AND taxC.AD_Client_ID IN (0, CLIENT_ID) AND taxC.AD_Org_ID IN (0,ORG_ID) AND taxCL.AD_Client_ID IN (0,CLIENT_ID) AND taxCL.AD_Org_ID IN (0,ORG_ID)
			AND taxC.ValidFrom::DATE <= DateNow AND taxC.ValidTo::DATE >= DateNow
			AND taxCL.COF_OperationType = TpOperation
			AND (taxCL.LBR_TaxStatus_ID IS NULL OR taxCL.LBR_TaxStatus_ID IN (SELECT LBR_TaxStatus_ID FROM LBR_TaxStatus WHERE LBR_TaxName_ID=TaxName_ID AND LTRIM(RTRIM(Name)) = LTRIM(RTRIM(TaxStatus)) AND IsActive='Y'))
			AND (taxCL.LBR_CFOP_ID = CFOP_ID OR taxCL.LBR_CFOP_ID IS NULL)
						
		ORDER BY taxCL.AD_Client_ID, taxCL.AD_Org_ID DESC, taxCL.LBR_CFOP_ID DESC
		LIMIT 1;
    EXCEPTION
        WHEN NO_DATA_FOUND THEN
            ICMS_Code := '';
    END;
	RETURN ICMS_Code;
END;

cof_get_taxcode(numeric, numeric, character varying, character varying, numeric, character varying)

Parameters

Definition