DBA Data[Home] [Help]

PACKAGE: APPS.OKL_SID_PVT

Source


1 Package OKL_SID_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKLSSIDS.pls 115.1 2002/03/18 01:12:34 pkm ship        $ */
3   ---------------------------------------------------------------------------
4   -- GLOBAL DATASTRUCTURES
5   ---------------------------------------------------------------------------
6   TYPE sidv_rec_type IS RECORD (
7      id                             NUMBER := OKL_API.G_MISS_NUM
8     ,object_version_number          NUMBER := OKL_API.G_MISS_NUM
9     ,cle_id                         NUMBER := OKL_API.G_MISS_NUM
10     ,fa_cle_id                      NUMBER := OKL_API.G_MISS_NUM
11     ,invoice_number                 OKL_SUPP_INVOICE_DTLS_V.INVOICE_NUMBER%TYPE := OKL_API.G_MISS_CHAR
12     ,date_invoiced                  OKL_SUPP_INVOICE_DTLS_V.DATE_INVOICED%TYPE := OKL_API.G_MISS_DATE
13     ,date_due                       OKL_SUPP_INVOICE_DTLS_V.DATE_DUE%TYPE := OKL_API.G_MISS_DATE
14     ,shipping_address_id1           NUMBER := OKL_API.G_MISS_NUM
15     ,shipping_address_id2           OKL_SUPP_INVOICE_DTLS_V.SHIPPING_ADDRESS_ID2%TYPE := OKL_API.G_MISS_CHAR
16     ,shipping_address_code          OKL_SUPP_INVOICE_DTLS_V.SHIPPING_ADDRESS_CODE%TYPE := OKL_API.G_MISS_CHAR
17     ,attribute_category             OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
18     ,attribute1                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
19     ,attribute2                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
20     ,attribute3                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
21     ,attribute4                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
22     ,attribute5                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
23     ,attribute6                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
24     ,attribute7                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
25     ,attribute8                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
26     ,attribute9                     OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
27     ,attribute10                    OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
28     ,attribute11                    OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
29     ,attribute12                    OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
30     ,attribute13                    OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
31     ,attribute14                    OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
32     ,attribute15                    OKL_SUPP_INVOICE_DTLS_V.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
33     ,created_by                     NUMBER := OKL_API.G_MISS_NUM
34     ,creation_date                  OKL_SUPP_INVOICE_DTLS_V.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
35     ,last_updated_by                NUMBER := OKL_API.G_MISS_NUM
36     ,last_update_date               OKL_SUPP_INVOICE_DTLS_V.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
37     ,last_update_login              NUMBER := OKL_API.G_MISS_NUM);
38   G_MISS_sidv_rec                         sidv_rec_type;
39   TYPE sidv_tbl_type IS TABLE OF sidv_rec_type
40         INDEX BY BINARY_INTEGER;
41   TYPE sid_rec_type IS RECORD (
42      id                             NUMBER := OKL_API.G_MISS_NUM
43     ,object_version_number          NUMBER := OKL_API.G_MISS_NUM
44     ,cle_id                         NUMBER := OKL_API.G_MISS_NUM
45     ,fa_cle_id                      NUMBER := OKL_API.G_MISS_NUM
46     ,invoice_number                 OKL_SUPP_INVOICE_DTLS.INVOICE_NUMBER%TYPE := OKL_API.G_MISS_CHAR
47     ,date_invoiced                  OKL_SUPP_INVOICE_DTLS.DATE_INVOICED%TYPE := OKL_API.G_MISS_DATE
48     ,date_due                       OKL_SUPP_INVOICE_DTLS.DATE_DUE%TYPE := OKL_API.G_MISS_DATE
49     ,shipping_address_id1           NUMBER := OKL_API.G_MISS_NUM
50     ,shipping_address_id2           OKL_SUPP_INVOICE_DTLS.SHIPPING_ADDRESS_ID2%TYPE := OKL_API.G_MISS_CHAR
51     ,shipping_address_code          OKL_SUPP_INVOICE_DTLS.SHIPPING_ADDRESS_CODE%TYPE := OKL_API.G_MISS_CHAR
52     ,attribute_category             OKL_SUPP_INVOICE_DTLS.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
53     ,attribute1                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
54     ,attribute2                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
55     ,attribute3                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
56     ,attribute4                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
57     ,attribute5                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
58     ,attribute6                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
59     ,attribute7                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
60     ,attribute8                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
61     ,attribute9                     OKL_SUPP_INVOICE_DTLS.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
62     ,attribute10                    OKL_SUPP_INVOICE_DTLS.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
63     ,attribute11                    OKL_SUPP_INVOICE_DTLS.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
64     ,attribute12                    OKL_SUPP_INVOICE_DTLS.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
65     ,attribute13                    OKL_SUPP_INVOICE_DTLS.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
66     ,attribute14                    OKL_SUPP_INVOICE_DTLS.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
67     ,attribute15                    OKL_SUPP_INVOICE_DTLS.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
68     ,created_by                     NUMBER := OKL_API.G_MISS_NUM
69     ,creation_date                  OKL_SUPP_INVOICE_DTLS.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
70     ,last_updated_by                NUMBER := OKL_API.G_MISS_NUM
71     ,last_update_date               OKL_SUPP_INVOICE_DTLS.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
72     ,last_update_login              NUMBER := OKL_API.G_MISS_NUM);
73   G_MISS_sid_rec                          sid_rec_type;
74   TYPE sid_tbl_type IS TABLE OF sid_rec_type
75         INDEX BY BINARY_INTEGER;
76   TYPE okl_sidh_rec_type IS RECORD (
77      id                             NUMBER := OKL_API.G_MISS_NUM
78     ,object_version_number          NUMBER := OKL_API.G_MISS_NUM
79     ,major_version                  NUMBER := OKC_API.G_MISS_NUM
80     ,cle_id                         NUMBER := OKL_API.G_MISS_NUM
81     ,fa_cle_id                      NUMBER := OKL_API.G_MISS_NUM
82     ,invoice_number                 OKL_SUPP_INVOICE_DTLS_H.INVOICE_NUMBER%TYPE := OKL_API.G_MISS_CHAR
83     ,date_invoiced                  OKL_SUPP_INVOICE_DTLS_H.DATE_INVOICED%TYPE := OKL_API.G_MISS_DATE
84     ,date_due                       OKL_SUPP_INVOICE_DTLS_H.DATE_DUE%TYPE := OKL_API.G_MISS_DATE
85     ,shipping_address_id1           NUMBER := OKL_API.G_MISS_NUM
86     ,shipping_address_id2           OKL_SUPP_INVOICE_DTLS_H.SHIPPING_ADDRESS_ID2%TYPE := OKL_API.G_MISS_CHAR
87     ,shipping_address_code          OKL_SUPP_INVOICE_DTLS_H.SHIPPING_ADDRESS_CODE%TYPE := OKL_API.G_MISS_CHAR
88     ,attribute_category             OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE_CATEGORY%TYPE := OKL_API.G_MISS_CHAR
89     ,attribute1                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE1%TYPE := OKL_API.G_MISS_CHAR
90     ,attribute2                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE2%TYPE := OKL_API.G_MISS_CHAR
91     ,attribute3                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE3%TYPE := OKL_API.G_MISS_CHAR
92     ,attribute4                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE4%TYPE := OKL_API.G_MISS_CHAR
93     ,attribute5                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE5%TYPE := OKL_API.G_MISS_CHAR
94     ,attribute6                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE6%TYPE := OKL_API.G_MISS_CHAR
95     ,attribute7                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE7%TYPE := OKL_API.G_MISS_CHAR
96     ,attribute8                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE8%TYPE := OKL_API.G_MISS_CHAR
97     ,attribute9                     OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE9%TYPE := OKL_API.G_MISS_CHAR
98     ,attribute10                    OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE10%TYPE := OKL_API.G_MISS_CHAR
99     ,attribute11                    OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE11%TYPE := OKL_API.G_MISS_CHAR
100     ,attribute12                    OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE12%TYPE := OKL_API.G_MISS_CHAR
101     ,attribute13                    OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE13%TYPE := OKL_API.G_MISS_CHAR
102     ,attribute14                    OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE14%TYPE := OKL_API.G_MISS_CHAR
103     ,attribute15                    OKL_SUPP_INVOICE_DTLS_H.ATTRIBUTE15%TYPE := OKL_API.G_MISS_CHAR
104     ,created_by                     NUMBER := OKL_API.G_MISS_NUM
105     ,creation_date                  OKL_SUPP_INVOICE_DTLS_H.CREATION_DATE%TYPE := OKL_API.G_MISS_DATE
106     ,last_updated_by                NUMBER := OKL_API.G_MISS_NUM
107     ,last_update_date               OKL_SUPP_INVOICE_DTLS_H.LAST_UPDATE_DATE%TYPE := OKL_API.G_MISS_DATE
108     ,last_update_login              NUMBER := OKL_API.G_MISS_NUM);
109   g_miss_okl_sidh_rec                okl_sidh_rec_type;
110   TYPE okl_sidh_tbl_type IS TABLE OF okl_sidh_rec_type
111         INDEX BY BINARY_INTEGER;
112 
113   ---------------------------------------------------------------------------
114   -- GLOBAL MESSAGE CONSTANTS
115   ---------------------------------------------------------------------------
116   G_FND_APP                      CONSTANT VARCHAR2(200) := OKL_API.G_FND_APP;
117   G_FORM_UNABLE_TO_RESERVE_REC	CONSTANT VARCHAR2(200) := OKL_API.G_FORM_UNABLE_TO_RESERVE_REC;
118   G_FORM_RECORD_DELETED		CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_DELETED;
119   G_FORM_RECORD_CHANGED		CONSTANT VARCHAR2(200) := OKL_API.G_FORM_RECORD_CHANGED;
120   G_RECORD_LOGICALLY_DELETED	CONSTANT VARCHAR2(200) := OKL_API.G_RECORD_LOGICALLY_DELETED;
121   G_COL_NAME_TOKEN              CONSTANT  VARCHAR2(200) := OKL_API.G_COL_NAME_TOKEN;
122   G_COL_NAME_TOKEN1		CONSTANT VARCHAR2(200) := 'COL_NAME1';
123   G_COL_NAME_TOKEN2		CONSTANT VARCHAR2(200) := 'COL_NAME2';
124   G_PARENT_TABLE_TOKEN		CONSTANT VARCHAR2(200) := OKL_API.G_PARENT_TABLE_TOKEN;
125   G_CHILD_TABLE_TOKEN		CONSTANT VARCHAR2(200) := OKL_API.G_CHILD_TABLE_TOKEN;
126   ---------------------------------------------------------------------------
127   -- GLOBAL VARIABLES
128   ---------------------------------------------------------------------------
129   G_PKG_NAME                     CONSTANT VARCHAR2(200) := 'OKL_SID_PVT';
130   G_APP_NAME                     CONSTANT VARCHAR2(3)   := OKL_API.G_APP_NAME;
131   ---------------------------------------------------------------------------
132   -- Procedures and Functions
133   ---------------------------------------------------------------------------
134 
135   PROCEDURE qc;
136   PROCEDURE change_version;
137   PROCEDURE api_copy;
138   PROCEDURE insert_row(
139     p_api_version                  IN NUMBER,
140     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
141     x_return_status                OUT NOCOPY VARCHAR2,
142     x_msg_count                    OUT NOCOPY NUMBER,
143     x_msg_data                     OUT NOCOPY VARCHAR2,
144     p_sidv_rec                     IN sidv_rec_type,
145     x_sidv_rec                     OUT NOCOPY sidv_rec_type);
146   PROCEDURE insert_row(
147     p_api_version                  IN NUMBER,
148     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
149     x_return_status                OUT NOCOPY VARCHAR2,
150     x_msg_count                    OUT NOCOPY NUMBER,
151     x_msg_data                     OUT NOCOPY VARCHAR2,
152     p_sidv_tbl                     IN sidv_tbl_type,
153     x_sidv_tbl                     OUT NOCOPY sidv_tbl_type);
154   PROCEDURE lock_row(
155     p_api_version                  IN NUMBER,
156     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
157     x_return_status                OUT NOCOPY VARCHAR2,
158     x_msg_count                    OUT NOCOPY NUMBER,
159     x_msg_data                     OUT NOCOPY VARCHAR2,
160     p_sidv_rec                     IN sidv_rec_type);
161   PROCEDURE lock_row(
162     p_api_version                  IN NUMBER,
163     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
164     x_return_status                OUT NOCOPY VARCHAR2,
165     x_msg_count                    OUT NOCOPY NUMBER,
166     x_msg_data                     OUT NOCOPY VARCHAR2,
167     p_sidv_tbl                     IN sidv_tbl_type);
168   PROCEDURE update_row(
169     p_api_version                  IN NUMBER,
170     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
171     x_return_status                OUT NOCOPY VARCHAR2,
172     x_msg_count                    OUT NOCOPY NUMBER,
173     x_msg_data                     OUT NOCOPY VARCHAR2,
174     p_sidv_rec                     IN sidv_rec_type,
175     x_sidv_rec                     OUT NOCOPY sidv_rec_type);
176   PROCEDURE update_row(
177     p_api_version                  IN NUMBER,
178     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
179     x_return_status                OUT NOCOPY VARCHAR2,
180     x_msg_count                    OUT NOCOPY NUMBER,
181     x_msg_data                     OUT NOCOPY VARCHAR2,
182     p_sidv_tbl                     IN sidv_tbl_type,
183     x_sidv_tbl                     OUT NOCOPY sidv_tbl_type);
184   PROCEDURE delete_row(
185     p_api_version                  IN NUMBER,
186     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
187     x_return_status                OUT NOCOPY VARCHAR2,
188     x_msg_count                    OUT NOCOPY NUMBER,
189     x_msg_data                     OUT NOCOPY VARCHAR2,
190     p_sidv_rec                     IN sidv_rec_type);
191   PROCEDURE delete_row(
192     p_api_version                  IN NUMBER,
193     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
194     x_return_status                OUT NOCOPY VARCHAR2,
195     x_msg_count                    OUT NOCOPY NUMBER,
196     x_msg_data                     OUT NOCOPY VARCHAR2,
197     p_sidv_tbl                     IN sidv_tbl_type);
198   PROCEDURE validate_row(
199     p_api_version                  IN NUMBER,
200     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
201     x_return_status                OUT NOCOPY VARCHAR2,
202     x_msg_count                    OUT NOCOPY NUMBER,
203     x_msg_data                     OUT NOCOPY VARCHAR2,
204     p_sidv_rec                     IN sidv_rec_type);
205   PROCEDURE validate_row(
206     p_api_version                  IN NUMBER,
207     p_init_msg_list                IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
208     x_return_status                OUT NOCOPY VARCHAR2,
209     x_msg_count                    OUT NOCOPY NUMBER,
210     x_msg_data                     OUT NOCOPY VARCHAR2,
211     p_sidv_tbl                     IN sidv_tbl_type);
212 
213   FUNCTION create_version(p_chr_id        IN OKC_K_LINES_B.ID%TYPE,
214                            p_major_version IN OKL_SUPP_INVOICE_DTLS_H.MAJOR_VERSION%TYPE)
215   RETURN VARCHAR2;
216   FUNCTION restore_version(p_chr_id        OKC_K_LINES_B.ID%TYPE,
217                             p_major_version OKL_SUPP_INVOICE_DTLS_H.MAJOR_VERSION%TYPE)
218   RETURN VARCHAR2;
219 END OKL_SID_PVT;