DBA Data[Home] [Help]

PACKAGE: APPS.PO_CORE_S

Source


4 
1 PACKAGE PO_CORE_S AUTHID CURRENT_USER AS
2 -- $Header: POXCOC1S.pls 120.16.12020000.2 2013/02/10 20:25:10 vegajula ship $
3 
5 
6 --------------------------------------------------------------------------------
7 -- Public exceptions
8 --------------------------------------------------------------------------------
9 
10 --- Used instead of simply writing a RETURN statement,
11 --- as having RETURNs at multiple places in a procedure
12 --- is poor programming style, making maintenance
13 --- of common exit code difficult.
14 --- See /podev/po/internal/standards/logging/logging.xml for more info.
15 G_EARLY_RETURN_EXC  EXCEPTION;
16 
17 --- Used in situations where the prereqs for the procedure
18 --- are not satisfied, or the parameters that have been
19 --- passed are invalid.
20 G_INVALID_CALL_EXC  EXCEPTION;
21 
22 
23 
24 
25 -----------------------------------------------------------------------------
26 -- Public variables
27 -----------------------------------------------------------------------------
28 
29 
30 -- Document types
31 
32 g_doc_type_REQUISITION           CONSTANT
33    PO_DOCUMENT_TYPES.document_type_code%TYPE
34    := 'REQUISITION'
35    ;
36 g_doc_type_PO                    CONSTANT
37    PO_DOCUMENT_TYPES.document_type_code%TYPE
38    := 'PO'
39    ;
40 g_doc_type_PA                    CONSTANT
41    PO_DOCUMENT_TYPES.document_type_code%TYPE
42    := 'PA'
43    ;
44 g_doc_type_RELEASE               CONSTANT
45    PO_DOCUMENT_TYPES.document_type_code%TYPE
46    := 'RELEASE'
47    ;
48 -- For is_encumbrance_on:
49 g_doc_type_ANY                   CONSTANT
50    PO_DOCUMENT_TYPES.document_type_code%TYPE
51    := 'ANY'
52    ;
53 
54 
55 -- Document levels
56 
57 g_doc_level_HEADER               CONSTANT
58    VARCHAR2(30)
59    := 'HEADER'
60    ;
61 g_doc_level_LINE                 CONSTANT
62    VARCHAR2(30)
63    := 'LINE'
64    ;
65 g_doc_level_SHIPMENT             CONSTANT
66    VARCHAR2(30)
67    := 'SHIPMENT'
68    ;
69 g_doc_level_DISTRIBUTION         CONSTANT
70    VARCHAR2(30)
71    := 'DISTRIBUTION'
72    ;
73 
74 
75 -- Shipment types
76 
77 g_ship_type_STANDARD             CONSTANT
78    PO_LINE_LOCATIONS_ALL.shipment_type%TYPE
79    := 'STANDARD'
80    ;
81 g_ship_type_PLANNED              CONSTANT
82    PO_LINE_LOCATIONS_ALL.shipment_type%TYPE
83    := 'PLANNED'
84    ;
85 g_ship_type_SCHEDULED            CONSTANT
86    PO_LINE_LOCATIONS_ALL.shipment_type%TYPE
87    := 'SCHEDULED'
88    ;
89 g_ship_type_BLANKET               CONSTANT
90    PO_LINE_LOCATIONS_ALL.shipment_type%TYPE
91    := 'BLANKET'
92    ;
93 --<Complex Work R12>: added prepayment ship type
94 g_ship_type_PREPAYMENT           CONSTANT
95    VARCHAR2(25)
96    := 'PREPAYMENT'
97    ;
98 
99 
100 --<Complex Work R12 START>: added payment types
101 --Payment types
102 
103 g_payment_type_MILESTONE         CONSTANT
104    VARCHAR2(30)
105    := 'MILESTONE'
106    ;
107 g_payment_type_RATE              CONSTANT
108    VARCHAR2(30)
109    := 'RATE'
110    ;
111 g_payment_type_LUMPSUM           CONSTANT
112    VARCHAR2(30)
113    := 'LUMPSUM'
114    ;
115 g_payment_type_ADVANCE           CONSTANT
116    VARCHAR2(30)
117    := 'ADVANCE'
118    ;
119 g_payment_type_DELIVERY          CONSTANT
120    VARCHAR2(30)
121    := 'DELIVERY'
122    ;
123 --<Complex Work R12 END>
124 
125 
126 -- Distribution types
127 
128 g_dist_type_STANDARD             CONSTANT
129    VARCHAR2(25)
130    := 'STANDARD'
131    ;
132 g_dist_type_PLANNED              CONSTANT
133    VARCHAR2(25)
134    := 'PLANNED'
135    ;
136 g_dist_type_SCHEDULED            CONSTANT
137    VARCHAR2(25)
138    := 'SCHEDULED'
139    ;
143    ;
140 g_dist_type_BLANKET              CONSTANT
141    VARCHAR2(25)
142    := 'BLANKET'
144 g_dist_type_AGREEMENT            CONSTANT
145    VARCHAR2(25)
146    := 'AGREEMENT'
147    ;
148 --<Complex Work R12>: added prepayment dist type
149 g_dist_type_PREPAYMENT           CONSTANT
150    VARCHAR2(25)
151    := 'PREPAYMENT'
152    ;
153 
154 -- closed codes
155 
156 g_clsd_FINALLY_CLOSED            CONSTANT
157    PO_HEADERS_ALL.closed_code%TYPE
158    := 'FINALLY CLOSED'
159    ;
160 g_clsd_OPEN                      CONSTANT
161    PO_HEADERS_ALL.closed_code%TYPE
162    := 'OPEN'
163    ;
164 
165 -- Common parameter values:
166 
167 g_parameter_YES CONSTANT VARCHAR2(1) := 'Y';
168 g_parameter_NO  CONSTANT VARCHAR2(1) := 'N';
169 
170 -- CLM Controls DB columns
171 g_FPDS_REPORTING_COL CONSTANT VARCHAR2(50) := 'ENABLE_FPDS_REPORTING';
172 g_DEFAULT_DISTRIBUTIONS_COL  CONSTANT VARCHAR2(50) := 'DEFAULT_DISTRIBUTIONS';
173 g_ACRN_COL  CONSTANT VARCHAR2(50) := 'ENABLE_ACRN';
174 g_KO_SIGNATURE_REQD_COL CONSTANT VARCHAR2(50) := 'KO_SIGNATURE_REQD';
175 
176 g_UNDEF_CONT_ACT_COL CONSTANT VARCHAR2(50) := 'ENABLE_UNDEF_CONT_ACT';
177 g_PAYMENT_INSTR_COL  CONSTANT VARCHAR2(50) := 'ENABLE_PAYMENT_INSTR';
178 g_FPDS_APPROV_NOTIF_COL  CONSTANT VARCHAR2(50) := 'FPDS_APPROV_NOTIF_TYPE';
179 g_CONT_DATA_REQS_COL CONSTANT VARCHAR2(50) := 'ENABLE_CDRL';
180 
181 g_EXHIBITS_LINES_COL CONSTANT VARCHAR2(50) := 'ENABLE_EXHIBITS_LINES';
182 g_MIPR_COL  CONSTANT VARCHAR2(50) := 'ENABLE_MIPR';
183 g_MIPR_ACCEPTANCE_COL  CONSTANT VARCHAR2(50) := 'ENABLE_MIPR_ACCEPTANCE';
184 g_BUSS_COORDINATION_COL CONSTANT VARCHAR2(50) := 'ENABLE_SMALL_BUS_COORD';
185 
186 g_POST_AWD_REQ_COL CONSTANT VARCHAR2(50) := 'AUTO_ASSIGN_PAR';
187 g_FPDS_AGENCY_ID_COL  CONSTANT VARCHAR2(50) := 'FPDS_AGENCY_ID';
188 g_FPDSNG_AWD_XML_COL  CONSTANT VARCHAR2(50) := 'FPDSNG_AWD_XML_SOURCE';
189 g_FPDSNG_IDV_XML_COL CONSTANT VARCHAR2(50) := 'FPDSNG_IDV_XML_SOURCE';
190 
191 g_CONTR_OFFICE_AGENCY_COL CONSTANT VARCHAR2(50) := 'CONTR_OFFICE_AGENCY_ID';
192 g_FPDSNG_AWD_MOD_XML_COL  CONSTANT VARCHAR2(50) := 'FPDSNG_AWD_MOD_XML_SOURCE';
193 g_FPDSNG_IDV_MOD_XML_COL  CONSTANT VARCHAR2(50) := 'FPDSNG_IDV_MOD_XML_SOURCE';
194 g_DOC_AMT_THRESHOLD_COL CONSTANT VARCHAR2(50) := 'DOC_AMT_THRESHOLD';
195 
196 -----------------------------------------------------------------------------
197 -- Public procedures
198 -----------------------------------------------------------------------------
199 
200 
201   FUNCTION  get_ussgl_option     RETURN VARCHAR2;
202 
203   FUNCTION  get_gl_set_of_bks_id RETURN VARCHAR2;
204 
205 /* ===========================================================================
206   FUNCTION get_conversion_rate (
207 		x_from_currency		VARCHAR2,
208 		x_to_currency		VARCHAR2,
209 		x_conversion_date	DATE,
210 		x_conversion_type	VARCHAR2 DEFAULT NULL ) RETURN NUMBER;
211 
212   DESCRIPTION    : Returns the rate between the two currencies for a
213                    given conversion date and conversion type.
214   CLIENT/SERVER  : SERVER
215 
216   LIBRARY NAME   :
217 
218   OWNER          : GKELLNER
219 
220   PARAMETERS     :   x_set_of_books_id          Set of Books you are in
221                      x_from_currency		From currency
222                      x_conversion_date	        Conversion date
223                      x_conversion_type	        Conversion type
224 
225   RETURN         :   Rate                       The conversion rate between
226                                                 the two currencies
227 
228   NOTES          : We need this cover on top of gl_currency_api.get_rate
229                    so that we can handle the gl_currency_api.no_rate and
230                    no_data_found exception properly
231 
232 =========================================================================== */
233   FUNCTION get_conversion_rate (
234 		x_set_of_books_id	NUMBER,
235 		x_from_currency		VARCHAR2,
236 		x_conversion_date	DATE,
237 		x_conversion_type	VARCHAR2 DEFAULT NULL) RETURN NUMBER;
238 
239 --  PRAGMA   RESTRICT_REFERENCES(get_conversion_rate,WNDS,WNPS,RNPS);
240 
241 
242   PROCEDURE get_displayed_value (x_lookup_type	IN  VARCHAR2,
243 				 x_lookup_code 	IN  VARCHAR2,
244 				 x_disp_value	OUT NOCOPY VARCHAR2,
245 				 x_description	OUT NOCOPY VARCHAR2,
246 				 x_validate	IN  BOOLEAN);
247 
248   /* Created by Raj Bhakta 10/30/96 */
249 
250   PROCEDURE validate_lookup_info(
251             p_lookup_rec IN OUT NOCOPY RCV_SHIPMENT_HEADER_SV.LookupRecType);
252 
253   PROCEDURE get_displayed_value (x_lookup_type       IN  VARCHAR2,
254                                  x_lookup_code       IN  VARCHAR2,
255 			         x_disp_value	     OUT NOCOPY VARCHAR2,
256 			         x_description       OUT NOCOPY VARCHAR2);
257 
258 
259   PROCEDURE get_displayed_value (x_lookup_type       IN  VARCHAR2,
260                                  x_lookup_code       IN  VARCHAR2,
261 			         x_disp_value	     OUT NOCOPY VARCHAR2);
262 
263 
264   PROCEDURE get_org_sob (x_org_id    OUT NOCOPY NUMBER,
265                          x_org_name  OUT NOCOPY VARCHAR2,
266                          x_sob_id    OUT NOCOPY NUMBER) ;
267 
268   PROCEDURE get_po_parameters (  x_currency_code                 OUT NOCOPY VARCHAR2,
269                                  x_coa_id                        OUT NOCOPY NUMBER,
270                                  x_po_encumberance_flag          OUT NOCOPY VARCHAR2,
271                                  x_req_encumberance_flag         OUT NOCOPY VARCHAR2,
272                                  x_sob_id                        OUT NOCOPY NUMBER,
276                                  x_freight_terms_lookup_code     OUT NOCOPY VARCHAR2,
273                                  x_ship_to_location_id           OUT NOCOPY NUMBER,
274                                  x_bill_to_location_id           OUT NOCOPY NUMBER,
275                                  x_fob_lookup_code               OUT NOCOPY VARCHAR2,
277                                  x_terms_id                      OUT NOCOPY NUMBER,
278                                  x_default_rate_type             OUT NOCOPY VARCHAR2,
279                                  x_taxable_flag                  OUT NOCOPY VARCHAR2,
280                                  x_receiving_flag                OUT NOCOPY VARCHAR2,
281                                  x_enforce_buyer_name_flag       OUT NOCOPY VARCHAR2,
282                                  x_enforce_buyer_auth_flag       OUT NOCOPY VARCHAR2,
283                                  x_line_type_id                  OUT NOCOPY NUMBER,
284                                  x_manual_po_num_type            OUT NOCOPY VARCHAR2,
285                                  x_po_num_code                   OUT NOCOPY VARCHAR2,
286                                  x_price_lookup_code             OUT NOCOPY VARCHAR2,
287                                  x_invoice_close_tolerance       OUT NOCOPY NUMBER,
288                                  x_receive_close_tolerance       OUT NOCOPY NUMBER,
289                                  x_security_structure_id         OUT NOCOPY NUMBER,
290                                  x_expense_accrual_code          OUT NOCOPY VARCHAR2,
291                                  x_inv_org_id                    OUT NOCOPY NUMBER,
292                                  x_rev_sort_ordering             OUT NOCOPY NUMBER,
293                                  x_min_rel_amount                OUT NOCOPY NUMBER,
294                                  x_notify_blanket_flag           OUT NOCOPY VARCHAR2,
295                                  x_budgetary_control_flag        OUT NOCOPY VARCHAR2,
296                                  x_user_defined_req_num_code     OUT NOCOPY VARCHAR2,
297                                  x_rfq_required_flag             OUT NOCOPY VARCHAR2,
298                                  x_manual_req_num_type           OUT NOCOPY VARCHAR2,
299                                  x_enforce_full_lot_qty          OUT NOCOPY VARCHAR2,
300                                  x_disposition_warning_flag      OUT NOCOPY VARCHAR2,
301                                  x_reserve_at_completion_flag    OUT NOCOPY VARCHAR2,
302                                  x_user_defined_rcpt_num_code    OUT NOCOPY VARCHAR2,
303                                  x_manual_rcpt_num_type          OUT NOCOPY VARCHAR2,
304 			         x_use_positions_flag		 OUT NOCOPY VARCHAR2,
305 			         x_default_quote_warning_delay   OUT NOCOPY NUMBER,
306 		  	         x_inspection_required_flag      OUT NOCOPY VARCHAR2,
307 		  	         x_user_defined_quote_num_code   OUT NOCOPY VARCHAR2,
308 		  	         x_manual_quote_num_type	 OUT NOCOPY VARCHAR2,
309 		  	         x_user_defined_rfq_num_code     OUT NOCOPY VARCHAR2,
310 		  	         x_manual_rfq_num_type		 OUT NOCOPY VARCHAR2,
311 				 x_ship_via_lookup_code	         OUT NOCOPY VARCHAR2,
312 				 x_qty_rcv_tolerance		 OUT NOCOPY NUMBER);
313 
314   /* Bug 7518967 : ER Default Acceptance Required Check : Overloading the procedure
315      get_po_parameters to get the default acceptance_required_flag from the table
316      PO_SYSTEM_PARAMETERS_ALL */
317 
318   PROCEDURE get_po_parameters (  x_currency_code                 OUT NOCOPY VARCHAR2,
319                                  x_coa_id                        OUT NOCOPY NUMBER,
320                                  x_po_encumberance_flag          OUT NOCOPY VARCHAR2,
321                                  x_req_encumberance_flag         OUT NOCOPY VARCHAR2,
322                                  x_sob_id                        OUT NOCOPY NUMBER,
323                                  x_ship_to_location_id           OUT NOCOPY NUMBER,
324                                  x_bill_to_location_id           OUT NOCOPY NUMBER,
325                                  x_fob_lookup_code               OUT NOCOPY VARCHAR2,
326                                  x_freight_terms_lookup_code     OUT NOCOPY VARCHAR2,
327                                  x_terms_id                      OUT NOCOPY NUMBER,
328                                  x_default_rate_type             OUT NOCOPY VARCHAR2,
329                                  x_taxable_flag                  OUT NOCOPY VARCHAR2,
330                                  x_receiving_flag                OUT NOCOPY VARCHAR2,
331                                  x_enforce_buyer_name_flag       OUT NOCOPY VARCHAR2,
332                                  x_enforce_buyer_auth_flag       OUT NOCOPY VARCHAR2,
333                                  x_line_type_id                  OUT NOCOPY NUMBER,
334                                  x_manual_po_num_type            OUT NOCOPY VARCHAR2,
335                                  x_po_num_code                   OUT NOCOPY VARCHAR2,
336                                  x_price_lookup_code             OUT NOCOPY VARCHAR2,
337                                  x_invoice_close_tolerance       OUT NOCOPY NUMBER,
338                                  x_receive_close_tolerance       OUT NOCOPY NUMBER,
339                                  x_security_structure_id         OUT NOCOPY NUMBER,
340                                  x_expense_accrual_code          OUT NOCOPY VARCHAR2,
341                                  x_inv_org_id                    OUT NOCOPY NUMBER,
342                                  x_rev_sort_ordering             OUT NOCOPY NUMBER,
343                                  x_min_rel_amount                OUT NOCOPY NUMBER,
344                                  x_notify_blanket_flag           OUT NOCOPY VARCHAR2,
345                                  x_budgetary_control_flag        OUT NOCOPY VARCHAR2,
349                                  x_enforce_full_lot_qty          OUT NOCOPY VARCHAR2,
346                                  x_user_defined_req_num_code     OUT NOCOPY VARCHAR2,
347                                  x_rfq_required_flag             OUT NOCOPY VARCHAR2,
348                                  x_manual_req_num_type           OUT NOCOPY VARCHAR2,
350                                  x_disposition_warning_flag      OUT NOCOPY VARCHAR2,
351                                  x_reserve_at_completion_flag    OUT NOCOPY VARCHAR2,
352                                  x_user_defined_rcpt_num_code    OUT NOCOPY VARCHAR2,
353                                  x_manual_rcpt_num_type          OUT NOCOPY VARCHAR2,
354 			         x_use_positions_flag		 OUT NOCOPY VARCHAR2,
355 			         x_default_quote_warning_delay   OUT NOCOPY NUMBER,
356 		  	         x_inspection_required_flag      OUT NOCOPY VARCHAR2,
357 		  	         x_user_defined_quote_num_code   OUT NOCOPY VARCHAR2,
358 		  	         x_manual_quote_num_type	 OUT NOCOPY VARCHAR2,
359 		  	         x_user_defined_rfq_num_code     OUT NOCOPY VARCHAR2,
360 		  	         x_manual_rfq_num_type		 OUT NOCOPY VARCHAR2,
361 				 x_ship_via_lookup_code	         OUT NOCOPY VARCHAR2,
362 				 x_qty_rcv_tolerance		 OUT NOCOPY NUMBER,
363                                  x_acceptance_required_flag      OUT NOCOPY VARCHAR2);
364 
365 
366   PROCEDURE get_item_category_structure ( x_category_set_id OUT NOCOPY NUMBER,
367                                           x_structure_id    OUT NOCOPY NUMBER ) ;
368 
369   FUNCTION get_product_install_status (x_product_name IN VARCHAR2) RETURN VARCHAR2 ;
370 
371   PROCEDURE get_global_values(x_userid        OUT NOCOPY number,
372                               x_logonid       OUT NOCOPY number,
373                               x_last_upd_date OUT NOCOPY date,
374                               x_current_date  OUT NOCOPY date ) ;
375 
376   PROCEDURE GET_PERIOD_NAME (x_sob_id   IN NUMBER,
377                              x_period  OUT NOCOPY VARCHAR2,
378                              x_gl_date OUT NOCOPY DATE );
379 
380 /*===========================================================================
381   FUNCTION NAME:	get_total
382 
383   DESCRIPTION:          Calculates the total of an object
384 
385   PARAMETERS:
386 
387   Parameter	         IN/OUT	Datatype   Description
388   -------------          ------ ---------- ----------------------------
389   x_object_type		  IN    VARCHAR2   Object Type
390                                            'H' - for PO Header
391                                            'L' - for PO Line
392                                            'B' - for PO Blanket
393                                            'P' - for Po Planned
394                                            'E' - for Requisition Header
395                                            'I' - for Requisition Line
396                                            'C' - for Contract
397                                            'R' - for Release
398 
399   x_object_id    	  IN    NUMBER     Id of the object to be
400                                            totalled
401 
402   x_base_cur_result	  IN    BOOLEAN    Result in Base Currency
403 
404   RETURN VALUE:	   Returns total of the object
405 
406   DESIGN REFERENCES:
407 
408   ALGORITHM:
409 
410   NOTES:
411 
412   OPEN ISSUES:
413 
414   CLOSED ISSUES:
415 
416   CHANGE HISTORY:
417 ===========================================================================*/
418 --IF this function is changed, please investigate the impact on get_archive_total, get_archive_total_for_any_rev as well.--<CONTERMS FPJ>
419 FUNCTION  GET_TOTAL (x_object_type     IN VARCHAR2,
420                      x_object_id       IN NUMBER,
421                      x_base_cur_result IN BOOLEAN) RETURN NUMBER;
422 
423 --pragma restrict_references (get_total, WNDS);
424 
425 FUNCTION  get_total (x_object_type     IN VARCHAR2,
426                      x_object_id       IN NUMBER) RETURN NUMBER;
427 
428 --pragma restrict_references (get_total, WNDS);
429 
430 --<CONTERMS FPJ START>
431 --FUNCTION to get archive total amount when the document is Standard Purchase order
432 --IF GET_TOTAL is changed, please investigate the impact on this function as well.
433 --Please check package bosy for more detailed comments
434 FUNCTION  get_archive_total (p_object_id       IN NUMBER,
435                              p_doc_type        IN VARCHAR2,
436                              p_doc_subtype     IN VARCHAR2,
437                              p_base_cur_result IN VARCHAR2 DEFAULT 'N') RETURN NUMBER;
438 --<CONTERMS FPJ END>
439 
440 
441 --<POC FPJ START>
442 
443 --FUNCTION to get archive total amount for a specified revision when the document is Standard Purchase order
444 --IF GET_TOTAL/GET_ARCHIVE_TOTAL is changed, please investigate the impact on this function as well.
445 --Name: GET_ARCHIVE_TOTAL_FOR_ANY_REV
446 --Pre-reqs:
447 --  None
448 --Modifies:
449 --  None.
450 --Locks:
451 --  None.
452 --Function:
453 --   Returns total amount for any specified revision for Standard Purchase order
454 --Parameters:
455 --IN:
456 --  p_object_id
457 --     PO header id
458 --  p_object_type
459 --  'H' for Standard
460 --  'L' for Standard PO Line
461 --  'S' for Shipment Line
462 --  'R' for Release
463 --  p_doc_type
464 --     The main doc type for PO. Valid values are 'PO', 'RELEASE'
465 --  p_doc_subtype
466 --     The lookup code of the document. Valid values are 'STANDARD', 'BLANKET'
467 --  p_doc_revision
468 --     The Revision of the PO header
469 --  p_base_cur_result
470 --     Whether result should be returned in base currency or transaction currency
474 --       Default 'N'
471 --      Valid Values are
472 --      'Y'- Return result in Base/Functional Currency for the org
473 --      'N'- Return result in Transaction currency in po
475 --Testing:
476 --  None
477 --End of Comments
478 ---------------------------------------------------------------------------
479 
480 FUNCTION  get_archive_total_for_any_rev (p_object_id       IN NUMBER,
481                              p_object_type     IN VARCHAR2,
482                              p_doc_type        IN VARCHAR2,
483                              p_doc_subtype     IN VARCHAR2,
484                              p_doc_revision    IN NUMBER,
485                              p_base_cur_result IN VARCHAR2)
486 RETURN NUMBER;
487 
488 
489 --<POC FPJ END>
490 
491 
492 
493 /*===================================================================================
494 
495     FUNCTION:    get_ga_amount_released                <GA FPI>
496 
497     DESCRIPTION: Gets the total Amount Released for a particular Global Agreement.
498                  That is, sum up the total for all uncancelled Standard PO lines
499                  which reference that Global Agreement.
500 
501 ===================================================================================*/
502 FUNCTION get_ga_amount_released
503 (
504     p_po_header_id             PO_HEADERS_ALL.po_header_id%TYPE,
505     p_convert_to_base          BOOLEAN := FALSE
506 )
507 RETURN NUMBER;
508 
509 
510 /*===================================================================================
511 
512     FUNCTION:    get_ga_line_amount_released                <GA FPI>
513 
514     DESCRIPTION: Gets the total Amount Released for a Global Agreement line.
515                  That is, sum up the total for all uncancelled Standard PO lines
516                  which reference that Global Agreement line.
517 
518 ===================================================================================*/
519 PROCEDURE get_ga_line_amount_released
520 (
521     p_po_line_id             IN       PO_LINES_ALL.po_line_id%TYPE,
522     p_po_header_id           IN       PO_HEADERS_ALL.po_header_id%TYPE,
523     x_quantity_released      OUT NOCOPY      NUMBER,
524     x_amount_released        OUT NOCOPY      NUMBER
525 );
526 
527 /*===================================================================================
528 
529     FUNCTION:    GET_RELEASE_LINE_TOTAL                Bug#3771735
530 
531     DESCRIPTION: Function is being added to get the correct cumulative Amount of all
532 		 shipments of  a  Release which correspond to the same line of a BPA.
533 		 The function will be used during the PDF generation of a Incomplete
534 		 Blanket Release.
535 
536 ===================================================================================*/
537 
538 FUNCTION  GET_RELEASE_LINE_TOTAL
539 (
540 	p_line_id      IN PO_LINES_ALL.PO_LINE_ID%TYPE ,
541 	p_release_id   IN PO_RELEASES_ALL.PO_RELEASE_ID%TYPE
542 ) RETURN NUMBER;
543 
544 
545 -------------------------------------------
546 -- Document id helper procedures
547 -------------------------------------------
548 
549 
550 PROCEDURE get_document_ids(
551    p_doc_type                       IN             VARCHAR2
552 ,  p_doc_level                      IN             VARCHAR2
553 ,  p_doc_level_id_tbl               IN             po_tbl_number
554 ,  x_doc_id_tbl                     OUT NOCOPY     po_tbl_number
555 );
556 
557 
558 PROCEDURE get_line_ids(
559    p_doc_type                       IN             VARCHAR2
560 ,  p_doc_level                      IN             VARCHAR2
561 ,  p_doc_level_id_tbl               IN             po_tbl_number
562 ,  x_line_id_tbl                    OUT NOCOPY     po_tbl_number
563 );
564 
565 -- <Bug 9909408> New overloaded procedure
566 PROCEDURE get_line_ids(
567    p_doc_type                       IN             VARCHAR2
568 ,  p_doc_level                      IN             VARCHAR2
569 ,  p_doc_level_id_tbl               IN             po_tbl_number
570 ,  p_draft_id                       IN             NUMBER
571 ,  x_line_id_tbl                    OUT NOCOPY     po_tbl_number
572 );
573 
574 PROCEDURE get_line_location_ids(
575    p_doc_type                       IN             VARCHAR2
576 ,  p_doc_level                      IN             VARCHAR2
577 ,  p_doc_level_id_tbl               IN             po_tbl_number
578 ,  x_line_location_id_tbl           OUT NOCOPY     po_tbl_number
579 );
580 
581 -- <Bug 9909408> New overloaded procedure
582 PROCEDURE get_line_location_ids(
583    p_doc_type                       IN             VARCHAR2
584 ,  p_doc_level                      IN             VARCHAR2
585 ,  p_doc_level_id_tbl               IN             po_tbl_number
586 ,  p_draft_id                       IN             NUMBER
587 ,  x_line_location_id_tbl           OUT NOCOPY     po_tbl_number
588 );
589 
590 PROCEDURE get_distribution_ids(
591    p_doc_type                       IN             VARCHAR2
592 ,  p_doc_level                      IN             VARCHAR2
593 ,  p_doc_level_id_tbl               IN             po_tbl_number
594 ,  x_distribution_id_tbl            OUT NOCOPY     po_tbl_number
595 );
596 
597 -- <Bug 9909408> New overloaded procedure
598 PROCEDURE get_distribution_ids(
599    p_doc_type                       IN             VARCHAR2
600 ,  p_doc_level                      IN             VARCHAR2
601 ,  p_doc_level_id_tbl               IN             po_tbl_number
602 ,  p_draft_id                       IN             NUMBER
603 ,  x_distribution_id_tbl            OUT NOCOPY     po_tbl_number
604 );
608    p_doc_type                       IN             VARCHAR2
605 
606 --<Complex Work R12 START>
607 PROCEDURE get_dist_ids_from_archive(
609 ,  p_doc_level                      IN             VARCHAR2
610 ,  p_doc_level_id_tbl               IN             po_tbl_number
611 ,  p_doc_revision_num               IN             NUMBER
612 ,  x_distribution_id_tbl            OUT NOCOPY     po_tbl_number
613 ,  x_distribution_rev_num_tbl       OUT NOCOPY     po_tbl_number
614 );
615 --<Complex Work R12 END>
616 
617 FUNCTION is_encumbrance_on(
618    p_doc_type                       IN             VARCHAR2
619 ,  p_org_id                         IN             NUMBER
620 )  RETURN BOOLEAN;
621 
622 
623 FUNCTION get_translated_text                                  -- <SERVICES FPJ>
624 (   p_message_name        IN    VARCHAR2
625 ,   p_token1              IN    VARCHAR2 := NULL
626 ,   p_value1              IN    VARCHAR2 := NULL
627 ,   p_token2              IN    VARCHAR2 := NULL
628 ,   p_value2              IN    VARCHAR2 := NULL
629 ,   p_token3              IN    VARCHAR2 := NULL
630 ,   p_value3              IN    VARCHAR2 := NULL
631 ,   p_token4              IN    VARCHAR2 := NULL
632 ,   p_value4              IN    VARCHAR2 := NULL
633 ,   p_token5              IN    VARCHAR2 := NULL
634 ,   p_value5              IN    VARCHAR2 := NULL
635 ) RETURN VARCHAR2;
636 
637 --<Shared Proc FPJ START>
638 FUNCTION Check_Doc_Number_Unique(p_Segment1 In VARCHAR2,
639                                   p_org_id IN VARCHAR2,
640                                   p_Type_lookup_code IN VARCHAR2)
641 RETURN BOOLEAN;
642 
643 PROCEDURE check_inv_org_in_sob
644 (
645     x_return_status OUT NOCOPY VARCHAR2,
646     p_inv_org_id    IN  NUMBER,
647     p_sob_id        IN  NUMBER,
648     x_in_sob        OUT NOCOPY BOOLEAN
649 );
650 
651 PROCEDURE get_inv_org_ou_id
652 (
653     x_return_status OUT NOCOPY VARCHAR2,
654     p_inv_org_id    IN  NUMBER,
655     x_ou_id         OUT NOCOPY NUMBER
656 );
657 
658 PROCEDURE get_inv_org_sob_id
659 (
660     x_return_status OUT NOCOPY VARCHAR2,
661     p_inv_org_id    IN  NUMBER,
662     x_sob_id        OUT NOCOPY NUMBER
663 );
664 
665 PROCEDURE get_inv_org_info
666 (
667     x_return_status         OUT NOCOPY VARCHAR2,
668     p_inv_org_id            IN  NUMBER,
669     x_business_group_id     OUT NOCOPY NUMBER,
670     x_set_of_books_id       OUT NOCOPY NUMBER,
671     x_chart_of_accounts_id  OUT NOCOPY NUMBER,
672     x_operating_unit_id     OUT NOCOPY NUMBER,
673     x_legal_entity_id       OUT NOCOPY NUMBER
674 );
675 
676 --<Shared Proc FPJ END>
677 
678 PROCEDURE should_display_reserved(
679    p_doc_type                       IN             VARCHAR2
680 ,  p_doc_level                      IN             VARCHAR2
681 ,  p_doc_level_id                   IN             NUMBER
682 ,  x_display_reserved_flag          OUT NOCOPY     VARCHAR2
683 );
684 
685 PROCEDURE is_fully_reserved(
686    p_doc_type                       IN             VARCHAR2
687 ,  p_doc_level                      IN             VARCHAR2
688 ,  p_doc_level_id                   IN             NUMBER
689 ,  x_fully_reserved_flag            OUT NOCOPY     VARCHAR2
690 );
691 
692 PROCEDURE are_any_dists_reserved(
693    p_doc_type                       IN             VARCHAR2
694 ,  p_doc_level                      IN             VARCHAR2
695 ,  p_doc_level_id                   IN             NUMBER
696 ,  x_some_dists_reserved_flag       OUT NOCOPY     VARCHAR2
697 );
698 
699 PROCEDURE get_reserved_lookup(
700    x_displayed_field                  OUT NOCOPY     VARCHAR2
701 );
702 
703 -- Bug 3373453 START
704 PROCEDURE validate_yes_no_param (
705   x_return_status   OUT NOCOPY VARCHAR2,
706   p_parameter_name  IN VARCHAR2,
707   p_parameter_value IN VARCHAR2
708 );
709 -- Bug 3373453 END
710 
711 FUNCTION get_session_gt_nextval
712 RETURN NUMBER
713 ;
714 
715 -- <Doc Manager Rewrite 11.5.11 Start>
716 
717 PROCEDURE get_document_status(
718    p_document_id          IN      VARCHAR2
719 ,  p_document_type        IN      VARCHAR2
720 ,  p_document_subtype     IN      VARCHAR2
721 ,  x_return_status        OUT NOCOPY VARCHAR2
722 ,  x_document_status      OUT NOCOPY VARCHAR2
723 );
724 
725 PROCEDURE get_default_price(
726    p_src_doc_header_id  IN     NUMBER
727 ,  p_src_doc_line_num   IN     NUMBER
728 ,  p_deliver_to_loc_id  IN     NUMBER
729 ,  p_required_currency  IN     VARCHAR2
730 ,  p_required_rate_type IN     VARCHAR2
731 ,  p_quantity           IN     NUMBER
732 ,  p_uom                IN     VARCHAR2
733 ,  x_return_status      OUT NOCOPY  VARCHAR2
734 ,  x_return_uom         OUT NOCOPY  VARCHAR2
735 ,  x_base_price         OUT NOCOPY  NUMBER
736 ,  x_currency_price     OUT NOCOPY  NUMBER
737 ,  x_discount           OUT NOCOPY  NUMBER
738 ,  x_currency_code      OUT NOCOPY  VARCHAR2
739 ,  x_rate_type          OUT NOCOPY  VARCHAR2
740 ,  x_rate_date          OUT NOCOPY  DATE
741 ,  x_rate               OUT NOCOPY  NUMBER
742 );
743 -- <Doc Manager Rewrite 11.5.11 End>
744 
745 -- <HTML Orders R12 Start>
746 FUNCTION flag_to_boolean (
747   p_flag_value IN VARCHAR2
748 ) RETURN BOOLEAN;
749 
750 FUNCTION boolean_to_flag (
751   p_boolean_value IN BOOLEAN
752 ) RETURN VARCHAR2;
753 -- <HTML Orders R12 End>
754 
755 -- <R12 SLA>
756 FUNCTION Check_Federal_Instance (
757    p_org_id  IN    hr_operating_units.organization_id%type
758 ) RETURN VARCHAR2 ;
759 
760 --<R12 SHIKYU>
761 FUNCTION get_outsourced_assembly( p_item_id IN NUMBER,
762 	                          p_ship_to_org_id IN NUMBER ) RETURN NUMBER;
763 
764 --<R12 eTax Integration Start>
765 FUNCTION get_default_legal_entity_id(p_org_id IN NUMBER) RETURN NUMBER;
766 --<R12 eTax Integration End>
767 
768 --<HTML Agreements R12 Start>
769 FUNCTION get_last_update_date_for_doc(p_doc_header_id IN NUMBER) RETURN DATE;
770 --<HTML Agreements R12 End>
771 
772 -- <ACHTML R12 START>
773 FUNCTION is_equal(
774   p_attribute_primary NUMBER,
775   p_attribute_secondary NUMBER
776 ) RETURN BOOLEAN;
777 -- <ACHTML R12 END>
778 
779 -- <ACHTML R12 START>
780 FUNCTION is_equal(
781   p_attribute_primary VARCHAR2,
782   p_attribute_secondary VARCHAR2
783 ) RETURN BOOLEAN;
784 -- <ACHTML R12 END>
785 
786 -- <ACHTML R12 START>
787 FUNCTION is_equal_minutes(
788   p_attribute_primary DATE,
789   p_attribute_secondary DATE
790 ) RETURN BOOLEAN;
791 -- <ACHTML R12 END>
792 
793 --For System Generated Description Project
794 FUNCTION get_last_update_date_for_mod(p_doc_id IN NUMBER) RETURN DATE;
795 
796 FUNCTION get_default_contract_officer(p_user_id IN NUMBER,p_emp_id IN NUMBER) RETURN VARCHAR2;
797 
798 -- <CLM-LnSc START>
799 --Start of Comments
800 --Name: GET_CREATE_DEFAULT_DIST
801 --Function:
802 --  Returns Y if Distributions should be automatically defaulted for the document
803 --  Returns N if:
804 --  a. Document Type is PO
805 --  b. PO is CLM Enabled
806 --  c. Encumbrance is On
807 --  d. Profile 'PO:Default Distributions' is set to 'N'
808 --Parameters:
809 --IN:
810 --  p_org_id
811 --     PO org id
812 --  p_style_id
813 --     PO style id
814 --  p_doc_sub_type
815 --     PO doc Sub Type
816 --End of Comments
817 FUNCTION get_create_default_dist(
818   p_org_id IN NUMBER,
819   p_style_id IN NUMBER,
820   p_doc_sub_type IN VARCHAR) RETURN VARCHAR2;
821 -- <CLM-LnSc END>
822 
823 --Bug 11056822
824 FUNCTION is_email_valid(
825         p_email_address IN VARCHAR2
826 ) RETURN BOOLEAN;
827 
828 --------------------------------------------------------------------------------
829   --Start of Comments
830 
831   --Name: retrieveOptionValue
832 
833   --Function:
834   --  This will retrieve purchasing option value for the given org.
835   --  Introduced this as part of CLM Controls Project
836 
837   --Parameters:
838 
839   --IN:
840   --  p_org_id          NUMBER
841   --  p_option_column   VARCHAR2
842 
843   --End of Comments
844 --------------------------------------------------------------------------------
845 
846 FUNCTION retrieveOptionValue(
847   p_org_id                 IN  NUMBER
848 , p_option_column          IN  VARCHAR2
849 )
850 RETURN VARCHAR2;
851 
852 --------------------------------------------------------------------------------
853   --Start of Comments
854 
855   --Name: fndFunctionTestAsString
856 
857   --Function:
858   --  Wrapper for fnd_function.test
859   --  Created for Protests project
860 
861   --Parameters:
862 
863   --IN:
864   --  functionName      VARCHAR2
865 
866   --End of Comments
867 --------------------------------------------------------------------------------
868 FUNCTION fndFunctionTestAsString(
869   functionName             IN  VARCHAR2
870 )
871 RETURN VARCHAR2;
872 
873 END PO_CORE_S;