DBA Data[Home] [Help]

PACKAGE: APPS.PO_CORE_S

Source


1 PACKAGE PO_CORE_S AS
2 -- $Header: POXCOC1S.pls 120.9.12010000.2 2008/11/11 11:13:26 bisdas ship $
3 
4 
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    ;
140 g_dist_type_BLANKET              CONSTANT
141    VARCHAR2(25)
142    := 'BLANKET'
143    ;
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 -----------------------------------------------------------------------------
171 -- Public procedures
172 -----------------------------------------------------------------------------
173 
174 
175   FUNCTION  get_ussgl_option     RETURN VARCHAR2;
176 
177   FUNCTION  get_gl_set_of_bks_id RETURN VARCHAR2;
178 
179 /* ===========================================================================
180   FUNCTION get_conversion_rate (
181 		x_from_currency		VARCHAR2,
182 		x_to_currency		VARCHAR2,
183 		x_conversion_date	DATE,
184 		x_conversion_type	VARCHAR2 DEFAULT NULL ) RETURN NUMBER;
185 
186   DESCRIPTION    : Returns the rate between the two currencies for a
187                    given conversion date and conversion type.
188   CLIENT/SERVER  : SERVER
189 
190   LIBRARY NAME   :
191 
192   OWNER          : GKELLNER
193 
194   PARAMETERS     :   x_set_of_books_id          Set of Books you are in
195                      x_from_currency		From currency
196                      x_conversion_date	        Conversion date
197                      x_conversion_type	        Conversion type
198 
199   RETURN         :   Rate                       The conversion rate between
200                                                 the two currencies
201 
202   NOTES          : We need this cover on top of gl_currency_api.get_rate
203                    so that we can handle the gl_currency_api.no_rate and
204                    no_data_found exception properly
205 
206 =========================================================================== */
207   FUNCTION get_conversion_rate (
208 		x_set_of_books_id	NUMBER,
209 		x_from_currency		VARCHAR2,
210 		x_conversion_date	DATE,
211 		x_conversion_type	VARCHAR2 DEFAULT NULL) RETURN NUMBER;
212 
213 --  PRAGMA   RESTRICT_REFERENCES(get_conversion_rate,WNDS,WNPS,RNPS);
214 
215 
216   PROCEDURE get_displayed_value (x_lookup_type	IN  VARCHAR2,
217 				 x_lookup_code 	IN  VARCHAR2,
218 				 x_disp_value	OUT NOCOPY VARCHAR2,
219 				 x_description	OUT NOCOPY VARCHAR2,
220 				 x_validate	IN  BOOLEAN);
221 
222   /* Created by Raj Bhakta 10/30/96 */
223 
224   PROCEDURE validate_lookup_info(
225             p_lookup_rec IN OUT NOCOPY RCV_SHIPMENT_HEADER_SV.LookupRecType);
226 
227   PROCEDURE get_displayed_value (x_lookup_type       IN  VARCHAR2,
228                                  x_lookup_code       IN  VARCHAR2,
229 			         x_disp_value	     OUT NOCOPY VARCHAR2,
230 			         x_description       OUT NOCOPY VARCHAR2);
231 
232 
233   PROCEDURE get_displayed_value (x_lookup_type       IN  VARCHAR2,
234                                  x_lookup_code       IN  VARCHAR2,
235 			         x_disp_value	     OUT NOCOPY VARCHAR2);
236 
237 
238   PROCEDURE get_org_sob (x_org_id    OUT NOCOPY NUMBER,
239                          x_org_name  OUT NOCOPY VARCHAR2,
240                          x_sob_id    OUT NOCOPY NUMBER) ;
241 
242   PROCEDURE get_po_parameters (  x_currency_code                 OUT NOCOPY VARCHAR2,
243                                  x_coa_id                        OUT NOCOPY NUMBER,
244                                  x_po_encumberance_flag          OUT NOCOPY VARCHAR2,
245                                  x_req_encumberance_flag         OUT NOCOPY VARCHAR2,
246                                  x_sob_id                        OUT NOCOPY NUMBER,
247                                  x_ship_to_location_id           OUT NOCOPY NUMBER,
248                                  x_bill_to_location_id           OUT NOCOPY NUMBER,
249                                  x_fob_lookup_code               OUT NOCOPY VARCHAR2,
250                                  x_freight_terms_lookup_code     OUT NOCOPY VARCHAR2,
251                                  x_terms_id                      OUT NOCOPY NUMBER,
252                                  x_default_rate_type             OUT NOCOPY VARCHAR2,
253                                  x_taxable_flag                  OUT NOCOPY VARCHAR2,
254                                  x_receiving_flag                OUT NOCOPY VARCHAR2,
255                                  x_enforce_buyer_name_flag       OUT NOCOPY VARCHAR2,
256                                  x_enforce_buyer_auth_flag       OUT NOCOPY VARCHAR2,
257                                  x_line_type_id                  OUT NOCOPY NUMBER,
258                                  x_manual_po_num_type            OUT NOCOPY VARCHAR2,
259                                  x_po_num_code                   OUT NOCOPY VARCHAR2,
260                                  x_price_lookup_code             OUT NOCOPY VARCHAR2,
261                                  x_invoice_close_tolerance       OUT NOCOPY NUMBER,
262                                  x_receive_close_tolerance       OUT NOCOPY NUMBER,
263                                  x_security_structure_id         OUT NOCOPY NUMBER,
264                                  x_expense_accrual_code          OUT NOCOPY VARCHAR2,
265                                  x_inv_org_id                    OUT NOCOPY NUMBER,
266                                  x_rev_sort_ordering             OUT NOCOPY NUMBER,
267                                  x_min_rel_amount                OUT NOCOPY NUMBER,
268                                  x_notify_blanket_flag           OUT NOCOPY VARCHAR2,
269                                  x_budgetary_control_flag        OUT NOCOPY VARCHAR2,
270                                  x_user_defined_req_num_code     OUT NOCOPY VARCHAR2,
271                                  x_rfq_required_flag             OUT NOCOPY VARCHAR2,
272                                  x_manual_req_num_type           OUT NOCOPY VARCHAR2,
273                                  x_enforce_full_lot_qty          OUT NOCOPY VARCHAR2,
274                                  x_disposition_warning_flag      OUT NOCOPY VARCHAR2,
275                                  x_reserve_at_completion_flag    OUT NOCOPY VARCHAR2,
276                                  x_user_defined_rcpt_num_code    OUT NOCOPY VARCHAR2,
277                                  x_manual_rcpt_num_type          OUT NOCOPY VARCHAR2,
278 			         x_use_positions_flag		 OUT NOCOPY VARCHAR2,
279 			         x_default_quote_warning_delay   OUT NOCOPY NUMBER,
280 		  	         x_inspection_required_flag      OUT NOCOPY VARCHAR2,
281 		  	         x_user_defined_quote_num_code   OUT NOCOPY VARCHAR2,
282 		  	         x_manual_quote_num_type	 OUT NOCOPY VARCHAR2,
283 		  	         x_user_defined_rfq_num_code     OUT NOCOPY VARCHAR2,
284 		  	         x_manual_rfq_num_type		 OUT NOCOPY VARCHAR2,
285 				 x_ship_via_lookup_code	         OUT NOCOPY VARCHAR2,
286 				 x_qty_rcv_tolerance		 OUT NOCOPY NUMBER);
287 
288   /* Bug 7518967 : ER Default Acceptance Required Check : Overloading the procedure
289      get_po_parameters to get the default acceptance_required_flag from the table
290      PO_SYSTEM_PARAMETERS_ALL */
291 
292   PROCEDURE get_po_parameters (  x_currency_code                 OUT NOCOPY VARCHAR2,
293                                  x_coa_id                        OUT NOCOPY NUMBER,
294                                  x_po_encumberance_flag          OUT NOCOPY VARCHAR2,
295                                  x_req_encumberance_flag         OUT NOCOPY VARCHAR2,
296                                  x_sob_id                        OUT NOCOPY NUMBER,
297                                  x_ship_to_location_id           OUT NOCOPY NUMBER,
298                                  x_bill_to_location_id           OUT NOCOPY NUMBER,
299                                  x_fob_lookup_code               OUT NOCOPY VARCHAR2,
300                                  x_freight_terms_lookup_code     OUT NOCOPY VARCHAR2,
301                                  x_terms_id                      OUT NOCOPY NUMBER,
302                                  x_default_rate_type             OUT NOCOPY VARCHAR2,
303                                  x_taxable_flag                  OUT NOCOPY VARCHAR2,
304                                  x_receiving_flag                OUT NOCOPY VARCHAR2,
305                                  x_enforce_buyer_name_flag       OUT NOCOPY VARCHAR2,
306                                  x_enforce_buyer_auth_flag       OUT NOCOPY VARCHAR2,
307                                  x_line_type_id                  OUT NOCOPY NUMBER,
308                                  x_manual_po_num_type            OUT NOCOPY VARCHAR2,
309                                  x_po_num_code                   OUT NOCOPY VARCHAR2,
310                                  x_price_lookup_code             OUT NOCOPY VARCHAR2,
311                                  x_invoice_close_tolerance       OUT NOCOPY NUMBER,
312                                  x_receive_close_tolerance       OUT NOCOPY NUMBER,
313                                  x_security_structure_id         OUT NOCOPY NUMBER,
314                                  x_expense_accrual_code          OUT NOCOPY VARCHAR2,
315                                  x_inv_org_id                    OUT NOCOPY NUMBER,
316                                  x_rev_sort_ordering             OUT NOCOPY NUMBER,
317                                  x_min_rel_amount                OUT NOCOPY NUMBER,
318                                  x_notify_blanket_flag           OUT NOCOPY VARCHAR2,
319                                  x_budgetary_control_flag        OUT NOCOPY VARCHAR2,
320                                  x_user_defined_req_num_code     OUT NOCOPY VARCHAR2,
321                                  x_rfq_required_flag             OUT NOCOPY VARCHAR2,
322                                  x_manual_req_num_type           OUT NOCOPY VARCHAR2,
323                                  x_enforce_full_lot_qty          OUT NOCOPY VARCHAR2,
324                                  x_disposition_warning_flag      OUT NOCOPY VARCHAR2,
325                                  x_reserve_at_completion_flag    OUT NOCOPY VARCHAR2,
329 			         x_default_quote_warning_delay   OUT NOCOPY NUMBER,
326                                  x_user_defined_rcpt_num_code    OUT NOCOPY VARCHAR2,
327                                  x_manual_rcpt_num_type          OUT NOCOPY VARCHAR2,
328 			         x_use_positions_flag		 OUT NOCOPY VARCHAR2,
330 		  	         x_inspection_required_flag      OUT NOCOPY VARCHAR2,
331 		  	         x_user_defined_quote_num_code   OUT NOCOPY VARCHAR2,
332 		  	         x_manual_quote_num_type	 OUT NOCOPY VARCHAR2,
333 		  	         x_user_defined_rfq_num_code     OUT NOCOPY VARCHAR2,
334 		  	         x_manual_rfq_num_type		 OUT NOCOPY VARCHAR2,
335 				 x_ship_via_lookup_code	         OUT NOCOPY VARCHAR2,
336 				 x_qty_rcv_tolerance		 OUT NOCOPY NUMBER,
337                                  x_acceptance_required_flag      OUT NOCOPY VARCHAR2);
338 
339 
340   PROCEDURE get_item_category_structure ( x_category_set_id OUT NOCOPY NUMBER,
341                                           x_structure_id    OUT NOCOPY NUMBER ) ;
342 
343   FUNCTION get_product_install_status (x_product_name IN VARCHAR2) RETURN VARCHAR2 ;
344 
345   PROCEDURE get_global_values(x_userid        OUT NOCOPY number,
346                               x_logonid       OUT NOCOPY number,
347                               x_last_upd_date OUT NOCOPY date,
348                               x_current_date  OUT NOCOPY date ) ;
349 
350   PROCEDURE GET_PERIOD_NAME (x_sob_id   IN NUMBER,
351                              x_period  OUT NOCOPY VARCHAR2,
352                              x_gl_date OUT NOCOPY DATE );
353 
354 /*===========================================================================
355   FUNCTION NAME:	get_total
356 
357   DESCRIPTION:          Calculates the total of an object
358 
359   PARAMETERS:
360 
361   Parameter	         IN/OUT	Datatype   Description
362   -------------          ------ ---------- ----------------------------
363   x_object_type		  IN    VARCHAR2   Object Type
364                                            'H' - for PO Header
365                                            'L' - for PO Line
366                                            'B' - for PO Blanket
367                                            'P' - for Po Planned
368                                            'E' - for Requisition Header
369                                            'I' - for Requisition Line
370                                            'C' - for Contract
371                                            'R' - for Release
372 
373   x_object_id    	  IN    NUMBER     Id of the object to be
374                                            totalled
375 
376   x_base_cur_result	  IN    BOOLEAN    Result in Base Currency
377 
378   RETURN VALUE:	   Returns total of the object
379 
380   DESIGN REFERENCES:
381 
382   ALGORITHM:
383 
384   NOTES:
385 
386   OPEN ISSUES:
387 
388   CLOSED ISSUES:
389 
390   CHANGE HISTORY:
391 ===========================================================================*/
392 --IF this function is changed, please investigate the impact on get_archive_total, get_archive_total_for_any_rev as well.--<CONTERMS FPJ>
393 FUNCTION  GET_TOTAL (x_object_type     IN VARCHAR2,
394                      x_object_id       IN NUMBER,
395                      x_base_cur_result IN BOOLEAN) RETURN NUMBER;
396 
397 --pragma restrict_references (get_total, WNDS);
398 
399 FUNCTION  get_total (x_object_type     IN VARCHAR2,
400                      x_object_id       IN NUMBER) RETURN NUMBER;
401 
402 --pragma restrict_references (get_total, WNDS);
403 
404 --<CONTERMS FPJ START>
405 --FUNCTION to get archive total amount when the document is Standard Purchase order
406 --IF GET_TOTAL is changed, please investigate the impact on this function as well.
407 --Please check package bosy for more detailed comments
408 FUNCTION  get_archive_total (p_object_id       IN NUMBER,
409                              p_doc_type        IN VARCHAR2,
410                              p_doc_subtype     IN VARCHAR2,
411                              p_base_cur_result IN VARCHAR2 DEFAULT 'N') RETURN NUMBER;
412 --<CONTERMS FPJ END>
413 
414 
415 --<POC FPJ START>
416 
417 --FUNCTION to get archive total amount for a specified revision when the document is Standard Purchase order
418 --IF GET_TOTAL/GET_ARCHIVE_TOTAL is changed, please investigate the impact on this function as well.
419 --Name: GET_ARCHIVE_TOTAL_FOR_ANY_REV
420 --Pre-reqs:
421 --  None
422 --Modifies:
423 --  None.
424 --Locks:
425 --  None.
426 --Function:
427 --   Returns total amount for any specified revision for Standard Purchase order
428 --Parameters:
429 --IN:
430 --  p_object_id
431 --     PO header id
432 --  p_object_type
433 --  'H' for Standard
434 --  'L' for Standard PO Line
435 --  'S' for Shipment Line
436 --  'R' for Release
437 --  p_doc_type
438 --     The main doc type for PO. Valid values are 'PO', 'RELEASE'
439 --  p_doc_subtype
440 --     The lookup code of the document. Valid values are 'STANDARD', 'BLANKET'
441 --  p_doc_revision
442 --     The Revision of the PO header
443 --  p_base_cur_result
444 --     Whether result should be returned in base currency or transaction currency
445 --      Valid Values are
446 --      'Y'- Return result in Base/Functional Currency for the org
447 --      'N'- Return result in Transaction currency in po
448 --       Default 'N'
449 --Testing:
450 --  None
454 FUNCTION  get_archive_total_for_any_rev (p_object_id       IN NUMBER,
451 --End of Comments
452 ---------------------------------------------------------------------------
453 
455                              p_object_type     IN VARCHAR2,
456                              p_doc_type        IN VARCHAR2,
457                              p_doc_subtype     IN VARCHAR2,
458                              p_doc_revision    IN NUMBER,
459                              p_base_cur_result IN VARCHAR2)
460 RETURN NUMBER;
461 
462 
463 --<POC FPJ END>
464 
465 
466 
467 /*===================================================================================
468 
469     FUNCTION:    get_ga_amount_released                <GA FPI>
470 
471     DESCRIPTION: Gets the total Amount Released for a particular Global Agreement.
472                  That is, sum up the total for all uncancelled Standard PO lines
473                  which reference that Global Agreement.
474 
475 ===================================================================================*/
476 FUNCTION get_ga_amount_released
477 (
478     p_po_header_id             PO_HEADERS_ALL.po_header_id%TYPE,
479     p_convert_to_base          BOOLEAN := FALSE
480 )
481 RETURN NUMBER;
482 
483 
484 /*===================================================================================
485 
486     FUNCTION:    get_ga_line_amount_released                <GA FPI>
487 
488     DESCRIPTION: Gets the total Amount Released for a Global Agreement line.
489                  That is, sum up the total for all uncancelled Standard PO lines
490                  which reference that Global Agreement line.
491 
492 ===================================================================================*/
493 PROCEDURE get_ga_line_amount_released
494 (
495     p_po_line_id             IN       PO_LINES_ALL.po_line_id%TYPE,
496     p_po_header_id           IN       PO_HEADERS_ALL.po_header_id%TYPE,
497     x_quantity_released      OUT NOCOPY      NUMBER,
498     x_amount_released        OUT NOCOPY      NUMBER
499 );
500 
501 /*===================================================================================
502 
503     FUNCTION:    GET_RELEASE_LINE_TOTAL                Bug#3771735
504 
505     DESCRIPTION: Function is being added to get the correct cumulative Amount of all
506 		 shipments of  a  Release which correspond to the same line of a BPA.
507 		 The function will be used during the PDF generation of a Incomplete
508 		 Blanket Release.
509 
510 ===================================================================================*/
511 
512 FUNCTION  GET_RELEASE_LINE_TOTAL
513 (
514 	p_line_id      IN PO_LINES_ALL.PO_LINE_ID%TYPE ,
515 	p_release_id   IN PO_RELEASES_ALL.PO_RELEASE_ID%TYPE
516 ) RETURN NUMBER;
517 
518 
519 -------------------------------------------
520 -- Document id helper procedures
521 -------------------------------------------
522 
523 
524 PROCEDURE get_document_ids(
525    p_doc_type                       IN             VARCHAR2
526 ,  p_doc_level                      IN             VARCHAR2
527 ,  p_doc_level_id_tbl               IN             po_tbl_number
528 ,  x_doc_id_tbl                     OUT NOCOPY     po_tbl_number
529 );
530 
531 
532 PROCEDURE get_line_ids(
533    p_doc_type                       IN             VARCHAR2
534 ,  p_doc_level                      IN             VARCHAR2
535 ,  p_doc_level_id_tbl               IN             po_tbl_number
536 ,  x_line_id_tbl                    OUT NOCOPY     po_tbl_number
537 );
538 
539 
540 PROCEDURE get_line_location_ids(
541    p_doc_type                       IN             VARCHAR2
542 ,  p_doc_level                      IN             VARCHAR2
543 ,  p_doc_level_id_tbl               IN             po_tbl_number
544 ,  x_line_location_id_tbl           OUT NOCOPY     po_tbl_number
545 );
546 
547 
548 PROCEDURE get_distribution_ids(
549    p_doc_type                       IN             VARCHAR2
550 ,  p_doc_level                      IN             VARCHAR2
554 
551 ,  p_doc_level_id_tbl               IN             po_tbl_number
552 ,  x_distribution_id_tbl            OUT NOCOPY     po_tbl_number
553 );
555 --<Complex Work R12 START>
556 PROCEDURE get_dist_ids_from_archive(
557    p_doc_type                       IN             VARCHAR2
558 ,  p_doc_level                      IN             VARCHAR2
559 ,  p_doc_level_id_tbl               IN             po_tbl_number
560 ,  p_doc_revision_num               IN             NUMBER
561 ,  x_distribution_id_tbl            OUT NOCOPY     po_tbl_number
562 ,  x_distribution_rev_num_tbl       OUT NOCOPY     po_tbl_number
563 );
564 --<Complex Work R12 END>
565 
566 FUNCTION is_encumbrance_on(
567    p_doc_type                       IN             VARCHAR2
568 ,  p_org_id                         IN             NUMBER
569 )  RETURN BOOLEAN;
570 
571 
572 FUNCTION get_translated_text                                  -- <SERVICES FPJ>
573 (   p_message_name        IN    VARCHAR2
574 ,   p_token1              IN    VARCHAR2 := NULL
575 ,   p_value1              IN    VARCHAR2 := NULL
576 ,   p_token2              IN    VARCHAR2 := NULL
577 ,   p_value2              IN    VARCHAR2 := NULL
578 ,   p_token3              IN    VARCHAR2 := NULL
579 ,   p_value3              IN    VARCHAR2 := NULL
580 ,   p_token4              IN    VARCHAR2 := NULL
581 ,   p_value4              IN    VARCHAR2 := NULL
582 ,   p_token5              IN    VARCHAR2 := NULL
583 ,   p_value5              IN    VARCHAR2 := NULL
584 ) RETURN VARCHAR2;
585 
586 --<Shared Proc FPJ START>
587 FUNCTION Check_Doc_Number_Unique(p_Segment1 In VARCHAR2,
588                                   p_org_id IN VARCHAR2,
589                                   p_Type_lookup_code IN VARCHAR2)
590 RETURN BOOLEAN;
591 
592 PROCEDURE check_inv_org_in_sob
593 (
594     x_return_status OUT NOCOPY VARCHAR2,
595     p_inv_org_id    IN  NUMBER,
596     p_sob_id        IN  NUMBER,
597     x_in_sob        OUT NOCOPY BOOLEAN
598 );
599 
600 PROCEDURE get_inv_org_ou_id
601 (
602     x_return_status OUT NOCOPY VARCHAR2,
603     p_inv_org_id    IN  NUMBER,
604     x_ou_id         OUT NOCOPY NUMBER
605 );
606 
607 PROCEDURE get_inv_org_sob_id
608 (
609     x_return_status OUT NOCOPY VARCHAR2,
610     p_inv_org_id    IN  NUMBER,
611     x_sob_id        OUT NOCOPY NUMBER
612 );
613 
614 PROCEDURE get_inv_org_info
615 (
616     x_return_status         OUT NOCOPY VARCHAR2,
617     p_inv_org_id            IN  NUMBER,
618     x_business_group_id     OUT NOCOPY NUMBER,
619     x_set_of_books_id       OUT NOCOPY NUMBER,
620     x_chart_of_accounts_id  OUT NOCOPY NUMBER,
621     x_operating_unit_id     OUT NOCOPY NUMBER,
622     x_legal_entity_id       OUT NOCOPY NUMBER
623 );
624 
625 --<Shared Proc FPJ END>
626 
627 PROCEDURE should_display_reserved(
628    p_doc_type                       IN             VARCHAR2
629 ,  p_doc_level                      IN             VARCHAR2
630 ,  p_doc_level_id                   IN             NUMBER
631 ,  x_display_reserved_flag          OUT NOCOPY     VARCHAR2
632 );
633 
634 PROCEDURE is_fully_reserved(
635    p_doc_type                       IN             VARCHAR2
639 );
636 ,  p_doc_level                      IN             VARCHAR2
637 ,  p_doc_level_id                   IN             NUMBER
638 ,  x_fully_reserved_flag            OUT NOCOPY     VARCHAR2
640 
641 PROCEDURE are_any_dists_reserved(
642    p_doc_type                       IN             VARCHAR2
643 ,  p_doc_level                      IN             VARCHAR2
644 ,  p_doc_level_id                   IN             NUMBER
645 ,  x_some_dists_reserved_flag       OUT NOCOPY     VARCHAR2
646 );
647 
648 PROCEDURE get_reserved_lookup(
649    x_displayed_field                  OUT NOCOPY     VARCHAR2
650 );
651 
652 -- Bug 3373453 START
653 PROCEDURE validate_yes_no_param (
654   x_return_status   OUT NOCOPY VARCHAR2,
655   p_parameter_name  IN VARCHAR2,
656   p_parameter_value IN VARCHAR2
657 );
658 -- Bug 3373453 END
659 
660 FUNCTION get_session_gt_nextval
661 RETURN NUMBER
662 ;
663 
664 -- <Doc Manager Rewrite 11.5.11 Start>
665 
666 PROCEDURE get_document_status(
667    p_document_id          IN      VARCHAR2
668 ,  p_document_type        IN      VARCHAR2
669 ,  p_document_subtype     IN      VARCHAR2
670 ,  x_return_status        OUT NOCOPY VARCHAR2
671 ,  x_document_status      OUT NOCOPY VARCHAR2
672 );
673 
674 PROCEDURE get_default_price(
675    p_src_doc_header_id  IN     NUMBER
676 ,  p_src_doc_line_num   IN     NUMBER
677 ,  p_deliver_to_loc_id  IN     NUMBER
678 ,  p_required_currency  IN     VARCHAR2
679 ,  p_required_rate_type IN     VARCHAR2
680 ,  p_quantity           IN     NUMBER
681 ,  p_uom                IN     VARCHAR2
682 ,  x_return_status      OUT NOCOPY  VARCHAR2
683 ,  x_return_uom         OUT NOCOPY  VARCHAR2
684 ,  x_base_price         OUT NOCOPY  NUMBER
685 ,  x_currency_price     OUT NOCOPY  NUMBER
686 ,  x_discount           OUT NOCOPY  NUMBER
687 ,  x_currency_code      OUT NOCOPY  VARCHAR2
688 ,  x_rate_type          OUT NOCOPY  VARCHAR2
689 ,  x_rate_date          OUT NOCOPY  DATE
690 ,  x_rate               OUT NOCOPY  NUMBER
691 );
692 -- <Doc Manager Rewrite 11.5.11 End>
693 
694 -- <HTML Orders R12 Start>
695 FUNCTION flag_to_boolean (
696   p_flag_value IN VARCHAR2
697 ) RETURN BOOLEAN;
698 
699 FUNCTION boolean_to_flag (
700   p_boolean_value IN BOOLEAN
701 ) RETURN VARCHAR2;
702 -- <HTML Orders R12 End>
703 
704 -- <R12 SLA>
705 FUNCTION Check_Federal_Instance (
706    p_org_id  IN    hr_operating_units.organization_id%type
707 ) RETURN VARCHAR2 ;
708 
709 --<R12 SHIKYU>
710 FUNCTION get_outsourced_assembly( p_item_id IN NUMBER,
711 	                          p_ship_to_org_id IN NUMBER ) RETURN NUMBER;
712 
713 --<R12 eTax Integration Start>
714 FUNCTION get_default_legal_entity_id(p_org_id IN NUMBER) RETURN NUMBER;
715 --<R12 eTax Integration End>
716 
717 --<HTML Agreements R12 Start>
718 FUNCTION get_last_update_date_for_doc(p_doc_header_id IN NUMBER) RETURN DATE;
719 --<HTML Agreements R12 End>
720 
721 -- <ACHTML R12 START>
722 FUNCTION is_equal(
723   p_attribute_primary NUMBER,
724   p_attribute_secondary NUMBER
725 ) RETURN BOOLEAN;
726 -- <ACHTML R12 END>
727 
728 -- <ACHTML R12 START>
729 FUNCTION is_equal(
730   p_attribute_primary VARCHAR2,
731   p_attribute_secondary VARCHAR2
732 ) RETURN BOOLEAN;
733 -- <ACHTML R12 END>
734 
735 -- <ACHTML R12 START>
736 FUNCTION is_equal_minutes(
737   p_attribute_primary DATE,
738   p_attribute_secondary DATE
739 ) RETURN BOOLEAN;
740 -- <ACHTML R12 END>
741 
742 END PO_CORE_S;