[Home] [Help]
232: l_event_key number;
233: i number := 0;
234:
235: cursor fetch_card_program_id is
236: SELECT distinct card_program_id FROM ap_cards_all WHERE request_id = p_request_id;
237:
238: begin
239: if (p_card_program_id is not null and p_card_program_id <> 0) then
240: l_parameter_list := wf_parameter_list_t(
293: l_stmt varchar2(200);
294:
295: cursor ccard is
296: select det.card_id, card.card_program_id -- , det.name, det.employee_number, det.national_identifier
297: from ap_card_details det, ap_cards_all card
298: where det.card_id = card.card_id
299: and card.request_id = l_request_id;
300: begin
301: if ( funcmode = 'RUN' ) then
350: l_card_program_id number;
351:
352: cursor cemp is
353: select c.card_id, max(emp.employee_id) as employee_id
354: from ap_cards_all ca, ap_card_details c, ap_card_emp_candidates emp
355: where c.card_id = emp.card_id
356: and ca.card_id = c.card_id
357: and ca.request_id = l_request_id
358: group by c.card_id
400: begin
401: if ( funcmode = 'RUN' ) then
402: l_request_id := wf_engine.getitemattrnumber(itemtype,itemkey,'REQUEST_ID',false);
403: select count(*) into l_exist from dual
404: where exists (select 1 from ap_cards_all where request_id = l_request_id);
405:
406: if l_exist = 0 then
407: resultout := 'COMPLETE:F';
408: else
442: begin
443: if ( funcmode = 'RUN' ) then
444: l_request_id := wf_engine.getitemattrnumber(itemtype,itemkey,'REQUEST_ID',false);
445: select count(*) into l_exist from dual
446: where exists (select 1 from ap_cards_all where request_id = l_request_id and employee_id is null);
447:
448: if l_exist = 0 then
449: resultout := 'COMPLETE:F';
450: else
542: begin
543: if ( funcmode = 'RUN' ) then
544: l_request_id := wf_engine.getitemattrnumber(itemtype,itemkey,'REQUEST_ID',false);
545: select count(*) into l_count
546: from ap_cards_all
547: where request_id = l_request_id;
548:
549: wf_engine.setitemattrnumber(itemtype,itemkey,'NEW_CARD_COUNT',l_count);
550: