[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: --------------------------------------------------------------------------
6992: l_error_position := '<- start List generate ->';
6993: -----------------------------------------------------------------------------
6994: -- g_list_header_id global variable for this session
6995: -- This eliminates the need for passing variables across procedures
6996: -- Particularly for logging debug messages ams_act_logs
6997: -----------------------------------------------------------------------------
6998:
6999: l_request_id := nvl(FND_GLOBAL.conc_request_id, -1);
7000:
7103: FETCH c_get_dup_fields INTO l_field_column_name, l_count;
7104: CLOSE c_get_dup_fields;
7105:
7106: IF l_count>1 THEN
7107: /*delete from ams_act_logs
7108: where arc_act_log_used_by = 'LIST'
7109: and act_log_used_by_id = p_list_header_id ;*/
7110:
7111:
9602: l_error_position := '<- start List generate ->';
9603: -----------------------------------------------------------------------------
9604: -- g_list_header_id global variable for this session
9605: -- This eliminates the need for passing variables across procedures
9606: -- Particularly for logging debug messages ams_act_logs
9607: -----------------------------------------------------------------------------
9608: g_remote_list := 'N';
9609: g_remote_list_gen := 'N';
9610: g_database_link := ' ';
9701: FETCH c_get_dup_fields INTO l_field_column_name, l_count;
9702: CLOSE c_get_dup_fields;
9703:
9704: IF l_count>1 THEN
9705: /*DELETE FROM ams_act_logs
9706: WHERE arc_act_log_used_by = 'LIST'
9707: AND act_log_used_by_id = p_list_header_id ;*/
9708:
9709: write_to_act_log(