The following lines contain the word 'select', 'insert', 'update' or 'delete':
Select TEXT
into P_Applsys_Schema
from WF_RESOURCES
where TYPE = 'WFTKN'
and NAME = 'WF_SCHEMA'
and rownum = 1;
sql_stmt := sql_stmt || 'CURSOR C1 is select NAME name ';
Update_Status (cpid, 'Uninitialized');
Select GSM_INTERNAL_STATUS
into Status_code
from fnd_concurrent_processes
where concurrent_process_id = handle;
Update_Status ( Handle, 'Running');
'Handle ' ||to_char(Handle)||': status updated to running');
SELECT PID, SPID, S.AUDSID
INTO p_id, osp_id, s_id
FROM V$PROCESS P, V$SESSION S
WHERE S.AUDSID = USERENV('SESSIONID')
AND P.Addr = S.Paddr
and rownum <= 1; /* Probably not necessary */
* selected here is only important if PCP DB Instance failover is on,
* in which case TWO_TASK is required to match the instance name.
* Thus, the FNDSM TWO_TASK in SQLNET_STRING will be < 17 characters
* and could fit in db_instance column.
*/
select decode(sign(length(sqlnet_string) - 17), -1, sqlnet_string, null)
INTO sqlnet_str
FROM FND_CONCURRENT_PROCESSES
WHERE MANAGER_TYPE = 6
AND UPPER(NODE_NAME) = (select upper(node_name)
from fnd_concurrent_processes
where concurrent_process_id = Handle)
AND PROCESS_STATUS_CODE = 'A';
/* 5867853- Update DB_INSTANCE and SQLNET_STRING for services */
UPDATE FND_CONCURRENT_PROCESSES
set SESSION_ID = s_id,
ORACLE_PROCESS_ID = p_id,
OS_PROCESS_ID = osp_id,
INSTANCE_NUMBER = (Select instance_number from v$instance),
DB_INSTANCE = (Select instance_name from v$instance),
SQLNET_STRING = sqlnet_str,
last_update_date = sysdate,
last_updated_by = 4
where CONCURRENT_PROCESS_ID = Handle;
'Handle ' ||to_char(Handle)||': fnd_concurrent_processes updated');
select Concurrent_Queue_Name, Resource_Consumer_Group, Diagnostic_level
into service_name, que_rcg, diag_level
from Fnd_Concurrent_Queues Q, Fnd_Concurrent_processes P
WHERE Q.Application_ID = P.Queue_Application_ID
And Q.Concurrent_queue_ID = P.Concurrent_Queue_ID
And P.Concurrent_Process_Id = Handle;
Procedure Update_Status:
Handle = CPID
Status is one of: Running, Stopped, Suspended,
Uninitialized (for FND Use only)
-----------------------------------------------------------------------------*/
Procedure Update_Status ( Handle in Number,
Status in Varchar2) is
Status_Code varchar2(1);
Update FND_CONCURRENT_PROCESSES
Set GSM_INTERNAL_STATUS = Status_Code
where CONCURRENT_PROCESS_ID = Handle;
Procedure Update_Status_and_Info:
Handle = CPID
Status is one of: Running, Stopped, Suspended,
Uninitialized (for FND Use only)
Info is for service developer use.
-----------------------------------------------------------------------------*/
Procedure Update_Status_and_Info ( Handle in Number,
Status in Varchar2,
Info in Varchar2) is
Status_Code varchar2(1);
Update FND_CONCURRENT_PROCESSES
Set GSM_INTERNAL_STATUS = Status_Code,
GSM_INTERNAL_INFO = Info
where CONCURRENT_PROCESS_ID = Handle;
Procedure obsolete_Update_Status ( Handle in Number,
Status in Varchar2) is
msg_props dbms_aq.message_properties_t;