DBA Data[Home] [Help]

APPS.AP_WEB_RECEIPTS_WF dependencies on FND_FILE

Line 2767: fnd_file.put_line(fnd_file.log, 'p_org_id = :'|| p_org_id || ':');

2763:
2764:
2765: BEGIN
2766:
2767: fnd_file.put_line(fnd_file.log, 'p_org_id = :'|| p_org_id || ':');
2768: fnd_file.put_line(fnd_file.log, 'p_mgr_notify = :'|| p_mgr_notify ||':');
2769:
2770: ------------------------------------------------------------
2771: l_debug_info := 'Process Overdue/Missing Receipts';

Line 2768: fnd_file.put_line(fnd_file.log, 'p_mgr_notify = :'|| p_mgr_notify ||':');

2764:
2765: BEGIN
2766:
2767: fnd_file.put_line(fnd_file.log, 'p_org_id = :'|| p_org_id || ':');
2768: fnd_file.put_line(fnd_file.log, 'p_mgr_notify = :'|| p_mgr_notify ||':');
2769:
2770: ------------------------------------------------------------
2771: l_debug_info := 'Process Overdue/Missing Receipts';
2772: ------------------------------------------------------------

Line 2773: fnd_file.put_line(fnd_file.log, l_debug_info);

2769:
2770: ------------------------------------------------------------
2771: l_debug_info := 'Process Overdue/Missing Receipts';
2772: ------------------------------------------------------------
2773: fnd_file.put_line(fnd_file.log, l_debug_info);
2774: open c_overdue_receipts;
2775: loop
2776:
2777: fetch c_overdue_receipts into l_report_header_id, l_receipts_status,l_image_receipt_status,l_report_submit_date,l_rule_overdue_days,l_image_rule_overdue_days;--, l_receipt_type;

Line 2820: fnd_file.put_line(fnd_file.log, l_debug_info);

2816: END IF;
2817: ------------------------------------------------------------
2818: l_debug_info := 'Raise Overdue Event: '||l_report_header_id;
2819: ------------------------------------------------------------
2820: fnd_file.put_line(fnd_file.log, l_debug_info);
2821:
2822:
2823: end if;
2824:

Line 2860: fnd_file.put_line(fnd_file.log, l_debug_info);

2856: l_event_raised := 'Y';
2857: RaiseMissingEvent(l_report_header_id, C_MISSING_IMG_EVENT_KEY);
2858: END IF;
2859: END IF;
2860: fnd_file.put_line(fnd_file.log, l_debug_info);
2861:
2862: end if;
2863:
2864: end loop;

Line 2870: fnd_file.put_line(fnd_file.log, l_debug_info);

2866:
2867: ------------------------------------------------------------
2868: l_debug_info := 'Commit Events for Overdue/Missing Receipts';
2869: ------------------------------------------------------------
2870: fnd_file.put_line(fnd_file.log, l_debug_info);
2871: COMMIT;
2872:
2873: ------------------------------------------------------------
2874: l_debug_info := 'Audit Overdue/Missing Receipts';

Line 2876: fnd_file.put_line(fnd_file.log, l_debug_info);

2872:
2873: ------------------------------------------------------------
2874: l_debug_info := 'Audit Overdue/Missing Receipts';
2875: ------------------------------------------------------------
2876: fnd_file.put_line(fnd_file.log, l_debug_info);
2877:
2878: open c_audit_list_receipts;
2879: loop
2880:

Line 2887: fnd_file.put_line(fnd_file.log, l_debug_info);

2883:
2884: ------------------------------------------------------------
2885: l_debug_info := 'Adding to Audit List employee: '||l_employee_id||' business group id: '||l_business_group_id||' duration: '||l_duration;
2886: ------------------------------------------------------------
2887: fnd_file.put_line(fnd_file.log, l_debug_info);
2888:
2889: l_emp_rec.business_group_id := l_business_group_id;
2890: l_emp_rec.person_id := l_employee_id;
2891: l_audit_rec.audit_reason_code := 'RECEIPTS_LATE';

Line 2912: fnd_file.put_line(fnd_file.log, l_debug_info);

2908:
2909: ------------------------------------------------------------
2910: l_debug_info := 'Commit Audit for Overdue/Missing Receipts';
2911: ------------------------------------------------------------
2912: fnd_file.put_line(fnd_file.log, l_debug_info);
2913: COMMIT;
2914:
2915: -- Notification to Supervisor
2916: BEGIN

Line 2918: fnd_file.put_line(fnd_file.log, 'Processing Notifications to the management');

2914:
2915: -- Notification to Supervisor
2916: BEGIN
2917: IF (p_mgr_notify = 'Y') THEN
2918: fnd_file.put_line(fnd_file.log, 'Processing Notifications to the management');
2919: open c_supervisor_list;
2920: loop
2921: fetch c_supervisor_list into l_supervisor_id;
2922: exit when c_supervisor_list%NOTFOUND;

Line 2926: fnd_file.put_line(fnd_file.log, 'Create Process ' || l_item_key);

2922: exit when c_supervisor_list%NOTFOUND;
2923:
2924: IF (l_supervisor_id IS NOT NULL) THEN
2925: l_item_key := l_item_key || '-' || l_supervisor_id;
2926: fnd_file.put_line(fnd_file.log, 'Create Process ' || l_item_key);
2927: WF_ENGINE.CreateProcess(l_item_type, l_item_key , 'INFORM_MANAGER_OVERDUE');
2928:
2929:
2930: IF (AP_WEB_EXPENSE_WF.CheckSurrogateManager(l_supervisor_id, l_supervisor_id, p_surrogate_mgr_id)) THEN

Line 2935: fnd_file.put_line(fnd_file.log, 'Sending Notifications to Surrogate Manager ' || l_supName);

2931: WF_DIRECTORY.GetUserName('PER',
2932: p_surrogate_mgr_id,
2933: l_supName,
2934: l_supDisplayName);
2935: fnd_file.put_line(fnd_file.log, 'Sending Notifications to Surrogate Manager ' || l_supName);
2936: ELSE
2937: WF_DIRECTORY.GetUserName('PER',
2938: l_supervisor_id,
2939: l_supName,

Line 2941: fnd_file.put_line(fnd_file.log, 'Sending Notifications to Supervisor ' || l_supName);

2937: WF_DIRECTORY.GetUserName('PER',
2938: l_supervisor_id,
2939: l_supName,
2940: l_supDisplayName);
2941: fnd_file.put_line(fnd_file.log, 'Sending Notifications to Supervisor ' || l_supName);
2942: END IF;
2943: WF_ENGINE.SetItemAttrText(l_item_type,
2944: l_item_key,
2945: 'SUPERVISOR',

Line 2956: fnd_file.put_line(fnd_file.log, 'Start Process ' || l_item_key);

2952: l_item_key,
2953: 'OVERDUE_REQUEST_ID',
2954: FND_GLOBAL.CONC_REQUEST_ID);
2955: WF_ENGINE.StartProcess(l_item_type, l_item_key);
2956: fnd_file.put_line(fnd_file.log, 'Start Process ' || l_item_key);
2957: END IF;
2958: end loop;
2959: fnd_file.put_line(fnd_file.log, 'Done Processing Notifications to the management');
2960: END IF;

Line 2959: fnd_file.put_line(fnd_file.log, 'Done Processing Notifications to the management');

2955: WF_ENGINE.StartProcess(l_item_type, l_item_key);
2956: fnd_file.put_line(fnd_file.log, 'Start Process ' || l_item_key);
2957: END IF;
2958: end loop;
2959: fnd_file.put_line(fnd_file.log, 'Done Processing Notifications to the management');
2960: END IF;
2961: END;
2962:
2963: EXCEPTION