1 PACKAGE PO_CONTRACTS_S AUTHID CURRENT_USER AS
2 /* $Header: pocontvs.pls 120.0.12010000.1 2008/09/18 12:20:38 appldev noship $ */
3 /* Declare global variables */
4
5 msgbuf varchar2(200);
6
7 /*===========================================================================
8 FUNCTION NAME: val_contract_amount
9
10 DESCRIPTION: Is used in the podsu.lpc file to determine if a given
11 po can be approved based on the lines of that po
12 being related to a contract with available funds to
13 be approved.
14
15
16 PARAMETERS: X_po_header_id IN NUMBER - The po header id you're
17 attempting to approve
18
19 ALGORITHM: Get each line of the po that you're trying
20 to approve and get the contract number.
21 Then for each line see if the amount
22 on existing po lines for that contract + what
23 you're trying to approve exceeds what's avaiable
24 on the contract.
25
26 NOTES:
27
28 OPEN ISSUES:
29
30 CLOSED ISSUES:
31
32 CHANGE HISTORY:
33 ===========================================================================*/
34
35 FUNCTION val_contract_amount (X_po_header_id IN NUMBER) RETURN NUMBER;
36
37 pragma restrict_references (val_contract_amount,WNDS,RNPS,WNPS);
38
39 PROCEDURE test_val_contract_amount (X_po_header_id IN NUMBER);
40
41 END PO_CONTRACTS_S;
42