888: --| Validates sales_class |
889: --| |
890: --| DESCRIPTION |
891: --| This function validates that the Sales Class exists |
892: --| on ic_sale_cls |
893: --| |
894: --| PARAMETERS |
895: --| p_sales_class IN VARCHAR2(8) - Sales Class |
896: --| |
908: )
909: RETURN BOOLEAN
910: IS
911: l_sales_class ic_item_mst.sales_class%TYPE;
912: CURSOR ic_sale_cls_c1 IS
913: SELECT
914: icsales_class
915: FROM
916: ic_sale_cls
912: CURSOR ic_sale_cls_c1 IS
913: SELECT
914: icsales_class
915: FROM
916: ic_sale_cls
917: WHERE
918: ic_sale_cls.icsales_class = p_sales_class
919: AND ic_sale_cls.delete_mark = 0;
920:
914: icsales_class
915: FROM
916: ic_sale_cls
917: WHERE
918: ic_sale_cls.icsales_class = p_sales_class
919: AND ic_sale_cls.delete_mark = 0;
920:
921: BEGIN
922:
915: FROM
916: ic_sale_cls
917: WHERE
918: ic_sale_cls.icsales_class = p_sales_class
919: AND ic_sale_cls.delete_mark = 0;
920:
921: BEGIN
922:
923: OPEN ic_sale_cls_c1;
919: AND ic_sale_cls.delete_mark = 0;
920:
921: BEGIN
922:
923: OPEN ic_sale_cls_c1;
924: FETCH ic_sale_cls_c1 INTO l_sales_class;
925: IF (ic_sale_cls_c1%NOTFOUND)
926: THEN
927: CLOSE ic_sale_cls_c1;
920:
921: BEGIN
922:
923: OPEN ic_sale_cls_c1;
924: FETCH ic_sale_cls_c1 INTO l_sales_class;
925: IF (ic_sale_cls_c1%NOTFOUND)
926: THEN
927: CLOSE ic_sale_cls_c1;
928: RETURN FALSE;
921: BEGIN
922:
923: OPEN ic_sale_cls_c1;
924: FETCH ic_sale_cls_c1 INTO l_sales_class;
925: IF (ic_sale_cls_c1%NOTFOUND)
926: THEN
927: CLOSE ic_sale_cls_c1;
928: RETURN FALSE;
929: ELSE
923: OPEN ic_sale_cls_c1;
924: FETCH ic_sale_cls_c1 INTO l_sales_class;
925: IF (ic_sale_cls_c1%NOTFOUND)
926: THEN
927: CLOSE ic_sale_cls_c1;
928: RETURN FALSE;
929: ELSE
930: CLOSE ic_sale_cls_c1;
931: RETURN TRUE;
926: THEN
927: CLOSE ic_sale_cls_c1;
928: RETURN FALSE;
929: ELSE
930: CLOSE ic_sale_cls_c1;
931: RETURN TRUE;
932: END IF;
933:
934: EXCEPTION