51: dphase,
52: dstatus,
53: message);
54:
55: fnd_file.put_line( fnd_file.output, arp_standard.fnd_message('AR_BPA_PRINT_CHILD_REQ',
56: 'REQ_ID',
57: p_request_id,
58: 'PHASE',
59: dphase,
60: 'STATUS',
61: dstatus));
62:
63: IF ((dphase = 'COMPLETE') and (dstatus = 'NORMAL')) THEN
64: fnd_file.put_line( fnd_file.log, 'child request id: ' || p_request_id || ' complete successfully');
65: ELSE
66: fnd_file.put_line( fnd_file.log, 'child request id: ' || p_request_id || ' did not complete successfully');
67: END IF;
68:
62:
63: IF ((dphase = 'COMPLETE') and (dstatus = 'NORMAL')) THEN
64: fnd_file.put_line( fnd_file.log, 'child request id: ' || p_request_id || ' complete successfully');
65: ELSE
66: fnd_file.put_line( fnd_file.log, 'child request id: ' || p_request_id || ' did not complete successfully');
67: END IF;
68:
69: END;
70:
354: from fnd_languages
355: where installed_flag = 'B';
356:
357: MO_global.init('AR');
358: fnd_file.put_line( fnd_file.log, 'userenv_lang: ' || userenv_lang);
359: fnd_file.put_line( fnd_file.log, 'base_lang: ' || base_lang);
360:
361: /* Read in Parameter Values supplied by user */
362: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Operating Unit',parm_number);
355: where installed_flag = 'B';
356:
357: MO_global.init('AR');
358: fnd_file.put_line( fnd_file.log, 'userenv_lang: ' || userenv_lang);
359: fnd_file.put_line( fnd_file.log, 'base_lang: ' || base_lang);
360:
361: /* Read in Parameter Values supplied by user */
362: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Operating Unit',parm_number);
363: IF retval = -1 THEN
364: p_org_id := NULL;
365: ELSE
366: p_org_id:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
367: END IF;
368: fnd_file.put_line( fnd_file.log, 'p_org_id: ' || p_org_id);
369:
370: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Job Size',parm_number);
371: IF retval = -1 THEN
372: p_job_size:= NULL;
372: p_job_size:= NULL;
373: ELSE
374: p_job_size:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
375: END IF;
376: fnd_file.put_line( fnd_file.log, 'p_job_size: ' || p_job_size);
377:
378: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Customer Number Low',parm_number);
379: IF retval = -1 THEN
380: p_cust_num_low:= NULL;
380: p_cust_num_low:= NULL;
381: ELSE
382: p_cust_num_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
383: END IF;
384: fnd_file.put_line( fnd_file.log, 'p_cust_num_low: ' || p_cust_num_low);
385:
386: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Customer Number High',parm_number);
387: IF retval = -1 THEN
388: p_cust_num_high:= NULL;
388: p_cust_num_high:= NULL;
389: ELSE
390: p_cust_num_high:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
391: END IF;
392: fnd_file.put_line( fnd_file.log, 'p_cust_num_high: ' || p_cust_num_high);
393:
394: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Location Low',parm_number);
395: IF retval = -1 THEN
396: p_bill_site_low:= NULL;
396: p_bill_site_low:= NULL;
397: ELSE
398: p_bill_site_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
399: END IF;
400: fnd_file.put_line( fnd_file.log, 'p_bill_site_low: ' || p_bill_site_low);
401:
402: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Location High',parm_number);
403: IF retval = -1 THEN
404: p_bill_site_high:= NULL;
404: p_bill_site_high:= NULL;
405: ELSE
406: p_bill_site_high:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
407: END IF;
408: fnd_file.put_line( fnd_file.log, 'p_bill_site_high: ' || p_bill_site_high);
409:
410: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Billing Date Low',parm_number);
411: IF retval = -1 THEN
412: p_bill_date_low:= NULL;
412: p_bill_date_low:= NULL;
413: ELSE
414: p_bill_date_low:= fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
415: END IF;
416: fnd_file.put_line( fnd_file.log, 'p_bill_date_low: ' || p_bill_date_low);
417:
418: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Billing Date High',parm_number);
419: IF retval = -1 THEN
420: p_bill_date_high:= NULL;
420: p_bill_date_high:= NULL;
421: ELSE
422: p_bill_date_high:= fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
423: END IF;
424: fnd_file.put_line( fnd_file.log, 'p_bill_date_high: ' || p_bill_date_high);
425:
426: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Billing Number Low',parm_number);
427: IF retval = -1 THEN
428: p_bill_num_low:= NULL;
428: p_bill_num_low:= NULL;
429: ELSE
430: p_bill_num_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
431: END IF;
432: fnd_file.put_line( fnd_file.log, 'p_bill_num_low: ' || p_bill_num_low);
433:
434: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Billing Number High',parm_number);
435: IF retval = -1 THEN
436: p_bill_num_high:= NULL;
436: p_bill_num_high:= NULL;
437: ELSE
438: p_bill_num_high:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
439: END IF;
440: fnd_file.put_line( fnd_file.log, 'p_bill_num_high: ' || p_bill_num_high);
441:
442: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Concurrent Request ID',parm_number);
443: IF retval = -1 THEN
444: p_request_id:= NULL;
444: p_request_id:= NULL;
445: ELSE
446: p_request_id:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
447: END IF;
448: fnd_file.put_line( fnd_file.log, 'p_request_id: ' || p_request_id);
449:
450: select_stmt :=
451: ' select distinct(nvl(rtrim(substr(a_bill.language,1,4)), ''' || base_lang || ''')) language ' || cr ||
452: build_from_clause;
465: p_where) ;
466:
467: sql_stmt := select_stmt || cr || p_where;
468:
469: -- fnd_file.put_line( fnd_file.log, 'The final sql: ' || sql_stmt);
470: ------------------------------------------------
471: -- Parse sql stmts
472: ------------------------------------------------
473:
510: END IF;
511: END LOOP;
512:
513: IF lang_str IS NULL THEN
514: fnd_file.put_line( fnd_file.log, 'No documents matched the input parameters.' );
515: ELSE
516: fnd_file.put_line( fnd_file.log, 'lang_str: ' || lang_str);
517: END IF;
518:
512:
513: IF lang_str IS NULL THEN
514: fnd_file.put_line( fnd_file.log, 'No documents matched the input parameters.' );
515: ELSE
516: fnd_file.put_line( fnd_file.log, 'lang_str: ' || lang_str);
517: END IF;
518:
519: RETURN lang_str;
520:
519: RETURN lang_str;
520:
521: EXCEPTION
522: WHEN OTHERS THEN
523: fnd_file.put_line( fnd_file.log, sql_stmt);
524: RAISE;
525:
526: END PRINT_MLS_FUNCTION ;
527:
579:
580: BEGIN
581:
582: MO_global.init('AR');
583: FND_FILE.PUT_LINE( FND_FILE.LOG, 'AR_BPA_BFPRI_CONC.print_bills(+)' );
584:
585: -- read the variable request_data to check if it is reentering the program
586: req_data := fnd_conc_global.request_data;
587: m_request_id := fnd_global.conc_request_id;
585: -- read the variable request_data to check if it is reentering the program
586: req_data := fnd_conc_global.request_data;
587: m_request_id := fnd_global.conc_request_id;
588:
589: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: ' || 'req_data: '|| req_data );
590: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: ' || 'm_request_id: '|| m_request_id );
591: IF (req_data is null) THEN
592: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: '
593: || 'Entering print master program at the first time');
586: req_data := fnd_conc_global.request_data;
587: m_request_id := fnd_global.conc_request_id;
588:
589: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: ' || 'req_data: '|| req_data );
590: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: ' || 'm_request_id: '|| m_request_id );
591: IF (req_data is null) THEN
592: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: '
593: || 'Entering print master program at the first time');
594: -- read the user env language
588:
589: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: ' || 'req_data: '|| req_data );
590: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: ' || 'm_request_id: '|| m_request_id );
591: IF (req_data is null) THEN
592: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: '
593: || 'Entering print master program at the first time');
594: -- read the user env language
595: select substr(userenv('LANG'),1,4)
596: into userenv_lang
600: into base_lang
601: from fnd_languages
602: where installed_flag = 'B';
603:
604: FND_FILE.PUT_LINE( FND_FILE.LOG, 'userenv_lang: '|| userenv_lang );
605: fnd_file.put_line( fnd_file.log, 'base_lang: ' || base_lang);
606:
607: if p_job_size > 0 then l_job_size := p_job_size; end if;
608: p_bill_date_high := fnd_date.canonical_to_date(p_bill_date_high_in);
601: from fnd_languages
602: where installed_flag = 'B';
603:
604: FND_FILE.PUT_LINE( FND_FILE.LOG, 'userenv_lang: '|| userenv_lang );
605: fnd_file.put_line( fnd_file.log, 'base_lang: ' || base_lang);
606:
607: if p_job_size > 0 then l_job_size := p_job_size; end if;
608: p_bill_date_high := fnd_date.canonical_to_date(p_bill_date_high_in);
609: p_bill_date_low := fnd_date.canonical_to_date(p_bill_date_low_in);
607: if p_job_size > 0 then l_job_size := p_job_size; end if;
608: p_bill_date_high := fnd_date.canonical_to_date(p_bill_date_high_in);
609: p_bill_date_low := fnd_date.canonical_to_date(p_bill_date_low_in);
610: -- print out the input parameters;
611: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_org_id: '|| p_org_id );
612: FND_FILE.PUT_LINE( FND_FILE.LOG, 'l_job_size: '|| l_job_size );
613: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_low: '|| p_cust_num_low );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
608: p_bill_date_high := fnd_date.canonical_to_date(p_bill_date_high_in);
609: p_bill_date_low := fnd_date.canonical_to_date(p_bill_date_low_in);
610: -- print out the input parameters;
611: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_org_id: '|| p_org_id );
612: FND_FILE.PUT_LINE( FND_FILE.LOG, 'l_job_size: '|| l_job_size );
613: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_low: '|| p_cust_num_low );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
609: p_bill_date_low := fnd_date.canonical_to_date(p_bill_date_low_in);
610: -- print out the input parameters;
611: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_org_id: '|| p_org_id );
612: FND_FILE.PUT_LINE( FND_FILE.LOG, 'l_job_size: '|| l_job_size );
613: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_low: '|| p_cust_num_low );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
610: -- print out the input parameters;
611: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_org_id: '|| p_org_id );
612: FND_FILE.PUT_LINE( FND_FILE.LOG, 'l_job_size: '|| l_job_size );
613: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_low: '|| p_cust_num_low );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
611: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_org_id: '|| p_org_id );
612: FND_FILE.PUT_LINE( FND_FILE.LOG, 'l_job_size: '|| l_job_size );
613: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_low: '|| p_cust_num_low );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
612: FND_FILE.PUT_LINE( FND_FILE.LOG, 'l_job_size: '|| l_job_size );
613: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_low: '|| p_cust_num_low );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
620: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_high: '|| p_bill_num_high );
613: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_low: '|| p_cust_num_low );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
620: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_high: '|| p_bill_num_high );
621: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_request_id: '|| p_request_id );
614: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_cust_num_high: '|| p_cust_num_high );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
620: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_high: '|| p_bill_num_high );
621: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_request_id: '|| p_request_id );
622: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_template_id: '|| p_template_id );
615: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_low: '|| p_bill_site_low );
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
620: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_high: '|| p_bill_num_high );
621: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_request_id: '|| p_request_id );
622: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_template_id: '|| p_template_id );
623:
616: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_site_high: '|| p_bill_site_high );
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
620: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_high: '|| p_bill_num_high );
621: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_request_id: '|| p_request_id );
622: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_template_id: '|| p_template_id );
623:
624: -- fetch a list of billing document id based on the inputted parameters
617: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_low: '|| p_bill_date_low );
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
620: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_high: '|| p_bill_num_high );
621: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_request_id: '|| p_request_id );
622: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_template_id: '|| p_template_id );
623:
624: -- fetch a list of billing document id based on the inputted parameters
625: -- and insert into the ar_bpa_print_requests table
618: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_date_high: '|| p_bill_date_high );
619: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_low: '|| p_bill_num_low );
620: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_bill_num_high: '|| p_bill_num_high );
621: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_request_id: '|| p_request_id );
622: FND_FILE.PUT_LINE( FND_FILE.LOG, 'p_template_id: '|| p_template_id );
623:
624: -- fetch a list of billing document id based on the inputted parameters
625: -- and insert into the ar_bpa_print_requests table
626:
645:
646:
647: sql_stmt := insert_stmt || cr || select_stmt || cr || p_where || ')';
648:
649: -- fnd_file.put_line( fnd_file.log, sql_stmt);
650: ------------------------------------------------
651: -- Parse sql stmts
652: ------------------------------------------------
653:
668: p_request_id,
669: sql_stmt_c);
670:
671: inserted_row_counts := dbms_sql.execute(sql_stmt_c);
672: fnd_file.put_line( fnd_file.log, 'inserted row count: ' || inserted_row_counts);
673:
674: IF inserted_row_counts > 0 THEN
675:
676: -- update the last printed date for all the transactions that are being printed.
683:
684: divided_worker_counts := ceil(inserted_row_counts/l_job_size);
685: row_counts_perworker := ceil(inserted_row_counts/divided_worker_counts);
686:
687: fnd_file.put_line( fnd_file.log, 'row count per worker: ' || row_counts_perworker);
688: fnd_file.put_line( fnd_file.log, 'divided worker count: ' || divided_worker_counts);
689:
690: l_worker_id := 1 ;
691: l_low_range := 1 ;
684: divided_worker_counts := ceil(inserted_row_counts/l_job_size);
685: row_counts_perworker := ceil(inserted_row_counts/divided_worker_counts);
686:
687: fnd_file.put_line( fnd_file.log, 'row count per worker: ' || row_counts_perworker);
688: fnd_file.put_line( fnd_file.log, 'divided worker count: ' || divided_worker_counts);
689:
690: l_worker_id := 1 ;
691: l_low_range := 1 ;
692: l_high_range := row_counts_perworker ;
718: 'Y',
719: '',
720: '','', TRUE);
721: IF (l_request_id = 0) THEN
722: fnd_file.put_line( fnd_file.log, 'can not start for worker_id: ' ||no_of_workers );
723: FND_MESSAGE.RETRIEVE(return_stat);
724: fnd_file.put_line( fnd_file.log, 'Error occured : ' ||return_stat );
725: l_fail_count := l_fail_count + 1;
726: ELSE
720: '','', TRUE);
721: IF (l_request_id = 0) THEN
722: fnd_file.put_line( fnd_file.log, 'can not start for worker_id: ' ||no_of_workers );
723: FND_MESSAGE.RETRIEVE(return_stat);
724: fnd_file.put_line( fnd_file.log, 'Error occured : ' ||return_stat );
725: l_fail_count := l_fail_count + 1;
726: ELSE
727: commit;
728: fnd_file.put_line( fnd_file.log, 'child request id: ' ||
724: fnd_file.put_line( fnd_file.log, 'Error occured : ' ||return_stat );
725: l_fail_count := l_fail_count + 1;
726: ELSE
727: commit;
728: fnd_file.put_line( fnd_file.log, 'child request id: ' ||
729: l_request_id || ' started for worker_id: ' ||no_of_workers );
730: END IF;
731: END LOOP;
732:
731: END LOOP;
732:
733: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
734: request_data => to_char(inserted_row_counts));
735: fnd_file.put_line( fnd_file.log, 'The Master program changed status to pause and wait for child processes');
736: ELSE
737: fnd_file.new_line( fnd_file.log,1 );
738: fnd_file.put_line( fnd_file.log, 'No bills matched the input parameters.');
739: fnd_file.new_line( fnd_file.log,1 );
733: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
734: request_data => to_char(inserted_row_counts));
735: fnd_file.put_line( fnd_file.log, 'The Master program changed status to pause and wait for child processes');
736: ELSE
737: fnd_file.new_line( fnd_file.log,1 );
738: fnd_file.put_line( fnd_file.log, 'No bills matched the input parameters.');
739: fnd_file.new_line( fnd_file.log,1 );
740: END IF;
741:
734: request_data => to_char(inserted_row_counts));
735: fnd_file.put_line( fnd_file.log, 'The Master program changed status to pause and wait for child processes');
736: ELSE
737: fnd_file.new_line( fnd_file.log,1 );
738: fnd_file.put_line( fnd_file.log, 'No bills matched the input parameters.');
739: fnd_file.new_line( fnd_file.log,1 );
740: END IF;
741:
742: ELSE
735: fnd_file.put_line( fnd_file.log, 'The Master program changed status to pause and wait for child processes');
736: ELSE
737: fnd_file.new_line( fnd_file.log,1 );
738: fnd_file.put_line( fnd_file.log, 'No bills matched the input parameters.');
739: fnd_file.new_line( fnd_file.log,1 );
740: END IF;
741:
742: ELSE
743:
740: END IF;
741:
742: ELSE
743:
744: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: '
745: || 'Entering print master program at the second time');
746: fnd_file.put_line( fnd_file.output,
747: arp_standard.fnd_message('AR_BPA_PRINT_OUTPUT_HDR',
748: 'NUM_OF_WORKER',
742: ELSE
743:
744: FND_FILE.PUT_LINE( FND_FILE.LOG, 'print_bills: '
745: || 'Entering print master program at the second time');
746: fnd_file.put_line( fnd_file.output,
747: arp_standard.fnd_message('AR_BPA_PRINT_OUTPUT_HDR',
748: 'NUM_OF_WORKER',
749: divided_worker_counts,
750: 'TRX_COUNT',
787: COMMIT;
788:
789: END IF;
790:
791: FND_FILE.PUT_LINE( FND_FILE.LOG, 'AR_BPA_BFPRI_CONC.print_bills(-)' );
792:
793: EXCEPTION
794: WHEN OTHERS THEN
795: RAISE;