[Home] [Help]
3692:
3693: CURSOR L_TEMP_TASK_EREC_CSR IS
3694: SELECT INSTRUCTION_PROCESS_ID, INSTR_TASK_SEQ, TASK_EREC_ID,
3695: TASK_IDENTIFIER, TASK_VALUE, MANUAL_ENTRY, INSTRUCTION_ID
3696: FROM GMO_INSTR_TASK_INSTANCE_T
3697: WHERE
3698: INSTRUCTION_PROCESS_ID = P_INSTRUCTION_PROCESS_ID
3699: AND INSTRUCTION_ID = L_INSTRUCTION_ID
3700: ORDER BY INSTR_TASK_SEQ;
3992: END SEND_INSTANCE_ACKN;
3993:
3994: -- This API is called to send the task acknowledgment
3995: -- It acknowledges the task identifier, value and e-record
3996: -- id into the GMO_INSTR_TASK_INSTANCE_T table
3997:
3998: PROCEDURE SEND_TASK_ACKN
3999: (
4000: P_INSTRUCTION_ID IN NUMBER,
4071: -- Remove all previously entered manual data, and enter the new
4072: -- rows passed in current API call, this will take care of
4073: -- delete task row in case of manual entry
4074:
4075: DELETE FROM GMO_INSTR_TASK_INSTANCE_T
4076: WHERE INSTRUCTION_PROCESS_ID = P_INSTRUCTION_PROCESS_ID
4077: AND INSTRUCTION_ID = P_INSTRUCTION_ID
4078: AND MANUAL_ENTRY = GMO_CONSTANTS_GRP.YES;
4079:
4084: --so we insert the record when either id or erecord is available
4085: IF ( (P_TASK_ERECORD_ID(I) IS NOT NULL)
4086: OR (P_TASK_IDENTIFIER(I) IS NOT NULL)) THEN
4087:
4088: INSERT INTO GMO_INSTR_TASK_INSTANCE_T
4089: (
4090: INSTRUCTION_PROCESS_ID,
4091: INSTRUCTION_ID,
4092: INSTR_TASK_SEQ,
4876: LOOP
4877: FETCH L_INSTR_TASK_CSR INTO L_INSTR_TASK_REC;
4878: EXIT WHEN L_INSTR_TASK_CSR%NOTFOUND;
4879:
4880: INSERT INTO GMO_INSTR_TASK_INSTANCE_T
4881: (
4882: INSTRUCTION_ID,
4883: INSTRUCTION_PROCESS_ID,
4884: INSTR_TASK_SEQ,
6310: (SELECT XMLAGG(XMLELEMENT("TASK_DETAILS",XMLFOREST(TK.TASK_EREC_ID AS TASK_ERECORD_ID,
6311: TK.TASK_IDENTIFIER AS TASK_IDENTIFIER,
6312: TK.TASK_VALUE AS TASK_VALUE)))
6313: FROM
6314: GMO_INSTR_TASK_INSTANCE TK
6315: WHERE TK.INSTRUCTION_ID = INSTR.INSTRUCTION_ID) AS TASKS
6316: )
6317: )
6318: )