PACKAGE: APPS.WIP_TEST_UTILITIES

Source

1 package WIP_TEST_UTILITIES AUTHID CURRENT_USER as
2   /* $Header: wiptests.pls 115.6 2002/12/12 16:01:55 rmahidha ship $ */
3 
4 
5 -- Whether or not to execute the test code that is embedded in normal
6 -- packages. Using this boolean, we can embed test code that does a lot of
7 -- extra work without worrying about it causing a performance problem later.
8 EXECUTE_TEST_CODE boolean := false ;
9 
10 
11 -- Throws PROGRAMMER_ERROR if the condition is false.
12 procedure assert(condition boolean) ;
13 
14 -- Throws PROGRAMMER_ERROR.
15 procedure die ;
16 
17 -- Throws PROGRAMMER_ERROR after printing message.
18 procedure die(message varchar2) ;
19 
20 PROGRAMMER_ERROR exception ;
21 
22 
23 end WIP_TEST_UTILITIES ;