DBA Data[Home] [Help]

APPS.IGS_PE_PRSID_GRP_MEM_PKG SQL Statements

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

Line: 16

    x_last_update_date IN DATE DEFAULT NULL,
    x_last_updated_by IN NUMBER DEFAULT NULL,
    x_last_update_login IN NUMBER DEFAULT NULL,
    x_org_id IN NUMBER DEFAULT NULL
  ) AS

  /*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sraj            2000/05/05      the table structure has been changed
  (reverse chronological order - newest change first)
  ***************************************************************/

    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PE_PRSID_GRP_MEM_ALL
      WHERE    rowid = x_rowid;
Line: 47

    IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
      Close cur_old_ref_values;
Line: 49

      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 62

    IF (p_action = 'UPDATE') THEN
       new_references.creation_date := old_references.creation_date;
Line: 71

    new_references.last_update_date := x_last_update_date;
Line: 72

    new_references.last_updated_by := x_last_updated_by;
Line: 73

    new_references.last_update_login := x_last_update_login;
Line: 77

  PROCEDURE BeforeRowInsertUpdateDelete1(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) AS
  /*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sraj            2000/05/05      the table structure has been changed
  (reverse chronological order - newest change first)
  ***************************************************************/

	v_message_name  varchar2(30);
Line: 95

	-- Validate the insert
	IF p_inserting THEN
		IF IGS_PE_VAL_PIGM.idgp_val_pigm_iud (
				new_references.group_id,
				'INSERT',
				v_message_name) = FALSE THEN
			 Fnd_Message.Set_Name('IGS', v_message_name);
Line: 106

	-- Validate the update
	IF p_updating THEN
		IF IGS_PE_VAL_PIGM.idgp_val_pigm_iud (
				new_references.group_id,
				'UPDATE',
				v_message_name) = FALSE THEN
			 Fnd_Message.Set_Name('IGS', v_message_name);
Line: 117

	-- Validate the delete
	IF p_deleting THEN
		IF IGS_PE_VAL_PIGM.idgp_val_pigm_iud (
				old_references.group_id,
				'DELETE',
				v_message_name) = FALSE THEN
			 Fnd_Message.Set_Name('IGS', v_message_name);
Line: 128

  END BeforeRowInsertUpdateDelete1;
Line: 130

  PROCEDURE BeforeInsertUpdate(p_inserting BOOLEAN , p_updating BOOLEAN) AS
  p_message_name VARCHAR2(30);
Line: 133

   IF p_inserting = TRUE THEN
   -- asbala Bug 3671159: When members are inserted into a closed group, IGS_PE_PIG_CLOSED_NO_INSRT
   -- message is to be displayed.
    IF  NOT IGS_PE_PERSID_GROUP_PKG.val_persid_group(new_references.group_id,p_message_name) THEN
        FND_MSG_PUB.initialize;  -- Bug 3671159: Error msg displayed multiple times in Self Service. Hence,
Line: 152

  END BeforeInsertUpdate;
Line: 204

	 Fnd_Message.Set_Name ('FND','FORM_RECORD_DELETED');
Line: 216

     Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Line: 242

      SELECT   rowid
      FROM     igs_pe_prsid_grp_mem_all
      WHERE    group_id = x_group_id
      AND      person_id = x_person_id
      FOR UPDATE NOWAIT;
Line: 279

      SELECT   rowid
      FROM     igs_pe_prsid_grp_mem_all
      WHERE    person_id = x_person_id ;
Line: 310

    x_last_update_date IN DATE DEFAULT NULL,
    x_last_updated_by IN NUMBER DEFAULT NULL,
    x_last_update_login IN NUMBER DEFAULT NULL,
    x_org_id IN NUMBER DEFAULT NULL
  ) AS
  /*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sraj            2000/05/05      the table structure has been changed
  sjalasut        June 7, 2002    bug 2381248
  (reverse chronological order - newest change first)
  ***************************************************************/
  CURSOR c_get_birth_date is SELECT date_of_birth FROM HZ_PERSON_PROFILES WHERE PARTY_ID = x_person_id
  AND EFFECTIVE_END_DATE IS NULL;
Line: 341

      x_last_update_date,
      x_last_updated_by,
      x_last_update_login,
      x_org_id
    );
Line: 347

     IF(p_action IN ('INSERT','UPDATE')) THEN
       OPEN c_get_birth_date; FETCH c_get_birth_date INTO l_birth_date; CLOSE c_get_birth_date;
Line: 357

     IF (p_action = 'INSERT') THEN
       -- Call all the procedures related to Before Insert.
       BeforeInsertUpdate(TRUE,FALSE);
Line: 370

     ELSIF (p_action = 'UPDATE') THEN
       -- Call all the procedures related to Before Update.
       BeforeInsertUpdate(FALSE,TRUE);
Line: 375

     ELSIF (p_action = 'DELETE') THEN
       -- Call all the procedures related to Before Delete.
      NULL;
Line: 378

     ELSIF (p_action = 'VALIDATE_INSERT') THEN
      IF  Get_PK_For_Validation (
         new_references.group_id ,
          new_references.person_id) THEN
         Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
Line: 388

 ELSIF (p_action = 'VALIDATE_UPDATE') THEN
       Check_Constraints; -- if procedure present
Line: 391

ELSIF (p_action = 'VALIDATE_DELETE') THEN
     NULL;
Line: 415

    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to After Insert.
      Null;
Line: 418

    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to After Update.
      Null;
Line: 421

    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to After Delete.
      Null;
Line: 428

 procedure INSERT_ROW (
      X_ROWID in out NOCOPY VARCHAR2,
       x_GROUP_ID IN NUMBER,
       x_PERSON_ID IN NUMBER,
       x_START_DATE IN DATE,
       x_END_DATE IN DATE,
      X_MODE in VARCHAR2 ,
      X_ORG_ID in NUMBER
  ) AS
  /*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
   sraj            2000/05/05      the table structure has been changed
  (reverse chronological order - newest change first)
  ***************************************************************/

    cursor C is select ROWID from IGS_PE_PRSID_GRP_MEM_ALL
             where                 GROUP_ID= X_GROUP_ID
            and PERSON_ID = X_PERSON_ID;
Line: 451

     X_LAST_UPDATE_DATE DATE ;
Line: 452

     X_LAST_UPDATED_BY NUMBER ;
Line: 453

     X_LAST_UPDATE_LOGIN NUMBER ;
Line: 457

     X_PROGRAM_UPDATE_DATE DATE;
Line: 459

     X_LAST_UPDATE_DATE := SYSDATE;
Line: 461

        X_LAST_UPDATED_BY := 1;
Line: 462

        X_LAST_UPDATE_LOGIN := 0;
Line: 464

               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 465

            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;
Line: 468

            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 469

         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;
Line: 479

      X_PROGRAM_UPDATE_DATE := NULL;
Line: 481

      X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 489

 		p_action=>'INSERT',
 		x_rowid=>X_ROWID,
 	       x_group_id=>X_GROUP_ID,
 	       x_person_id=>X_PERSON_ID,
 	       x_start_date=>X_START_DATE,
 	       x_end_date=>X_END_DATE,
	       x_creation_date=>X_LAST_UPDATE_DATE,
	       x_created_by=>X_LAST_UPDATED_BY,
	       x_last_update_date=>X_LAST_UPDATE_DATE,
	       x_last_updated_by=>X_LAST_UPDATED_BY,
	       x_last_update_login=>X_LAST_UPDATE_LOGIN,
	       x_org_id=>igs_ge_gen_003.get_org_id
	     );
Line: 502

     insert into IGS_PE_PRSID_GRP_MEM_ALL (
		GROUP_ID
		,PERSON_ID
		,START_DATE
		,END_DATE
	        ,CREATION_DATE
		,CREATED_BY
		,LAST_UPDATE_DATE
		,LAST_UPDATED_BY
		,LAST_UPDATE_LOGIN
		,REQUEST_ID
		,PROGRAM_ID
		,PROGRAM_APPLICATION_ID
		,PROGRAM_UPDATE_DATE
		,ORG_ID
        ) values  (
	        NEW_REFERENCES.GROUP_ID
	        ,NEW_REFERENCES.PERSON_ID
	        ,NEW_REFERENCES.START_DATE
	        ,NEW_REFERENCES.END_DATE
	        ,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_LOGIN
		,X_REQUEST_ID
		,X_PROGRAM_ID
		,X_PROGRAM_APPLICATION_ID
		,X_PROGRAM_UPDATE_DATE
		,NEW_REFERENCES.ORG_ID
);
Line: 541

		p_action => 'INSERT' ,
		x_rowid => X_ROWID );
Line: 543

end INSERT_ROW;
Line: 564

   cursor c1 is select
      START_DATE,
      END_DATE
    from IGS_PE_PRSID_GRP_MEM_ALL
    where ROWID = X_ROWID
    for update nowait;
Line: 575

    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
Line: 595

 Procedure UPDATE_ROW (
      X_ROWID in  VARCHAR2,
       x_GROUP_ID IN NUMBER,
       x_PERSON_ID IN NUMBER,
       x_START_DATE IN DATE,
       x_END_DATE IN DATE,
      X_MODE in VARCHAR2
  ) AS
  /*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sraj            2000/05/05      the table structure has been changed
  (reverse chronological order - newest change first)
  ***************************************************************/

     X_LAST_UPDATE_DATE DATE ;
Line: 615

     X_LAST_UPDATED_BY NUMBER ;
Line: 616

     X_LAST_UPDATE_LOGIN NUMBER ;
Line: 620

     X_PROGRAM_UPDATE_DATE DATE;
Line: 622

     X_LAST_UPDATE_DATE := SYSDATE;
Line: 624

        X_LAST_UPDATED_BY := 1;
Line: 625

        X_LAST_UPDATE_LOGIN := 0;
Line: 627

               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
Line: 628

            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;
Line: 631

            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
Line: 632

         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;
Line: 641

 		p_action=>'UPDATE',
 		x_rowid=>X_ROWID,
 	       x_group_id=>X_GROUP_ID,
 	       x_person_id=>X_PERSON_ID,
 	       x_start_date=>X_START_DATE,
 	       x_end_date=>X_END_DATE,
	       x_creation_date=>X_LAST_UPDATE_DATE,
	       x_created_by=>X_LAST_UPDATED_BY,
	       x_last_update_date=>X_LAST_UPDATE_DATE,
	       x_last_updated_by=>X_LAST_UPDATED_BY,
	       x_last_update_login=>X_LAST_UPDATE_LOGIN
	     );
Line: 662

    X_PROGRAM_UPDATE_DATE := OLD_REFERENCES.PROGRAM_UPDATE_DATE;
Line: 664

    X_PROGRAM_UPDATE_DATE := SYSDATE;
Line: 669

   update IGS_PE_PRSID_GRP_MEM_ALL set
        START_DATE =  NEW_REFERENCES.START_DATE,
        END_DATE =  NEW_REFERENCES.END_DATE,
	LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
	LAST_UPDATED_BY = X_LAST_UPDATED_BY,
	LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
	REQUEST_ID = X_REQUEST_ID,
	PROGRAM_ID = X_PROGRAM_ID,
	PROGRAM_APPLICATION_ID = PROGRAM_APPLICATION_ID,
	PROGRAM_UPDATE_DATE = X_PROGRAM_UPDATE_DATE
     where ROWID = X_ROWID;
Line: 686

	p_action => 'UPDATE' ,
	x_rowid => X_ROWID
	);
Line: 689

end UPDATE_ROW;
Line: 711

    cursor c1 is select ROWID from IGS_PE_PRSID_GRP_MEM_ALL
             where     GROUP_ID= X_GROUP_ID
            and PERSON_ID = X_PERSON_ID
;
Line: 720

    INSERT_ROW (
      X_ROWID,
       X_GROUP_ID,
       X_PERSON_ID,
       X_START_DATE,
       X_END_DATE,
      X_MODE,
      X_ORG_ID );
Line: 731

UPDATE_ROW (
      X_ROWID,
       X_GROUP_ID,
       X_PERSON_ID,
       X_START_DATE,
       X_END_DATE,
      X_MODE );
Line: 739

procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS
  /*************************************************************
  Created By :
  Date Created By :
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What
  sraj            2000/05/05      the table structure has been changed
  (reverse chronological order - newest change first)
  ***************************************************************/

begin
Before_DML (
p_action => 'DELETE',
x_rowid => X_ROWID
);
Line: 758

 delete from IGS_PE_PRSID_GRP_MEM_ALL
 where ROWID = X_ROWID;
Line: 764

 p_action => 'DELETE',
 x_rowid => X_ROWID
);
Line: 767

end DELETE_ROW;