Item credit policy code added

git-svn-id: http://15.206.35.175/svn/proteus/business-java/trunk@93647 ce508802-f39f-4f6c-b175-0d175dae99d5

webitm-dis/module-resource/sql/DI3BSUN007.sql

@@ -406,7 +406,9 @@ Function fn_pod_chk ( as_saleorder in sorder.sale_order%type)
    ls_podtranid char(10);
    itemcode char(10);
    lineno number;
-
+   ls_itemSerSO	char(5);
+   itemSerCnt number;
+   
 BEGIN
 	cnumber := 0;
 	begin
@@ -421,7 +423,15 @@ BEGIN
 	end;
 	begin
 		--select site_code, cust_code__bil into ls_siteCode, ls_custCodeBill  FROM sorder where sale_order = as_saleorder and order_type in(inv_type_list);
-		select site_code, cust_code__bil into ls_siteCode, ls_custCodeBill  FROM sorder where sale_order = as_saleorder and order_type in('DM','IS');
+		select site_code, cust_code__bil, item_ser into ls_siteCode, ls_custCodeBill, ls_itemSerSO  FROM sorder where sale_order = as_saleorder and order_type in('DM','IS');
+	exception when NO_DATA_FOUND then
+		return 0;
+	end;
+	
+		-- Code to check credit policy defined for item series in regsrd with sale order item series	
+	begin
+		
+		select count(1) into itemSerCnt from itemser_cr_policy  where item_ser = ls_itemSerSO;
 	exception when NO_DATA_FOUND then
 		return 0;
 	end;
@@ -508,6 +518,8 @@ BEGIN
  	return cnumber;
 END;
 /
+
+
 --end function
 
 insert into messages