5: | Global Structure Data Types |
6: * ======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAX_TAXWARE_REV';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
6: * ======================================================================*/
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAX_TAXWARE_REV';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7:
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAX_TAXWARE_REV';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
8: G_PKG_NAME CONSTANT VARCHAR2(30) := 'ZX_TAX_TAXWARE_REV';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_TAX_TAXWARE_REV.';
9: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_TAX_TAXWARE_REV.';
17: g_string varchar2(200);
10: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_TAX_TAXWARE_REV.';
17: g_string varchar2(200);
18:
11: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
12: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
13: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
14: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
15: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
16: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_TAX_TAXWARE_REV.';
17: g_string varchar2(200);
18:
19: /*------------------------
43: FUNCTION Get_Release RETURN VARCHAR2 IS
44: BEGIN
45:
46: IF (g_level_procedure >= g_current_runtime_level ) THEN
47: FND_LOG.STRING(g_level_procedure,
48: 'ZX.PL/SQL.ZX_TAX_TAXWARE_REV.GET_RELEASE',
49: 'ZX_TAX_TAXWARE_REV.GET_RELEASE(+)');
50: END IF;
51:
49: 'ZX_TAX_TAXWARE_REV.GET_RELEASE(+)');
50: END IF;
51:
52: IF ( g_level_statement >= g_current_runtime_level) THEN
53: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
54: 'Checking Current release=='||pg_release_number);
55:
56: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
57: 'Major.Minor=='||pg_comp_rel_num_major||'.'||pg_comp_rel_num_minor_high);
52: IF ( g_level_statement >= g_current_runtime_level) THEN
53: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
54: 'Checking Current release=='||pg_release_number);
55:
56: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
57: 'Major.Minor=='||pg_comp_rel_num_major||'.'||pg_comp_rel_num_minor_high);
58: END IF;
59:
60:
69: EXCEPTION
70: WHEN OTHERS THEN
71:
72: IF ( g_level_exception >= g_current_runtime_level) THEN
73: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
74: 'Version Error: '||to_char(SQLCODE)||SQLERRM);
75: END IF;
76: --x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
77: g_string :='Not compaitable to TAXWARE Release';
80: END;
81: end if;
82:
83: IF ( g_level_statement >= g_current_runtime_level) THEN
84: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
85: 'major: '||substrb(pg_release_number, 1,instrb(pg_release_number, '.')-1));
86:
87: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
88: 'minor: '||substrb(pg_release_number, instrb(pg_release_number,'.')+1,1));
83: IF ( g_level_statement >= g_current_runtime_level) THEN
84: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
85: 'major: '||substrb(pg_release_number, 1,instrb(pg_release_number, '.')-1));
86:
87: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
88: 'minor: '||substrb(pg_release_number, instrb(pg_release_number,'.')+1,1));
89: END IF;
90:
91:
93: instrb(pg_release_number, '.')-1)) <> pg_comp_rel_num_major THEN
94:
95: pg_compatible_release := FALSE;
96: IF ( g_level_exception >= g_current_runtime_level) THEN
97: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
98: 'Version Error: '||to_char(SQLCODE)||SQLERRM);
99: END IF;
100: --x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: g_string :='Release number of Taxware SALES/USE TAX SYSTEM is '||
116: THEN
117: pg_compatible_release := FALSE;
118:
119: IF ( g_level_exception >= g_current_runtime_level) THEN
120: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
121: 'Version Error: '||to_char(SQLCODE)||SQLERRM);
122: END IF;
123: --x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
124: g_string :='Release number of Taxware SALES/USE TAX SYSTEM is '||
141:
142: return('0');
143:
144: IF ( g_level_statement >= g_current_runtime_level) THEN
145: FND_LOG.STRING(g_level_statement,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
146: 'ZX_TAX_TAXWARE_REV.GET_RELEASE(TRUE)-');
147: END IF;
148:
149: EXCEPTION
148:
149: EXCEPTION
150: WHEN OTHERS THEN
151: IF ( g_level_exception >= g_current_runtime_level) THEN
152: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
153: 'TAXWARE is not installed.');
154:
155: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
156: 'SQLERRM: '||SQLERRM);
151: IF ( g_level_exception >= g_current_runtime_level) THEN
152: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
153: 'TAXWARE is not installed.');
154:
155: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
156: 'SQLERRM: '||SQLERRM);
157:
158: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
159: 'ARP_TAX_TAXWARE_REV.GET_RELEASE(FALSE)-');
154:
155: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
156: 'SQLERRM: '||SQLERRM);
157:
158: FND_LOG.STRING(g_level_exception,'ZX_TAX_TAXWARE_REV.GET_RELEASE',
159: 'ARP_TAX_TAXWARE_REV.GET_RELEASE(FALSE)-');
160: END IF;
161:
162: --x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;