105: if X_LAST_UPDATE_LOGIN is NULL then
106: X_LAST_UPDATE_LOGIN := -1;
107: end if;
108: else
109: FND_MESSAGE.SET_NAME( 'FND', 'SYSTEM-INVALID ARGS');
110: app_exception.raise_exception;
111: end if;
112: insert into GMS_AWARDS (
113: AWARD_ID,
440: begin
441: open c1;
442: fetch c1 into tlinfo;
443: if (c1%notfound) then
444: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
445: app_exception.raise_exception;
446: close c1;
447: return;
448: end if;
659: */
660: ) then
661: null;
662: else
663: fnd_message.set_name('FND', 'FORM_RECORD_CHANGED');
664: app_exception.raise_exception;
665: end if;
666: return;
667: end LOCK_ROW;
760: if X_LAST_UPDATE_LOGIN is NULL then
761: X_LAST_UPDATE_LOGIN := -1;
762: end if;
763: else
764: FND_MESSAGE.SET_NAME('FND', 'SYSTEM-INVALID ARGS');
765: app_exception.raise_exception;
766: end if;
767: update GMS_AWARDS set
768: AWARD_NUMBER = X_AWARD_NUMBER,
883: WHEN OTHERS THEN
884: --'S' for success, 'E' form exception for , and 'U' for Undefine Exception
885: retcode :='U';
886: errbuff := 'Error :'||substr(sqlerrm,1,200);
887: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
888: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_AWARDS_PKG: DELETE_ROW');
889: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
890: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
891: FND_MSG_PUB.add;
884: --'S' for success, 'E' form exception for , and 'U' for Undefine Exception
885: retcode :='U';
886: errbuff := 'Error :'||substr(sqlerrm,1,200);
887: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
888: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_AWARDS_PKG: DELETE_ROW');
889: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
890: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
891: FND_MSG_PUB.add;
892: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
885: retcode :='U';
886: errbuff := 'Error :'||substr(sqlerrm,1,200);
887: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
888: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_AWARDS_PKG: DELETE_ROW');
889: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
890: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
891: FND_MSG_PUB.add;
892: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
893: p_data => errbuff );
886: errbuff := 'Error :'||substr(sqlerrm,1,200);
887: FND_MESSAGE.SET_NAME('GMS','GMS_UNEXPECTED_ERROR');
888: FND_MESSAGE.SET_TOKEN('PROGRAM_NAME','GMS_AWARDS_PKG: DELETE_ROW');
889: FND_MESSAGE.SET_TOKEN('OERRNO',SQLCODE);
890: FND_MESSAGE.SET_TOKEN('OERRM',SQLERRM);
891: FND_MSG_PUB.add;
892: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count,
893: p_data => errbuff );
894: end DELETE_ROW;