[Home] [Help]
PACKAGE: APPS.OKS_SUBSCRIPTION_SCH_PVT
Source
1 Package OKS_SUBSCRIPTION_SCH_PVT AUTHID CURRENT_USER AS
2 /* $Header: OKSSBSHS.pls 120.0 2005/05/25 17:37:15 appldev noship $ */
3
4
5 -- GLOBAL VARIABLES
6 -------------------------------------------------------------------------------
7 G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKS_SUBSCRIPTION_SCH';
8 G_APP_NAME_OKS CONSTANT VARCHAR2(3) := 'OKS';
9 G_APP_NAME_OKC CONSTANT VARCHAR2(3) := 'OKC';
10 -------------------------------------------------------------------------------
11
12
13 -- GLOBAL_MESSAGE_CONSTANTS
14 ---------------------------------------------------------------------------------------------
15 G_TRUE CONSTANT VARCHAR2(1) := OKC_API.G_TRUE;
16 G_FALSE CONSTANT VARCHAR2(1) := OKC_API.G_FALSE;
17 G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
18 G_RET_STS_ERROR CONSTANT VARCHAR2(1) := OKC_API.G_RET_STS_ERROR;
19 G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := OKC_API.G_RET_STS_UNEXP_ERROR;
20 G_UNEXPECTED_ERROR CONSTANT VARCHAR2(30) := 'OKS_CONTRACTS_UNEXPECTED_ERROR';
21 G_SQLERRM_TOKEN CONSTANT VARCHAR2(30) := 'SQLerrm';
22 G_SQLCODE_TOKEN CONSTANT VARCHAR2(30) := 'SQLcode';
23 G_REQUIRED_VALUE CONSTANT VARCHAR2(30):=OKC_API.G_REQUIRED_VALUE;
24 G_COL_NAME_TOKEN CONSTANT VARCHAR2(30):=OKC_API.G_COL_NAME_TOKEN;
25 ---------------------------------------------------------------------------------------------
26 G_EXCEPTION_HALT_VALIDATION EXCEPTION;
27
28
29 TYPE var_Type Is Record
30 (
31 num_item VARCHAR2(5)
32 );
33 Type var_tbl is TABLE of var_Type index by binary_integer;
34
35 TYPE del_type Is Record
36 (
37 Delivery_date date,
38 start_date date,
39 end_date date
40 );
41
42 Type del_tbl is TABLE of del_type index by binary_integer;
43
44 TYPE pattern_type Is Record
45 (
46 yr_pattern Varchar2(500),
47 mth_pattern Varchar2(500),
48 week_pattern Varchar2(500),
49 wday_pattern Varchar2(500),
50 day_pattern Varchar2(500)
51 );
52
53
54 Type pattern_tbl is TABLE of pattern_type index by binary_integer;
55
56
57
58 Procedure Calc_Delivery_date
59 (
60 p_start_dt IN date
61 , p_end_dt IN date
62 , p_offset_dy IN NUMBER
63 , p_freq IN Varchar2
64 , p_pattern_tbl IN pattern_tbl
65 , x_delivery_tbl OUT NOCOPY del_tbl
66 , x_return_status OUT NOCOPY Varchar2
67 );
68
69 FUNCTION GET_WD_DATE(mmyyyy IN VARCHAR2,
70 week IN NUMBER,
71 dow IN NUMBER) RETURN DATE;
72
73
74 end OKS_SUBSCRIPTION_SCH_PVT;