[Home] [Help]
67: Fetch cur_old_ref_values INTO old_references;
68:
69: IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
70:
71: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
72:
73: IGS_GE_MSG_STACK.ADD;
74:
75: Close cur_old_ref_values;
156: old_references.COUNTRY_CD,
157:
158: v_message_name ) = FALSE THEN
159:
160: Fnd_Message.Set_Name('IGS', v_message_name);
161: IGS_GE_MSG_STACK.ADD;
162: App_Exception.Raise_Exception;
163:
164: END IF;
176: new_references.GOVT_COUNTRY_CD,
177:
178: v_message_name ) = FALSE THEN
179:
180: Fnd_Message.Set_Name('IGS', v_message_name);
181: IGS_GE_MSG_STACK.ADD;
182: App_Exception.Raise_Exception;
183:
184: END IF;
212: IF upper(column_name) = 'CLOSED_IND' OR
213: column_name is null Then
214: IF
215: new_references.closed_ind NOT IN ( 'Y' , 'N' ) Then
216: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
217: IGS_GE_MSG_STACK.ADD;
218: App_Exception.Raise_Exception;
219: END IF;
220: END IF;
221:
222: IF upper(column_name) = 'COUNTRY_CD' OR
223: column_name is null Then
224: IF new_references.COUNTRY_CD <> UPPER(new_references.COUNTRY_CD) Then
225: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
226: IGS_GE_MSG_STACK.ADD;
227: App_Exception.Raise_Exception;
228: END IF;
229: END IF;
231: IF upper(column_name) = 'GOVT_COUNTRY_CD' OR
232: column_name is null Then
233: IF new_references.GOVT_COUNTRY_CD<>
234: UPPER(new_references.GOVT_COUNTRY_CD) Then
235: Fnd_Message.Set_Name ('IGS', 'IGS_GE_INVALID_VALUE');
236: IGS_GE_MSG_STACK.ADD;
237: App_Exception.Raise_Exception;
238: END IF;
239: END IF;
255:
256: ELSE
257: IF NOT IGS_PE_GOV_COUNTRYCD_PKG.Get_PK_For_Validation (
258: new_references.GOVT_COUNTRY_CD) THEN
259: Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
260: IGS_GE_MSG_STACK.ADD;
261: App_Exception.Raise_Exception;
262: END IF;
263: END IF;
362: Fetch cur_rowid INTO lv_rowid;
363:
364: IF (cur_rowid%FOUND) THEN
365:
366: Fnd_Message.Set_Name ('IGS', 'IGS_PE_CNC_GCOC_FK');
367: IGS_GE_MSG_STACK.ADD;
368:
369:
370: Close cur_rowid;
447: -- Call all the procedures related to Before Insert.
448: BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );
449: IF Get_PK_For_Validation (
450: new_references.country_cd ) THEN
451: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
452: IGS_GE_MSG_STACK.ADD;
453: App_Exception.Raise_Exception;
454: END IF;
455:
467: Check_Child_Existance; -- if procedure present
468: ELSIF (p_action = 'VALIDATE_INSERT') THEN
469: IF Get_PK_For_Validation (
470: new_references.country_cd ) THEN
471: Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
472: IGS_GE_MSG_STACK.ADD;
473: App_Exception.Raise_Exception;
474: END IF;
475:
556: if X_LAST_UPDATE_LOGIN is NULL then
557: X_LAST_UPDATE_LOGIN := -1;
558: end if;
559: else
560: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
561: IGS_GE_MSG_STACK.ADD;
562: app_exception.raise_exception;
563: end if;
564:
653: begin
654: open c1;
655: fetch c1 into tlinfo;
656: if (c1%notfound) then
657: fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
658:
659: close c1;
660: App_Exception.Raise_Exception;
661: return;
670: AND (X_NOTES is null)))
671: ) then
672: null;
673: else
674: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
675: app_exception.raise_exception;
676: end if;
677: return;
678: end LOCK_ROW;
704: if X_LAST_UPDATE_LOGIN is NULL then
705: X_LAST_UPDATE_LOGIN := -1;
706: end if;
707: else
708: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
709: IGS_GE_MSG_STACK.ADD;
710: app_exception.raise_exception;
711: end if;
712: