APPS.QASPSET_TABLE_HANDLER_PKG SQL Statements

The following lines contain the word 'select', 'insert', 'update' or 'delete':

Line: 4

PROCEDURE insert_plan_header_row(
      X_Rowid                IN OUT NOCOPY VARCHAR2,
      X_Sampling_Plan_id     IN OUT NOCOPY NUMBER,
      X_Sampling_Plan_Code   VARCHAR2,
      X_Description          VARCHAR2,
      X_Insp_Level_Code      VARCHAR2,
      X_Sampling_Std_Code    NUMBER,
      X_AQL                  NUMBER,
      X_Org_id		     NUMBER,
      X_Last_Update_Date     DATE,
      X_Last_Updated_By      NUMBER,
      X_Creation_Date        DATE,
      X_Created_By           NUMBER,
      X_Last_Update_Login    NUMBER
) IS

   CURSOR C1 IS SELECT rowid FROM qa_sampling_plans
               WHERE sampling_plan_id = X_Sampling_Plan_id;

Line: 23

   CURSOR C2 IS SELECT qa_sampling_plan_s.nextval FROM dual;

Line: 33

   INSERT INTO QA_SAMPLING_PLANS(
      sampling_plan_id,
      sampling_plan_code,
      description,
      insp_level_code,
      sampling_std_code,
      aql,
      organization_id,
      last_update_date,
      last_updated_by,
      creation_date,
      created_by,
      last_update_login
   )
   values(
      X_Sampling_Plan_id,
      X_Sampling_Plan_Code,
      X_Description,
      X_Insp_Level_Code,
      X_Sampling_Std_Code,
      X_AQL,
      X_Org_id,
      X_Last_Update_Date,
      X_Last_Updated_By,
      X_Creation_Date,
      X_Created_By,
      X_Last_Update_Login
   );

Line: 72

END insert_plan_header_row;

Line: 76

PROCEDURE insert_customized_rules_row(
      X_Rowid                IN OUT NOCOPY VARCHAR2,
      X_Rule_id              IN OUT NOCOPY NUMBER,
      X_Sampling_Plan_id     NUMBER,
      X_Min_Lot_Size         NUMBER,
      X_Max_Lot_Size         NUMBER,
      X_Sample_Size          NUMBER,
      X_Last_Update_Date     DATE,
      X_Last_Updated_By      NUMBER,
      X_Creation_Date        DATE,
      X_Created_By           NUMBER,
      X_Last_Update_Login    NUMBER
) IS

   CURSOR C1 IS SELECT rowid FROM qa_sampling_custom_rules
               WHERE rule_id = X_Rule_id;

Line: 93

   CURSOR C2 IS SELECT qa_sampling_rules_s.nextval FROM dual;

Line: 104

   INSERT INTO QA_SAMPLING_CUSTOM_RULES(
      rule_id,
      sampling_plan_id,
      min_lot_size,
      max_lot_size,
      sample_size,
      last_update_date,
      last_updated_by,
      creation_date,
      created_by,
      last_update_login
   )
   values(
      X_Rule_id,
      X_Sampling_Plan_id,
      X_Min_Lot_Size,
      X_Max_Lot_Size,
      X_Sample_Size,
      X_Last_Update_Date,
      X_Last_Updated_By,
      X_Creation_Date,
      X_Created_By,
      X_Last_Update_Login
   );

Line: 140

END insert_customized_rules_row;

Line: 145

PROCEDURE update_plan_header_row(
      X_Rowid                VARCHAR2,
      X_Sampling_Plan_id     NUMBER,
      X_Sampling_Plan_Code   VARCHAR2,
      X_Description          VARCHAR2,
      X_Insp_Level_Code      VARCHAR2,
      X_Sampling_Std_Code    NUMBER,
      X_AQL                  NUMBER,
      X_Org_id		     NUMBER,
      X_Last_Update_Date     DATE,
      X_Last_Updated_By      NUMBER,
      X_Creation_Date        DATE,
      X_Created_By           NUMBER,
      X_Last_Update_Login    NUMBER
) IS

BEGIN

   UPDATE QA_SAMPLING_PLANS
   SET
      sampling_plan_id           =       X_Sampling_Plan_id,
      sampling_plan_code         =       X_Sampling_Plan_Code,
      description                =       X_Description,
      insp_level_code            =       X_Insp_Level_Code,
      sampling_std_code          =       X_Sampling_Std_Code,
      aql                        =       X_AQL,
      organization_id		 =	 X_Org_id,
      last_update_date           =       X_Last_Update_Date,
      last_updated_by            =       X_Last_Updated_By,
      creation_date              =       X_Creation_Date,
      created_by                 =       X_Created_By,
      last_update_login          =       X_Last_Update_Login
   WHERE rowid = X_Rowid;

Line: 185

END update_plan_header_row;

Line: 190

PROCEDURE update_customized_rules_row(
      X_Rowid                VARCHAR2,
      X_Rule_id              NUMBER,
      X_Sampling_Plan_id     NUMBER,
      X_Min_Lot_Size         NUMBER,
      X_Max_Lot_Size         NUMBER,
      X_Sample_Size          NUMBER,
      X_Last_Update_Date     DATE,
      X_Last_Updated_By      NUMBER,
      X_Creation_Date        DATE,
      X_Created_By           NUMBER,
      X_Last_Update_Login    NUMBER
) IS

BEGIN

    UPDATE QA_SAMPLING_CUSTOM_RULES
    SET
      rule_id                =       X_Rule_id,
      sampling_plan_id       =       X_Sampling_Plan_id,
      min_lot_size           =       X_Min_Lot_Size,
      max_lot_size           =       X_Max_Lot_Size,
      sample_size            =       X_Sample_Size,
      last_update_date       =       X_Last_Update_Date,
      last_updated_by        =       X_Last_Updated_By,
      creation_date          =       X_Creation_Date,
      created_by             =       X_Created_By,
      last_update_login      =       X_Last_Update_Login
   WHERE rowid = X_Rowid;

Line: 226

END update_customized_rules_row;

Line: 241

      X_Last_Update_Date     DATE,
      X_Last_Updated_By      NUMBER,
      X_Creation_Date        DATE,
      X_Created_By           NUMBER,
      X_Last_Update_Login    NUMBER
) IS

  CURSOR C IS
     SELECT *
     FROM   QA_SAMPLING_PLANS
     WHERE  rowid = X_Rowid
     FOR UPDATE of sampling_plan_id NOWAIT;

Line: 264

     FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');

Line: 284

       AND (Recinfo.last_update_date =  X_Last_Update_Date)
       AND (Recinfo.last_updated_by =  X_Last_Updated_By)
       AND (Recinfo.creation_date =  X_Creation_Date)
       AND (Recinfo.created_by =  X_Created_By)
       AND (   (Recinfo.last_update_login =  X_Last_Update_Login)
               OR (    (Recinfo.last_update_login IS NULL)
                        AND (X_Last_Update_Login IS NULL)))

  ) then
    null;

Line: 314

      X_Last_Update_Date     DATE,
      X_Last_Updated_By      NUMBER,
      X_Creation_Date        DATE,
      X_Created_By           NUMBER,
      X_Last_Update_Login    NUMBER
) IS

  CURSOR C IS
     SELECT *
     FROM   QA_SAMPLING_CUSTOM_RULES
     WHERE  rowid = X_Rowid
     FOR UPDATE of rule_id NOWAIT;

Line: 336

     FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');

Line: 350

       AND (Recinfo.last_update_date =  X_Last_Update_Date)
       AND (Recinfo.last_updated_by =  X_Last_Updated_By)
       AND (Recinfo.creation_date =  X_Creation_Date)
       AND (Recinfo.created_by =  X_Created_By)
       AND (   (Recinfo.last_update_login =  X_Last_Update_Login)
               OR (    (Recinfo.last_update_login IS NULL)
                        AND (X_Last_Update_Login IS NULL)))

  ) then

    return;

Line: 374

PROCEDURE delete_plan_header_row(X_Rowid VARCHAR2) IS

BEGIN
  delete from QA_SAMPLING_PLANS
  where rowid = X_Rowid;

Line: 384

END delete_plan_header_row;

Line: 389

PROCEDURE delete_customized_rules_row(X_Rowid VARCHAR2) IS

BEGIN
  delete from QA_SAMPLING_CUSTOM_RULES
  where rowid = X_Rowid;

Line: 399

END delete_customized_rules_row;