PZHO#20312

svn path=/Database/trunk/; revision=10658

BES/BES_PAC.SRC

@@ -1,7 +1,7 @@
 #ifdef  BES // 03-11-2000 PF
 /*  BES_PAC.SRC
- *  $Revision: 74 $
- *  $Modtime: 24-02-11 16:18 $
+ *  $Revision: 75 $
+ *  $Modtime: 13-04-11 8:52 $
  */
 
 -- STATUS: TESTEN
@@ -699,8 +699,10 @@ p_bes_srtdeel_nr IN VARCHAR2,             -- VARCHAR2 (32)
 p_prs_bedrijf_key IN NUMBER,
 p_bes_srtdeel_vervaldatum IN DATE,
 p_bes_srtdeel_image IN VARCHAR2,          -- VARCHAR2 (255)
-p_bes_srtdeel_veelvoud IN NUMBER          -- NUMBER (6)
-) IS
+p_bes_srtdeel_veelvoud IN NUMBER,         -- NUMBER (6)
+p_bes_srtdeel_opmerking IN VARCHAR2       -- VARCHAR2 (2000)
+)
+IS
 v_bes_srtgroep_key NUMBER(10);
 v_bes_srtdeel_key NUMBER(10);
 v_prs_bedrijf_key NUMBER(10);
@@ -741,17 +743,18 @@ BEGIN
     v_prs_bedrijf_key := p_prs_bedrijf_key;
   END IF;
   BEGIN
-    SELECT bes_srtDEEL_KEY
-      INTO v_bes_srtDEEL_KEY
+    SELECT bes_srtdeel_key
+      INTO v_bes_srtdeel_key
       FROM bes_srtdeel sd
      WHERE bes_srtgroep_key = v_bes_srtgroep_key
        AND bes_srtdeel_nr = p_bes_srtdeel_nr
        AND bes_srtdeel_omschrijving = p_bes_srtdeel_omschrijving
        AND bes_srtdeel_prijs = p_bes_srtdeel_prijs
        AND bes_srtdeel_btw = p_bes_srtdeel_btw
-       AND bes_srtdeel_eenheid = p_bes_srtdeel_eenheid
+       AND COALESCE(bes_srtdeel_eenheid, 'Geen') = COALESCE(p_bes_srtdeel_eenheid, 'Geen')
        AND prs_bedrijf_key = v_prs_bedrijf_key
        AND bes_srtdeel_veelvoud = p_bes_srtdeel_veelvoud
+       AND COALESCE(bes_srtdeel_opmerking, 'Geen') = COALESCE(p_bes_srtdeel_opmerking, 'Geen')
        AND rownum = 1;
   EXCEPTION WHEN NO_DATA_FOUND THEN
     v_bes_srtdeel_key := -1;
@@ -773,7 +776,8 @@ BEGIN
      , bes_srtdeel_vervaldatum
      , bes_srtdeel_image
      , bes_srtdeel_veelvoud
-     , bes_srtdeel_verwijder)
+     , bes_srtdeel_verwijder
+     , bes_srtdeel_opmerking)
     VALUES
      ( v_bes_srtdeel_key
      , v_bes_srtdeel_key
@@ -787,7 +791,9 @@ BEGIN
      , p_bes_srtdeel_vervaldatum
      , p_bes_srtdeel_image
      , p_bes_srtdeel_veelvoud
-     , sysdate);
+     , sysdate
+     , p_bes_srtdeel_opmerking);
+    
   END IF;
 
 END BES_Check_or_Create_Item;
@@ -999,6 +1005,6 @@ BEGIN
 END;
 /
 
-REGISTERRUN('$Workfile: BES_PAC.SRC $','$Revision: 74 $')
+REGISTERRUN('$Workfile: BES_PAC.SRC $','$Revision: 75 $')
 
 #endif // BES