item series check code commented

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

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

@@ -397,6 +397,7 @@ Function fn_pod_chk ( as_saleorder in sorder.sale_order%type)
 	 ls_custCodeBill customer.cust_code%type;
 	 ls_siteCode site.site_code%type;
 
+   -- 17 Sep 2013
    hdr_sql_stmt varchar2(3000);
    dtl_sql_stmt varchar2(3000);
    podqty_sum number;
@@ -423,18 +424,18 @@ 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, item_ser into ls_siteCode, ls_custCodeBill, ls_itemSerSO  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(select var_value from disparm where var_name = 'POD_INV_TYPE' and prd_code = '999999');
 	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
+	--begin
 		
-		select count(1) into itemSerCnt from itemser_cr_policy  where item_ser = ls_itemSerSO;
-	exception when NO_DATA_FOUND then
-		return 0;
-	end;
+		--select count(1) into itemSerCnt from itemser_cr_policy  where item_ser = ls_itemSerSO;
+	--exception when NO_DATA_FOUND then
+		--return 0;
+	--end;
 		--inv_type_list := '''' || inv_type_list || '''';
 
 		--ls_sql_stmt := 'select invoice_id from invoice where cust_code__bil = ''' || ls_custCodeBill ||''' and site_code = ''' || ls_siteCode ||''' and inv_type in ('||inv_type_list||') and sysdate - conf_date > 29';