APPS.PQP_GB_OMP_EARNINGS dependencies on PQP_GB_OMP_EARNINGS

Line 1: PACKAGE BODY pqp_gb_omp_earnings AS

1: PACKAGE BODY pqp_gb_omp_earnings AS
2: /* $Header: pqpgboae.pkb 115.1 2002/12/03 11:31:20 cchappid noship $ */
3:
4: g_proc_name VARCHAR2(80) := 'pqp_gb_omp_earnings.';
5: l_person_id per_assignments_f.person_id%TYPE;

Line 4: g_proc_name VARCHAR2(80) := 'pqp_gb_omp_earnings.';

1: PACKAGE BODY pqp_gb_omp_earnings AS
2: /* $Header: pqpgboae.pkb 115.1 2002/12/03 11:31:20 cchappid noship $ */
3:
4: g_proc_name VARCHAR2(80) := 'pqp_gb_omp_earnings.';
5: l_person_id per_assignments_f.person_id%TYPE;
6:
7: /*========================================================================
8: * CALCULATE_SMP_AVERAGE_EARNINGS

Line 46: p_error_message := 'Error in pqp_gb_omp_earnings:Person Id not'||

42: OPEN csr_person_id ( p_assignment_id => p_assignment_id ) ;
43: FETCH csr_person_id INTO l_person_id ;
44: IF csr_person_id%NOTFOUND THEN
45: CLOSE csr_person_id ;
46: p_error_message := 'Error in pqp_gb_omp_earnings:Person Id not'||
47: ' found for Assignment:'||p_assignment_id;
48: RETURN -1;
49: END IF ;
50: CLOSE csr_person_id ;

Line 72: p_error_message := 'Error in pqp_gb_omp_earnings:Average Earnings'||

68: IF l_smp_average_earnings >= 0 THEN
69: p_average_earnings := l_smp_average_earnings;
70: RETURN 0;
71: ELSE
72: p_error_message := 'Error in pqp_gb_omp_earnings:Average Earnings'||
73: ' calculated was less than zero';
74: RETURN -1;
75: END IF;
76:

Line 86: END pqp_gb_omp_earnings;

82: END IF;
83:
84: END calculate_smp_average_earnings;
85:
86: END pqp_gb_omp_earnings;
87: