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

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;