[Home] [Help]
PACKAGE BODY: APPS.WMS_PAGE_TEMPLATES_PVT
Source
1 package body WMS_PAGE_TEMPLATES_PVT as
2 /* $Header: WMSPTPVB.pls 115.1 2003/10/31 05:16:07 sthamman noship $ */
3
4 G_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
5
6 PROCEDURE DEBUG(p_message IN VARCHAR2) IS
7 BEGIN
8 inv_log_util.TRACE( P_MESSAGE => P_MESSAGE
9 ,p_module => 'WMS_PAGE_TEMPLATES_PVT'
10 ,p_level => 9
11 );
12 END; -- DEBUG
13
14 PROCEDURE CREATE_TEMPLATE(
15 X_ROWID in out nocopy VARCHAR2,
16 X_PAGE_ID in NUMBER,
17 X_TEMPLATE_ID in NUMBER,
18 X_TEMPLATE_NAME in VARCHAR2,
19 X_CREATING_ORGANIZATION_ID in NUMBER,
20 X_CREATING_ORGANIZATION_CODE in VARCHAR2,
21 X_COMMON_TO_ALL_ORGS in VARCHAR2,
22 X_ENABLED in VARCHAR2,
23 X_DEFAULT_FLAG in VARCHAR2,
24 X_USER_TEMPLATE_NAME in VARCHAR2,
25 X_TEMPLATE_DESCRIPTION in VARCHAR2,
26 X_ATTRIBUTE_CATEGORY in VARCHAR2,
27 X_ATTRIBUTE1 in VARCHAR2,
28 X_ATTRIBUTE2 in VARCHAR2,
29 X_ATTRIBUTE3 in VARCHAR2,
30 X_ATTRIBUTE4 in VARCHAR2,
31 X_ATTRIBUTE5 in VARCHAR2,
32 X_ATTRIBUTE6 in VARCHAR2,
33 X_ATTRIBUTE7 in VARCHAR2,
34 X_ATTRIBUTE8 in VARCHAR2,
35 X_ATTRIBUTE9 in VARCHAR2,
36 X_ATTRIBUTE10 in VARCHAR2,
37 X_ATTRIBUTE11 in VARCHAR2,
38 X_ATTRIBUTE12 in VARCHAR2,
39 X_ATTRIBUTE13 in VARCHAR2,
40 X_ATTRIBUTE14 in VARCHAR2,
41 X_ATTRIBUTE15 in VARCHAR2,
42 X_CREATION_DATE in DATE,
43 X_CREATED_BY in NUMBER,
44 X_LAST_UPDATE_DATE in DATE,
45 X_LAST_UPDATED_BY in NUMBER,
46 X_LAST_UPDATE_LOGIN in NUMBER,
47 X_DEFAULT_FIELDS in varchar2) is
48
49 begin
50
51 WMS_PAGE_TEMPLATES_PKG.INSERT_ROW(
52 X_ROWID => X_ROWID,
53 X_TEMPLATE_ID => X_TEMPLATE_ID,
54 X_ATTRIBUTE_CATEGORY => X_ATTRIBUTE_CATEGORY,
55 X_ATTRIBUTE1 => X_ATTRIBUTE1,
56 X_ATTRIBUTE2 => X_ATTRIBUTE2,
57 X_ATTRIBUTE3 => X_ATTRIBUTE3,
58 X_ATTRIBUTE4 => X_ATTRIBUTE4,
59 X_ATTRIBUTE5 => X_ATTRIBUTE5,
60 X_ATTRIBUTE6 => X_ATTRIBUTE6,
61 X_ATTRIBUTE7 => X_ATTRIBUTE7,
62 X_ATTRIBUTE8 => X_ATTRIBUTE8,
63 X_ATTRIBUTE9 => X_ATTRIBUTE9,
64 X_ATTRIBUTE10 => X_ATTRIBUTE10,
65 X_ATTRIBUTE11 => X_ATTRIBUTE11,
66 X_ATTRIBUTE12 => X_ATTRIBUTE12,
67 X_ATTRIBUTE13 => X_ATTRIBUTE13,
68 X_ATTRIBUTE14 => X_ATTRIBUTE14,
69 X_ATTRIBUTE15 => X_ATTRIBUTE15,
70 X_PAGE_ID => X_PAGE_ID,
71 X_TEMPLATE_NAME => X_TEMPLATE_NAME,
72 X_CREATING_ORGANIZATION_ID => X_CREATING_ORGANIZATION_ID,
73 X_CREATING_ORGANIZATION_CODE => X_CREATING_ORGANIZATION_CODE,
74 X_COMMON_TO_ALL_ORGS => X_COMMON_TO_ALL_ORGS,
75 X_ENABLED => X_ENABLED,
76 X_DEFAULT_FLAG => X_DEFAULT_FLAG,
77 X_USER_TEMPLATE_NAME => X_USER_TEMPLATE_NAME,
78 X_TEMPLATE_DESCRIPTION => X_TEMPLATE_DESCRIPTION,
79 X_CREATION_DATE => X_CREATION_DATE,
80 X_CREATED_BY => X_CREATED_BY,
81 X_LAST_UPDATE_DATE => X_LAST_UPDATE_DATE,
82 X_LAST_UPDATED_BY => X_LAST_UPDATED_BY,
83 X_LAST_UPDATE_LOGIN => X_LAST_UPDATE_LOGIN);
84
85 IF X_DEFAULT_FIELDS = 'Y' THEN
86
87 INSERT INTO WMS_PAGE_TEMPLATE_FIELDS(PAGE_ID,
88 TEMPLATE_ID,
89 FIELD_ID,
90 FIELD_PROPERTY1_VALUE,
91 FIELD_PROPERTY2_VALUE,
92 CREATION_DATE,
93 CREATED_BY,
94 LAST_UPDATE_DATE,
95 LAST_UPDATED_BY,
96 LAST_UPDATE_LOGIN)
97 SELECT PAGE_ID
98 , X_TEMPLATE_ID
99 , FIELD_ID
100 , FIELD_PROPERTY1_DEFAULT_VALUE
101 , FIELD_PROPERTY2_DEFAULT_VALUE
102 , X_CREATION_DATE
103 , X_CREATED_BY
104 , X_LAST_UPDATE_DATE
105 , X_LAST_UPDATED_BY
106 , X_LAST_UPDATE_LOGIN
107 FROM WMS_PAGE_FIELDS_B
108 WHERE (X_PAGE_ID = 1 AND PAGE_ID in (1,2))
109 AND FIELD_IS_CONFIGURABLE = 'Y';
110 END IF;
111
112 end CREATE_TEMPLATE;
113
114 end WMS_PAGE_TEMPLATES_PVT;