W15JSUN003, updated the sql file for QC order validation.

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

webitm-wms/module-resource/sql/W15JSUN003.sql

 
-CREATE OR REPLACE
-  FUNCTION FN_CHK_STA(
-      as_itemcode swms_to_awms.item_code%type,
-      as_lotno swms_to_awms.lot_no%type)
-    RETURN NUMBER
-  IS
-    ll_retval     NUMBER(1) := 1;
-    ll_retval_ctr NUMBER(1) := 0;
-  BEGIN
-    BEGIN
-      SELECT COUNT(1)
-      INTO ll_retval_ctr
-      FROM SWMS_TO_AWMS
-      WHERE SCHEDULE_STATUS= 'N'
-      AND item_code        = as_itemcode
-      AND lot_no           = as_lotno;
-      IF ll_retval_ctr     = 0 THEN
-        ll_retval         := 1;
-      END IF;
-    END;
-    IF ll_retval_ctr >= 1 THEN
-      BEGIN
-        SELECT COUNT(1)
-        INTO ll_retval_ctr
-        FROM SWMS_TO_AWMS S ,
-          wms_to_host W
-        WHERE S.SCHEDULE_STATUS= 'N'
-        AND S.REF_ID           = W.REF_ID
-        AND S.item_code        = as_itemcode
-        AND S.lot_no           = as_lotno;
-        IF ll_retval_ctr       = 0 THEN
-          ll_retval           := 0;
-        END IF;
-      END;
-    END IF;
-    RETURN (ll_retval);
-  END;
-  /
-
 
 insert into genmst (FLD_NAME,MOD_NAME,DESCR,ERROR_CD,BLANK_OPT,FLD_TYPE,FLD_MIN,FLD_MAX,VAL_TYPE,CHG_DATE,CHG_USER,CHG_TERM,SQL_INPUT,FLD_WIDTH,FORM_NO) 
-values ('REJECTION_CODE','W_QCORDER_NEW','Transaction in transist','VTQCPEND','N','C','SELECT (CASE WHEN FN_CHK_STA( ? , ? ) = 0 THEN 0 ELSE 1 END) FROM DUAL','1','Q',sysdate,
+values ('REJECTION_CODE','W_QCORDER_NEW','Transaction in transist','VTQCPEND','N','C','SELECT (CASE WHEN COUNT(1) = 0 THEN 1 ELSE 0 END) FROM SWMS_TO_AWMS WHERE SCHEDULE_STATUS= ''N'' AND item_code = ? AND lot_no = ? ','1','Q',sysdate,
 'BASE','BASE',':0.item_code,:0.lot_no',3,'1');
 
 
@@ -55,3 +16,5 @@ update system_events set event_code = 'Confirm_validate' where obj_name = 'qcord
 
 
 
+
+