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_PR_S_OU_PRG_CAL_PKG SQL Statements

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

Line: 19


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

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

Line: 37


    IF (cur_old_ref_values%NOTFOUND) AND (p_action not in ('INSERT','VALIDATE_INSERT')) THEN
      Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');

Line: 54


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

Line: 61


    new_references.last_update_date := x_last_update_date;

Line: 62


    new_references.last_updated_by := x_last_updated_by;

Line: 63


    new_references.last_update_login := x_last_update_login;

Line: 73


  PROCEDURE BeforeRowInsertUpdate1(
    p_inserting IN BOOLEAN DEFAULT FALSE,
    p_updating IN BOOLEAN DEFAULT FALSE,
    p_deleting IN BOOLEAN DEFAULT FALSE
    ) AS
	v_message_name varchar2(30);

Line: 81


	IF p_inserting THEN
		IF igs_pr_val_scpca.prgp_val_cfg_cat (
					new_references.prg_cal_type,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 91


	IF p_inserting OR (p_updating AND
	   new_references.show_cause_length <> old_references.show_cause_length) THEN
		IF IGS_PR_VAL_SOPCA.prgp_val_sopca_cause (
					new_references.org_unit_cd,
					new_references.ou_start_dt,
					new_references.show_cause_length,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 104


	IF p_inserting OR (p_updating AND
	   new_references.appeal_length <> old_references.appeal_length) THEN
		IF IGS_PR_VAL_SOPCA.prgp_val_sopca_apl (
					new_references.org_unit_cd,
					new_references.ou_start_dt,
					new_references.appeal_length,
					v_message_name) = FALSE THEN
			Fnd_Message.Set_Name('IGS',v_message_name);

Line: 118


  END BeforeRowInsertUpdate1;

Line: 131


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

Line: 147


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

Line: 162


      SELECT   rowid
      FROM     IGS_PR_S_OU_PRG_CAL
      WHERE    org_unit_cd = x_org_unit_cd
      AND      ou_start_dt = x_ou_start_dt
      AND      prg_cal_type = x_prg_cal_type
      FOR UPDATE NOWAIT;

Line: 190


      SELECT   rowid
      FROM     IGS_PR_S_OU_PRG_CAL
      WHERE    prg_cal_type = x_cal_type ;

Line: 218


      SELECT   rowid
      FROM     IGS_PR_S_OU_PRG_CAL
      WHERE    org_unit_cd = x_org_unit_cd
      AND      ou_start_dt = x_ou_start_dt ;

Line: 252


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

    Set_Column_Values (
      p_action,
      x_rowid,
      x_org_unit_cd,
      x_ou_start_dt,
      x_prg_cal_type,
      x_stream_num,
      x_show_cause_length,
      x_appeal_length,
      x_creation_date,
      x_created_by,
      x_last_update_date,
      x_last_updated_by,
      x_last_update_login
    );

Line: 274


    IF (p_action = 'INSERT') THEN
      -- Call all the procedures related to Before Insert.
      BeforeRowInsertUpdate1 ( p_inserting => TRUE );

Line: 288


    ELSIF (p_action = 'UPDATE') THEN
      -- Call all the procedures related to Before Update.
      BeforeRowInsertUpdate1 ( p_updating => TRUE );

Line: 293


    ELSIF (p_action = 'VALIDATE_INSERT') THEN
      -- Call all the procedures related to Before Insert.
	IF Get_PK_For_Validation (
         new_references.org_unit_cd,
         new_references.ou_start_dt,
         new_references.prg_cal_type
         ) THEN
        Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');

Line: 305


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

Line: 312


procedure INSERT_ROW (
  X_ROWID in out NOCOPY VARCHAR2,
  X_ORG_UNIT_CD in VARCHAR2,
  X_OU_START_DT in DATE,
  X_PRG_CAL_TYPE in VARCHAR2,
  X_STREAM_NUM in NUMBER,
  X_SHOW_CAUSE_LENGTH in NUMBER,
  X_APPEAL_LENGTH in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) as
    cursor C is select ROWID from IGS_PR_S_OU_PRG_CAL
      where ORG_UNIT_CD = X_ORG_UNIT_CD
      and OU_START_DT = X_OU_START_DT
      and PRG_CAL_TYPE = X_PRG_CAL_TYPE;

Line: 326


    X_LAST_UPDATE_DATE DATE;

Line: 327


    X_LAST_UPDATED_BY NUMBER;

Line: 328


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 330


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 332


    X_LAST_UPDATED_BY := 1;

Line: 333


    X_LAST_UPDATE_LOGIN := 0;

Line: 335


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 336


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 339


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 340


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 350


     p_action => 'INSERT',
     x_rowid => X_ROWID,
     x_appeal_length => X_APPEAL_LENGTH,
     x_org_unit_cd => X_ORG_UNIT_CD,
     x_ou_start_dt => X_OU_START_DT,
     x_prg_cal_type => X_PRG_CAL_TYPE,
     x_show_cause_length => X_SHOW_CAUSE_LENGTH,
     x_stream_num => X_STREAM_NUM,
     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: 366


  insert into IGS_PR_S_OU_PRG_CAL (
    ORG_UNIT_CD,
    OU_START_DT,
    PRG_CAL_TYPE,
    STREAM_NUM,
    SHOW_CAUSE_LENGTH,
    APPEAL_LENGTH,
    CREATION_DATE,
    CREATED_BY,
    LAST_UPDATE_DATE,
    LAST_UPDATED_BY,
    LAST_UPDATE_LOGIN
  ) values (
    NEW_REFERENCES.ORG_UNIT_CD,
    NEW_REFERENCES.OU_START_DT,
    NEW_REFERENCES.PRG_CAL_TYPE,
    NEW_REFERENCES.STREAM_NUM,
    NEW_REFERENCES.SHOW_CAUSE_LENGTH,
    NEW_REFERENCES.APPEAL_LENGTH,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_DATE,
    X_LAST_UPDATED_BY,
    X_LAST_UPDATE_LOGIN
  );

Line: 400


end INSERT_ROW;

Line: 411


  cursor c1 is select
      STREAM_NUM,
      SHOW_CAUSE_LENGTH,
      APPEAL_LENGTH
    from IGS_PR_S_OU_PRG_CAL
    where ROWID = X_ROWID
    for update nowait;

Line: 424


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

Line: 450


procedure UPDATE_ROW (
  X_ROWID in VARCHAR2,
  X_ORG_UNIT_CD in VARCHAR2,
  X_OU_START_DT in DATE,
  X_PRG_CAL_TYPE in VARCHAR2,
  X_STREAM_NUM in NUMBER,
  X_SHOW_CAUSE_LENGTH in NUMBER,
  X_APPEAL_LENGTH in NUMBER,
  X_MODE in VARCHAR2 default 'R'
  ) as
    X_LAST_UPDATE_DATE DATE;

Line: 461


    X_LAST_UPDATED_BY NUMBER;

Line: 462


    X_LAST_UPDATE_LOGIN NUMBER;

Line: 464


  X_LAST_UPDATE_DATE := SYSDATE;

Line: 466


    X_LAST_UPDATED_BY := 1;

Line: 467


    X_LAST_UPDATE_LOGIN := 0;

Line: 469


    X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;

Line: 470


    if X_LAST_UPDATED_BY is NULL then
      X_LAST_UPDATED_BY := -1;

Line: 473


    X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;

Line: 474


    if X_LAST_UPDATE_LOGIN is NULL then
      X_LAST_UPDATE_LOGIN := -1;

Line: 484


     p_action => 'UPDATE',
     x_rowid => X_ROWID,
     x_appeal_length => X_APPEAL_LENGTH,
     x_org_unit_cd => X_ORG_UNIT_CD,
     x_ou_start_dt => X_OU_START_DT,
     x_prg_cal_type => X_PRG_CAL_TYPE,
     x_show_cause_length => X_SHOW_CAUSE_LENGTH,
     x_stream_num => X_STREAM_NUM,
     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: 499


  update IGS_PR_S_OU_PRG_CAL set
    STREAM_NUM = NEW_REFERENCES.STREAM_NUM,
    SHOW_CAUSE_LENGTH = NEW_REFERENCES.SHOW_CAUSE_LENGTH,
    APPEAL_LENGTH = NEW_REFERENCES.APPEAL_LENGTH,
    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: 512


end UPDATE_ROW;

Line: 524


  cursor c1 is select rowid from IGS_PR_S_OU_PRG_CAL
     where ORG_UNIT_CD = X_ORG_UNIT_CD
     and OU_START_DT = X_OU_START_DT
     and PRG_CAL_TYPE = X_PRG_CAL_TYPE
  ;

Line: 534


    INSERT_ROW (
     X_ROWID,
     X_ORG_UNIT_CD,
     X_OU_START_DT,
     X_PRG_CAL_TYPE,
     X_STREAM_NUM,
     X_SHOW_CAUSE_LENGTH,
     X_APPEAL_LENGTH,
     X_MODE);

Line: 546


  UPDATE_ROW (
   X_ROWID,
   X_ORG_UNIT_CD,
   X_OU_START_DT,
   X_PRG_CAL_TYPE,
   X_STREAM_NUM,
   X_SHOW_CAUSE_LENGTH,
   X_APPEAL_LENGTH,
   X_MODE);

Line: 557


procedure DELETE_ROW (
  X_ROWID in VARCHAR2
) as
begin

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

Line: 567


  delete from IGS_PR_S_OU_PRG_CAL
  where ROWID = X_ROWID;

Line: 573


end DELETE_ROW;