1236: --| Validates tax_class |
1237: --| |
1238: --| DESCRIPTION |
1239: --| This function validates that the Tax Class exists |
1240: --| on ic_taxn_cls |
1241: --| |
1242: --| PARAMETERS |
1243: --| p_tax_class IN VARCHAR2(8) - Tax Class |
1244: --| |
1256: )
1257: RETURN BOOLEAN
1258: IS
1259: l_tax_class ic_item_mst.tax_class%TYPE;
1260: CURSOR ic_taxn_cls_c1 IS
1261: SELECT
1262: ictax_class
1263: FROM
1264: ic_taxn_cls
1260: CURSOR ic_taxn_cls_c1 IS
1261: SELECT
1262: ictax_class
1263: FROM
1264: ic_taxn_cls
1265: WHERE
1266: ic_taxn_cls.ictax_class = p_tax_class
1267: AND ic_taxn_cls.delete_mark = 0;
1268:
1262: ictax_class
1263: FROM
1264: ic_taxn_cls
1265: WHERE
1266: ic_taxn_cls.ictax_class = p_tax_class
1267: AND ic_taxn_cls.delete_mark = 0;
1268:
1269: BEGIN
1270:
1263: FROM
1264: ic_taxn_cls
1265: WHERE
1266: ic_taxn_cls.ictax_class = p_tax_class
1267: AND ic_taxn_cls.delete_mark = 0;
1268:
1269: BEGIN
1270:
1271: OPEN ic_taxn_cls_c1;
1267: AND ic_taxn_cls.delete_mark = 0;
1268:
1269: BEGIN
1270:
1271: OPEN ic_taxn_cls_c1;
1272: FETCH ic_taxn_cls_c1 INTO l_tax_class;
1273: IF (ic_taxn_cls_c1%NOTFOUND)
1274: THEN
1275: CLOSE ic_taxn_cls_c1;
1268:
1269: BEGIN
1270:
1271: OPEN ic_taxn_cls_c1;
1272: FETCH ic_taxn_cls_c1 INTO l_tax_class;
1273: IF (ic_taxn_cls_c1%NOTFOUND)
1274: THEN
1275: CLOSE ic_taxn_cls_c1;
1276: RETURN FALSE;
1269: BEGIN
1270:
1271: OPEN ic_taxn_cls_c1;
1272: FETCH ic_taxn_cls_c1 INTO l_tax_class;
1273: IF (ic_taxn_cls_c1%NOTFOUND)
1274: THEN
1275: CLOSE ic_taxn_cls_c1;
1276: RETURN FALSE;
1277: ELSE
1271: OPEN ic_taxn_cls_c1;
1272: FETCH ic_taxn_cls_c1 INTO l_tax_class;
1273: IF (ic_taxn_cls_c1%NOTFOUND)
1274: THEN
1275: CLOSE ic_taxn_cls_c1;
1276: RETURN FALSE;
1277: ELSE
1278: CLOSE ic_taxn_cls_c1;
1279: RETURN TRUE;
1274: THEN
1275: CLOSE ic_taxn_cls_c1;
1276: RETURN FALSE;
1277: ELSE
1278: CLOSE ic_taxn_cls_c1;
1279: RETURN TRUE;
1280: END IF;
1281:
1282: EXCEPTION