[Home] [Help]
78: -- g_count := g_count +1;
79: -- Not reqd since we are not storing it in pl/sql table anymore.
80: /*
81: FORALL I in g_message_table.first .. g_message_table.last
82: INSERT INTO ams_act_logs(
83: activity_log_id
84: ,last_update_date
85: ,last_updated_by
86: ,creation_date
92: ,log_transaction_id
93: ,log_message_text
94: )
95: VALUES (
96: ams_act_logs_s.NEXTVAL
97: ,g_date(i)
98: ,FND_GLOBAL.User_Id
99: ,g_date(i)
100: ,FND_GLOBAL.User_Id
101: ,FND_GLOBAL.Conc_Login_Id
102: ,1
103: ,g_list_header_id
104: ,'LIST'
105: ,ams_act_logs_transaction_id_s.NEXTVAL
106: ,g_message_table(i)
107: ) ;*/
108: commit;
109: exception
128: open c_get_user_id(p_list_header_id);
129: fetch c_get_user_id into g_user_id;
130: close c_get_user_id;
131:
132: delete from ams_act_logs
133: where arc_act_log_used_by = 'LIST'
134: and act_log_used_by_id = p_list_header_id ;
135:
136: g_list_header_id := p_list_header_id;
165:
166: -- Start of Comments
167: -- NAME --- WRITE_TO_ACT_LOG
168: -- PURPOSE
169: -- writes to the Ams_Act_Logs table.
170: -- NOTES
171: -- HISTORY
172: -- 08/02/1999 tdonohoe created
173: -- gjoby Commented out ams_utility_pvt part
187: if nvl(g_log_level,'HIGH') = 'HIGH' and p_level = 'LOW' then
188: return;
189: end if;
190:
191: INSERT INTO ams_act_logs(
192: activity_log_id
193: ,last_update_date
194: ,last_updated_by
195: ,creation_date
201: ,log_transaction_id
202: ,log_message_text
203: )
204: VALUES (
205: ams_act_logs_s.NEXTVAL
206: ,sysdate
207: ,FND_GLOBAL.User_Id
208: ,sysdate
209: ,FND_GLOBAL.User_Id
210: ,FND_GLOBAL.Conc_Login_Id
211: ,1
212: ,nvl(p_log_used_by_id,g_list_header_id)
213: ,'LIST'
214: ,ams_act_logs_transaction_id_s.NEXTVAL
215: ,p_msg_data
216: ) ;
217: commit;
218:
1082: -------------------------------------------------------------------------------
1083: -- Start of Comments
1084: -- NAME initialize_list
1085: -- PURPOSE
1086: -- 1. Deletes the log information from ams_act_logs
1087: -- 2. Initializes List header (initialize_list_header)
1088: -- 3. deletes list entries (delete_list_entries )
1089: -- CALLED BY.
1090: -- 1. Generate_List.
1110: x_return_status := FND_API.G_RET_STS_SUCCESS;
1111: -----------------------------------------------------------------
1112: --Delete any existing log entries for this list. --
1113: -----------------------------------------------------------------
1114: --DELETE FROM ams_act_logs
1115: --WHERE arc_act_log_used_by = 'LIST'
1116: --AND act_log_used_by_id = p_list_header_rec.list_header_id ;
1117: --write_to_act_log(sql%rowcount||' entries deleted from ams_act_logs table for this list.', 'LIST', g_list_header_id,'LOW');
1118:
1113: -----------------------------------------------------------------
1114: --DELETE FROM ams_act_logs
1115: --WHERE arc_act_log_used_by = 'LIST'
1116: --AND act_log_used_by_id = p_list_header_rec.list_header_id ;
1117: --write_to_act_log(sql%rowcount||' entries deleted from ams_act_logs table for this list.', 'LIST', g_list_header_id,'LOW');
1118:
1119: --------------------------------------------------------------------------
1120: -- Initializes the list header generation date and time as null --
1121: --------------------------------------------------------------------------
7061: l_error_position := '<- start List generate ->';
7062: -----------------------------------------------------------------------------
7063: -- g_list_header_id global variable for this session
7064: -- This eliminates the need for passing variables across procedures
7065: -- Particularly for logging debug messages ams_act_logs
7066: -----------------------------------------------------------------------------
7067:
7068: l_request_id := nvl(FND_GLOBAL.conc_request_id, -1);
7069:
7188: FETCH c_get_dup_fields INTO l_field_column_name, l_count;
7189: CLOSE c_get_dup_fields;
7190:
7191: IF l_count>1 THEN
7192: /*delete from ams_act_logs
7193: where arc_act_log_used_by = 'LIST'
7194: and act_log_used_by_id = p_list_header_id ;*/
7195:
7196:
9703: l_error_position := '<- start List generate ->';
9704: -----------------------------------------------------------------------------
9705: -- g_list_header_id global variable for this session
9706: -- This eliminates the need for passing variables across procedures
9707: -- Particularly for logging debug messages ams_act_logs
9708: -----------------------------------------------------------------------------
9709: g_remote_list := 'N';
9710: g_remote_list_gen := 'N';
9711: g_database_link := ' ';
9802: FETCH c_get_dup_fields INTO l_field_column_name, l_count;
9803: CLOSE c_get_dup_fields;
9804:
9805: IF l_count>1 THEN
9806: /*DELETE FROM ams_act_logs
9807: WHERE arc_act_log_used_by = 'LIST'
9808: AND act_log_used_by_id = p_list_header_id ;*/
9809:
9810: write_to_act_log(