1: PACKAGE BODY AME_HELP_API AS
2: /* $Header: ameheapi.pkb 120.0 2005/07/26 06:00:24 mbocutt noship $ */
3:
4:
5: procedure GET_CURRENT_HELP_ROW (
11: (
12: X_CONTEXT in VARCHAR2
13: ) is
14: select ROWID
15: from AME_HELP
16: where context = X_CONTEXT;
17: begin
18:
19: open CSR_GET_CURRENT_HELP (
31: X_FILE_NAME in VARCHAR2)
32: is
33:
34: begin
35: insert into AME_HELP
36: (
37: CONTEXT,
38: FILE_NAME
39: ) values (
47: X_HELP_ROWID in VARCHAR2,
48: X_FILE_NAME in VARCHAR2)
49: is
50: begin
51: update AME_HELP set
52: FILE_NAME = X_FILE_NAME
53: where ROWID = X_HELP_ROWID;
54:
55: end UPDATE_ROW;
58: X_CONTEXT in VARCHAR2,
59: X_FILE_NAME in VARCHAR2
60: ) is
61: begin
62: delete from AME_HELP
63: where CONTEXT = X_CONTEXT
64: and FILE_NAME = X_FILE_NAME;
65:
66: if (sql%notfound) then
97: end if;
98: end;
99: exception
100: when others then
101: ame_util.runtimeException('ame_help_api',
102: 'load_row',
103: sqlcode,
104: sqlerrm);
105: raise;
104: sqlerrm);
105: raise;
106: end LOAD_ROW;
107:
108: END AME_HELP_API;