eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.IGS_PS_OCCUP_TITLES_PKG SQL Statements

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

Line: 15


    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      : jdeekoll
  Date Created By : 11-May-2000
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

  (reverse chronological order - newest change first)
  ***************************************************************/



    CURSOR cur_old_ref_values IS
      SELECT   *
      FROM     IGS_PS_OCCUP_TITLES_ALL
      WHERE    rowid = x_rowid;

Line: 48


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

Line: 50


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

Line: 61


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

Line: 68


    new_references.last_update_date := x_last_update_date;

Line: 69


    new_references.last_updated_by := x_last_updated_by;

Line: 70


    new_references.last_update_login := x_last_update_login;

Line: 143


      SELECT   rowid
      FROM     IGS_PS_VER_ALL
      WHERE    course_cd =new_references.Program_Code
      FOR UPDATE NOWAIT;

Line: 158


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

Line: 167


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

Line: 191


      SELECT   rowid
      FROM     igs_ps_occup_titles_all
      WHERE    program_occupational_title_id = x_prgm_occupational_title_id
      FOR UPDATE NOWAIT;

Line: 230


      SELECT   rowid
      FROM     igs_ps_occup_titles_all
      WHERE    occupational_title_code = x_occupational_title_code
      AND      program_code = x_program_code 	and      ((l_rowid is null) or (rowid <> l_rowid))

      ;

Line: 266


      SELECT   rowid
      FROM     igs_ps_occup_titles_all
      WHERE    occupational_title_code = x_occupational_title_code ;

Line: 303


      SELECT   rowid
      FROM     igs_ps_occup_titles_all
      WHERE    program_code = x_program_code ;

Line: 333


    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      : jdeekoll
  Date Created By : 11-May-2000
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

  (reverse chronological order - newest change first)
  ***************************************************************/



  BEGIN

    Set_Column_Values (
      p_action,
      x_rowid,
      x_prgm_occupational_title_id,
      x_program_code,
      x_occupational_title_code,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login,
      x_org_id
    );

Line: 368


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
      Null;

Line: 380


    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
      Null;

Line: 386


    ELSIF (p_action = 'DELETE') THEN
      -- Call all the procedures related to Before Delete.
      Null;

Line: 389


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
	 -- Call all the procedures related to Before Insert.
      IF Get_PK_For_Validation (
    		new_references.program_occupational_title_id)  THEN
	       Fnd_Message.Set_name('IGS','IGS_GE_MULTI_ORG_DUP_REC');

Line: 399


    ELSIF (p_action = 'VALIDATE_UPDATE') THEN
      Check_Uniqueness;

Line: 402


    ELSIF (p_action = 'VALIDATE_DELETE') THEN
      Null;

Line: 430


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

Line: 433


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

Line: 436


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

Line: 445


 procedure INSERT_ROW (
      X_ROWID in out NOCOPY VARCHAR2,
       x_PRGM_OCCUPATIONAL_TITLE_ID IN OUT NOCOPY NUMBER,
       x_PROGRAM_CODE IN VARCHAR2,
       x_OCCUPATIONAL_TITLE_CODE IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R',
      X_ORG_ID IN NUMBER
  ) AS

/*************************************************************
  Created By      : jdeekoll
  Date Created By : 11-May-2000
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

  (reverse chronological order - newest change first)
  ***************************************************************/

    cursor C is select ROWID from IGS_PS_OCCUP_TITLES
             where                 PROGRAM_OCCUPATIONAL_TITLE_ID= X_PRGM_OCCUPATIONAL_TITLE_ID
;

Line: 468


     X_LAST_UPDATE_DATE DATE ;

Line: 469


     X_LAST_UPDATED_BY NUMBER ;

Line: 470


     X_LAST_UPDATE_LOGIN NUMBER ;

Line: 472


     X_LAST_UPDATE_DATE := SYSDATE;

Line: 474


        X_LAST_UPDATED_BY := 1;

Line: 475


        X_LAST_UPDATE_LOGIN := 0;

Line: 477


               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 478


            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;

Line: 481


            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 482


         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;

Line: 491


  SELECT igs_ps_dic_occ_titls_s.nextval
  INTO x_prgm_occupational_title_id
  FROM dual;

Line: 496


 		p_action=>'INSERT',
 		x_rowid=>X_ROWID,
 	       x_prgm_occupational_title_id=>X_PRGM_OCCUPATIONAL_TITLE_ID,
 	       x_program_code=>X_PROGRAM_CODE,
 	       x_occupational_title_code=>X_OCCUPATIONAL_TITLE_CODE,
	       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: 507


     insert into IGS_PS_OCCUP_TITLES (
		PROGRAM_OCCUPATIONAL_TITLE_ID
		,PROGRAM_CODE
		,OCCUPATIONAL_TITLE_CODE
	        ,CREATION_DATE
		,CREATED_BY
		,LAST_UPDATE_DATE
		,LAST_UPDATED_BY
		,LAST_UPDATE_LOGIN
		,ORG_ID
        ) values  (
	        NEW_REFERENCES.PROGRAM_OCCUPATIONAL_TITLE_ID
	        ,NEW_REFERENCES.PROGRAM_CODE
	        ,NEW_REFERENCES.OCCUPATIONAL_TITLE_CODE
	        ,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_DATE
		,X_LAST_UPDATED_BY
		,X_LAST_UPDATE_LOGIN
		,NEW_REFERENCES.ORG_ID
);

Line: 536


		p_action => 'INSERT' ,
		x_rowid => X_ROWID );

Line: 538


end INSERT_ROW;

Line: 555


   cursor c1 is select
      PROGRAM_CODE
,      OCCUPATIONAL_TITLE_CODE
    from IGS_PS_OCCUP_TITLES_ALL
    where ROWID = X_ROWID
    for update nowait;

Line: 566


    fnd_message.set_name('FND', 'FORM_RECORD_DELETED');

Line: 584


 Procedure UPDATE_ROW (
      X_ROWID in  VARCHAR2,
       x_PRGM_OCCUPATIONAL_TITLE_ID IN NUMBER,
       x_PROGRAM_CODE IN VARCHAR2,
       x_OCCUPATIONAL_TITLE_CODE IN VARCHAR2,
      X_MODE in VARCHAR2 default 'R'
  ) AS
/*************************************************************
  Created By      : jdeekoll
  Date Created By : 11-May-2000
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

  (reverse chronological order - newest change first)
  ***************************************************************/

     X_LAST_UPDATE_DATE DATE ;

Line: 603


     X_LAST_UPDATED_BY NUMBER ;

Line: 604


     X_LAST_UPDATE_LOGIN NUMBER ;

Line: 606


     X_LAST_UPDATE_DATE := SYSDATE;

Line: 608


        X_LAST_UPDATED_BY := 1;

Line: 609


        X_LAST_UPDATE_LOGIN := 0;

Line: 611


               X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 612


            if X_LAST_UPDATED_BY is NULL then
                X_LAST_UPDATED_BY := -1;

Line: 615


            X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 616


         if X_LAST_UPDATE_LOGIN is NULL then
            X_LAST_UPDATE_LOGIN := -1;

Line: 625


 		p_action=>'UPDATE',
 		x_rowid=>X_ROWID,
 	       x_prgm_occupational_title_id=>X_PRGM_OCCUPATIONAL_TITLE_ID,
 	       x_program_code=>X_PROGRAM_CODE,
 	       x_occupational_title_code=>X_OCCUPATIONAL_TITLE_CODE,
	       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: 635


   update IGS_PS_OCCUP_TITLES_ALL set
      PROGRAM_CODE =  NEW_REFERENCES.PROGRAM_CODE,
      OCCUPATIONAL_TITLE_CODE =  NEW_REFERENCES.OCCUPATIONAL_TITLE_CODE,
	LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
	LAST_UPDATED_BY = X_LAST_UPDATED_BY,
	LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
	  where ROWID = X_ROWID;

Line: 647


	p_action => 'UPDATE' ,
	x_rowid => X_ROWID
	);

Line: 650


end UPDATE_ROW;

Line: 673


    cursor c1 is select ROWID from IGS_PS_OCCUP_TITLES_ALL
             where     PROGRAM_OCCUPATIONAL_TITLE_ID= X_PRGM_OCCUPATIONAL_TITLE_ID
;

Line: 681


    INSERT_ROW (
      X_ROWID,
       X_PRGM_OCCUPATIONAL_TITLE_ID,
       X_PROGRAM_CODE,
       X_OCCUPATIONAL_TITLE_CODE,
      X_MODE,
      X_ORG_ID);

Line: 691


UPDATE_ROW (
      X_ROWID,
       X_PRGM_OCCUPATIONAL_TITLE_ID,
       X_PROGRAM_CODE,
       X_OCCUPATIONAL_TITLE_CODE,
      X_MODE );

Line: 698


procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) AS

/*************************************************************
  Created By      : jdeekoll
  Date Created By : 11-May-2000
  Purpose :
  Know limitations, enhancements or remarks
  Change History
  Who             When            What

  (reverse chronological order - newest change first)
  ***************************************************************/



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

Line: 720


 delete from IGS_PS_OCCUP_TITLES
 where ROWID = X_ROWID;

Line: 726


 p_action => 'DELETE',
 x_rowid => X_ROWID
);

Line: 729


end DELETE_ROW;