| Packages/Types | |
|---|---|
| '||package_name_span(r1.name)||' | '||comments_span(substr(ltrim(r2.text), 1, n_period))||' |
'); + n_line_number := t_spec(i).line_number; + for j in i..n_spec loop + if j > 1 and + t_spec(j).line_number <= n_line_number then + exit; + end if; + out(t_spec(j).line_text); + end loop; + out('
'); + exit; + end if; + end loop; + out('| Global Constants and Variables | |
|---|---|
| Attributes |
');
+ b_other := TRUE;
+ end if;
+ if i > 1 and
+ t_spec(i - 1).line_type = v_LT_COMMENT then
+ n_backward := i - t_spec(i - 1).line_number;
+ if n_backward > 0 then
+ out(''); + for j in n_backward..(i - 1) loop + out(t_spec(j).line_text); + end loop; + out('
');
+ end if;
+ end if;
+ out(t_spec(i).line_text);
+ end if;
+ end loop;
+ if b_other then
+ out('');
+ out('| Method Summary | |
|---|---|
| '||method_name_span(t_spec(i).method_name)||' | '); + out(''||first_sentence_span(nvl(v_first_sentence, ' '))||' |
| Method Detail |
|---|
');
+ for j in i..n_spec loop
+ if t_spec(j).line_type <> v_LT_METHOD or
+ (j > i and
+ t_spec(j).method_name is not NULL) then
+ exit;
+ end if;
+ out(t_spec(j).line_text);
+ end loop;
+ out('');
+ if i > 1 and
+ t_spec(i - 1).line_type = v_LT_COMMENT then
+ n_backward := i - t_spec(i - 1).line_number;
+ if n_backward > 0 then
+ out(''); + for j in n_backward..(i - 1) loop + out(t_spec(j).line_text); + end loop; + out('
'); + end if; + end if; + out('+dates.pks +by Donald J. Bales on 12/15/2006 +Additional DATE data type methods. +
+| Global Constants and Variables |
|---|
+
+The maximum and minimum dates values. +
+d_MAX constant date := to_date('99991231235959', 'YYYYMMDDHH24MISS');
+d_MIN constant date := to_date('-47120101', 'SYYYYMMDD');
+
+| Method Summary | |
|---|---|
| end_of_day | +Returns the specified date with the time set to 23:59:59, therefore, the end of the day |
| get_max | +Returns constant d_MAX |
| get_min | +Returns constant d_MIN |
| help | +Text-based help for this package |
| random | +Returns a randomly generated date that exists between the years specified |
| start_of_day | +Returns the specified date with the time set to 00:00:00, therefore, the start of the day |
| test | +Test unit for this package |
| Method Detail |
|---|
+FUNCTION end_of_day( +aid_date in date ) +return date ++
+Returns the specified date with the time set to 23:59:59, therefore, the end of the day. +
++FUNCTION get_max +return date ++
+Returns constant d_MAX. This is useful in SQL statements where the constant DATES.d_MAX is not accessible. +
++FUNCTION get_min +return date ++
+Returns constant d_MIN. This is useful in SQL statements where the constant DATES.d_MIN is not accessible. +
++PROCEDURE help ++
+Text-based help for this package. "set serveroutput on" in SQL*Plus. +
++FUNCTION random( +ain_starting_year in number, +ain_ending_year in number ) +return date ++
+Returns a randomly generated date that exists between the years specified. +
++FUNCTION start_of_day( +aid_date in date ) +return date ++
+Returns the specified date with the time set to 00:00:00, therefore, the start of the day. +
++PROCEDURE test ++
+Test unit for this package. +
++debug_o.tps +by Donald Bales on 12/15/2006 +Type DEBUG_O's specification: +A type for logging debug information +
+| Attributes |
|---|
+
+debug_o.tps +by Donald Bales on 12/15/2006 +Type DEBUG_O's specification: +A type for logging debug information +
+id number, +text varchar2(256), +unique_session_id varchar2(24), +insert_user varchar2(30), +insert_date date, ++
| Method Summary | |
|---|---|
| get_id | +Get the next primary key value |
| debug_o | +A NULL values constructor |
| debug_o | +A convenience constructor |
| debug_o | +Override the default constructor |
| set_text | +Write to the debug object table |
| to_map | +A map function |
| Method Detail |
|---|
+STATIC FUNCTION get_id +return number, ++
+Get the next primary key value +
++CONSTRUCTOR FUNCTION debug_o( +self in out nocopy debug_o) +return self as result, ++
+A NULL values constructor +
++CONSTRUCTOR FUNCTION debug_o( +self in out nocopy debug_o, +ain_id in number, +aiv_text in varchar2) +return self as result, ++
+A convenience constructor +
++CONSTRUCTOR FUNCTION debug_o( +self in out nocopy debug_o, +id in number, +text in varchar2, +unique_session_id in varchar2, +insert_user in varchar2, +insert_date in date) +return self as result, ++
+Override the default constructor +
++STATIC PROCEDURE set_text( +aiv_program_unit in varchar2, +aiv_text in varchar2), ++
+Write to the debug object table +
++MAP MEMBER FUNCTION to_map +return number +) not final ++
+A map function +
++debug_ots.pks +by Donald J. Bales on 12/15/2006 +Object Table DEBUG_OT's package +
+| Method Summary | |
|---|---|
| disable | +Disable debug logging for the specified program unit |
| enable | +Enable debug logging for the specified program unit |
| set_text | +program unit, if it is enabled |
| Method Detail |
|---|
+PROCEDURE disable( +aiv_program_unit in varchar2) ++
+Disable debug logging for the specified program unit +
++PROCEDURE enable( +aiv_program_unit in varchar2) ++
+Enable debug logging for the specified program unit +
++PROCEDURE set_text( +aiv_program_unit in varchar2, +aiv_text in DEBUG_OT.text%TYPE) ++
+program unit, if it is enabled +
++debug_ts.pks +by Donald J. Bales on 12/15/2006 +Table DEBUG_T's package +
+| Method Summary | |
|---|---|
| get_id | +Gets the next primary key value for the table |
| enable | +Enable debug output for the specified program unit |
| disable | +Disable debug output for the specified program unit |
| set_text | +Log debug output if enabled for the specified program unit |
| Method Detail |
|---|
+FUNCTION get_id +return DEBUG_T.id%TYPE ++
+Gets the next primary key value for the table +
++PROCEDURE enable( +aiv_program_unit in varchar2) ++
+Enable debug output for the specified program unit +
++PROCEDURE disable( +aiv_program_unit in varchar2) ++
+Disable debug output for the specified program unit +
++PROCEDURE set_text( +aiv_program_unit in varchar2, +aiv_text in DEBUG_T.text%TYPE) ++
+Log debug output if enabled for the specified program unit +
++emails.pks +by Donald J. Bales on 12/15/2006 +Package to send emails +
+| Global Constants and Variables |
|---|
+
+An associative array (PL/SQL table) used to hold the lines of an email message +
+TYPE LINES is table of varchar2(2000) index by binary_integer; ++
| Method Summary | |
|---|---|
| get_domain | +Returns the domain value |
| get_host | +Returns the host value |
| get_username | +Returns the username |
| send | +Send an email message through the database |
| set_domain | +Sets the domain value |
| set_host | +Sets the host value |
| set_password | +Sets the password value |
| set_username | +Sets the username value |
| test | +This package's test units |
| Method Detail |
|---|
+FUNCTION get_domain +return varchar2 ++
+Returns the domain value +
++FUNCTION get_host +return varchar2 ++
+Returns the host value +
++FUNCTION get_username +return varchar2 ++
+Returns the username +
++PROCEDURE send( +aiv_from in varchar2, +aiv_to in varchar2, +aiv_subject in varchar2, +ait_lines in LINES) ++
+Send an email message through the database +
++PROCEDURE set_domain( +aiv_domain in varchar2) ++
+Sets the domain value +
++PROCEDURE set_host( +aiv_host in varchar2) ++
+Sets the host value +
++PROCEDURE set_password( +aiv_password in varchar2) ++
+Sets the password value +
++PROCEDURE set_username( +aiv_username in varchar2) ++
+Sets the username value +
++PROCEDURE test ++
+This package's test units +
++gender_o.tps +by Don Bales on 12/15/2006 +Type GENDER's attributes and methods. +
+| Attributes |
|---|
+
+gender_o.tps +by Don Bales on 12/15/2006 +Type GENDER's attributes and methods. +
+id number, +code varchar2(30), +description varchar2(80), +active_date date, +inactive_date date, ++
| Method Summary | |
|---|---|
| gender_o | +A constructor for creating a new instance of type GENDER_O with NULL |
| gender_o | +A constructor for creating a new instance of type GENDER_O for insert |
| get_code_descr | +Gets the code and decription values for the specified id |
| get_code_id_descr | +Verifies that the passed code value is an exact or like match on the |
| get_code_id_descr | +Verifies that the passed code value is currently an exact or like match |
| get_id | +Returns a new primary key id value for a row |
| get_id | +Returns the id for the specified code value |
| help, | +Test-based help for this package |
| test, | +Test units for this package |
| to_varchar2 | +A MAP function for sorting at the object level |
| Method Detail |
|---|
+CONSTRUCTOR FUNCTION gender_o( +self in out gender_o) +return self as result, ++
+A constructor for creating a new instance of type GENDER_O with NULL +values. +
++CONSTRUCTOR FUNCTION gender_o( +self in out gender_o, +aiv_code varchar2, +aiv_description varchar2) +return self as result, ++
+A constructor for creating a new instance of type GENDER_O for insert. +
++STATIC PROCEDURE get_code_descr( +ain_id in number, +aov_code out varchar2, +aov_description out varchar2), ++
+Gets the code and decription values for the specified id. +
++STATIC PROCEDURE get_code_id_descr( +aiov_code in out varchar2, +aon_id out number, +aov_description out varchar2, +aid_on in date), ++
+Verifies that the passed code value is an exact or like match on the +date specified. +
++STATIC PROCEDURE get_code_id_descr( +aiov_code in out varchar2, +aon_id out number, +aov_description out varchar2), ++
+Verifies that the passed code value is currently an exact or like match. +
++MEMBER FUNCTION get_id +return number, ++
+Returns a new primary key id value for a row. +
++STATIC FUNCTION get_id( +aiv_code in varchar2) +return number, ++
+Returns the id for the specified code value. +
++STATIC PROCEDURE help, ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++STATIC PROCEDURE test, ++
+Test units for this package. +
++MAP MEMBER FUNCTION to_varchar2 +return varchar2 +) ++
+A MAP function for sorting at the object level. +
++gender_ts.pks +by Don Bales on 12/15/2006 +Table GENDER_T's methods. +
+| Method Summary | |
|---|---|
| get_code_descr | +Gets the code and decription values for the specified id |
| get_code_id_descr | +Verifies that the passed code value is an exact or like match on the date specified |
| get_code_id_descr | +Verifies that the passed code value is currently an exact or like match |
| get_id | +Returns a new primary key id value for a row |
| get_id | +Returns the id for the specified code value |
| help | +Test-based help for this package |
| test | +Test units for this package |
| Method Detail |
|---|
+PROCEDURE get_code_descr( +ain_id in GENDER_T.id%TYPE, +aov_code out GENDER_T.code%TYPE, +aov_description out GENDER_T.description%TYPE) ++
+Gets the code and decription values for the specified id. +
++PROCEDURE get_code_id_descr( +aiov_code in out GENDER_T.code%TYPE, +aon_id out GENDER_T.id%TYPE, +aov_description out GENDER_T.description%TYPE, +aid_on in GENDER_T.active_date%TYPE) ++
+Verifies that the passed code value is an exact or like match on the date specified. +
++PROCEDURE get_code_id_descr( +aiov_code in out GENDER_T.code%TYPE, +aon_id out GENDER_T.id%TYPE, +aov_description out GENDER_T.description%TYPE) ++
+Verifies that the passed code value is currently an exact or like match. +
++FUNCTION get_id +return GENDER_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_id( +aiv_code in GENDER_T.code%TYPE) +return GENDER_T.id%TYPE ++
+Returns the id for the specified code value. +
++PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++PROCEDURE test ++
+Test units for this package. +
++html_help.pks +by Donald J. Bales on 12/15/2006 +Package to create HTML-based help files for packages. +
+| Method Summary | |
|---|---|
| create_index | +Creates a "object_index" html file for the current USER |
| create_help | + Creates a " |
| help | +Text-based help for this package |
| test | +|
| Method Detail |
|---|
+PROCEDURE create_index ++
+Creates a "object_index" html file for the current USER. +
++PROCEDURE create_help( +aiv_object_name in varchar2) ++
+Creates a "
+PROCEDURE help ++
+Text-based help for this package. "set serveroutput on" in SQL*Plus. +
++PROCEDURE test ++
+logical_assignment_ts.pks +Copyright by Donald J. Bales on 12/15/2006 +Table LOGICAL_ASSIGNMENT_T's methods +
+| Global Constants and Variables |
|---|
+
+Keep track of the number of inserts and updates to made by set_row(). +
+n_inserted number := 0; +n_updated number := 0; ++
| Method Summary | |
|---|---|
| get_id | +Returns a new primary key id value for a row |
| get_logical_workplace | +Returns a the LOGICAL_WORKPLACE row for the specified worker_id and on the specified date |
| get_logical_workplace | +Returns a the current LOGICAL_WORKPLACE row for the specified worker_id |
| get_row | +Returns a LOGICAL_ASSIGNMENT row for the specified criteria |
| help | +Test-based help for this package |
| is_active | +Returns TRUE if the worker has a logical assignment on the specified date, otherwise FALSE |
| is_active | +Returns TRUE if the worker currently has a logical assignment, otherwise FALSE |
| set_row | +Updates or inserts a row matching the passed row into table LOGICAL_WORKPLACE_T |
| test | +The test unit for this package |
| Method Detail |
|---|
+FUNCTION get_id +return LOGICAL_ASSIGNMENT_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_logical_workplace( +ain_worker_id in LOGICAL_ASSIGNMENT_T.worker_id%TYPE, +aid_on in LOGICAL_ASSIGNMENT_T.active_date%TYPE) +return LOGICAL_WORKPLACE_T%ROWTYPE ++
+Returns a the LOGICAL_WORKPLACE row for the specified worker_id and on the specified date. +
++FUNCTION get_logical_workplace( +ain_worker_id in LOGICAL_ASSIGNMENT_T.worker_id%TYPE) +return LOGICAL_WORKPLACE_T%ROWTYPE ++
+Returns a the current LOGICAL_WORKPLACE row for the specified worker_id. +
++FUNCTION get_row( +air_logical_assignment in LOGICAL_ASSIGNMENT_T%ROWTYPE) +return LOGICAL_ASSIGNMENT_T%ROWTYPE ++
+Returns a LOGICAL_ASSIGNMENT row for the specified criteria.
+
+There are two sets of criteria. You can retrieve a row by specifying:
+1. the primary key: id
+2. the woker_id and active_date
+
+If a match is found the function returns the corresponding row, otherwise
+it returns NULL. It will raise any exceptions except NO_DATA_FOUND.
+
+PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++FUNCTION is_active( +ain_worker_id in LOGICAL_ASSIGNMENT_T.worker_id%TYPE, +aid_on in date) +return boolean ++
+Returns TRUE if the worker has a logical assignment on the specified date, otherwise FALSE. +
++FUNCTION is_active( +ain_worker_id in LOGICAL_ASSIGNMENT_T.worker_id%TYPE) +return boolean ++
+Returns TRUE if the worker currently has a logical assignment, otherwise FALSE. +
++PROCEDURE set_row( +aior_logical_assignment in out LOGICAL_ASSIGNMENT_T%ROWTYPE) ++
+Updates or inserts a row matching the passed row into table LOGICAL_WORKPLACE_T.
+
+First, set_row( ) calls get_row( ) to try to find a matching row that already
+exists in the database. So you need to set the id, or worked_id
+and active_date appropriately in order to properly detect an existing row.
+
+Next, if an existing row is found, any non-key data items are updated to match
+the passed row. Otherwise a new row is inserted, including the allocation of
+a new primary key value. Upon inserting a new value, the id
+value is updated in the passed row.
+See PROCEDURE get_row( );
+
+PROCEDURE test ++
+The test unit for this package. +
+
+logical_workplace_ts.pks
+by Don Bales on 12/15/2006
+Table LOGICAL_WORKPLACE_T's methods. Contains all the supporting service
+methods (functions and procedures) for table LOGICAL_WORKPLACE_T.
+
| Global Constants and Variables |
|---|
+
+Keep track of the number of inserts and updates to made by set_row( ). +
+n_inserted number := 0; +n_updated number := 0; ++
| Method Summary | |
|---|---|
| create_id_context | +Returns an id_context for the specified parent_id and id |
| get_id | +Returns a new primary key id value for a row |
| get_code_context | +Returns the value of a context for the code values in the logical workplace assignment |
| get_name_context | +Returns the value of a context for the name values in the logical workplace assignment |
| get_row | +Returns a LOGICAL_WORKPLACE row for the specified criteria |
| help | +Test-based help for this package |
| set_row | +Updates or inserts a row matching the passed parameters into table LOGICAL_WORKPLACE_T |
| set_row | +Updates or inserts a row matching the passed row into table LOGICAL_WORKPLACE_T |
| test | +Performs unit tests for this package |
| Method Detail |
|---|
+FUNCTION create_id_context( +ain_parent_id in LOGICAL_WORKPLACE_T.parent_id%TYPE, +ain_id in LOGICAL_WORKPLACE_T.id%TYPE) +return varchar2 ++
+Returns an id_context for the specified parent_id and id. +Whatever creates a new row must also call this mehtod to create an appropriate +id_context value. Method set_row( ) does this for you. +
++FUNCTION get_id +return LOGICAL_WORKPLACE_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_code_context( +ain_id in LOGICAL_WORKPLACE_T.id%TYPE) +return varchar2 ++
+Returns the value of a context for the code values in the logical workplace assignment. +
++FUNCTION get_name_context( +ain_id in LOGICAL_WORKPLACE_T.id%TYPE) +return varchar2 ++
+Returns the value of a context for the name values in the logical workplace assignment. +
++FUNCTION get_row( +air_logical_workplace in LOGICAL_WORKPLACE_T%ROWTYPE) +return LOGICAL_WORKPLACE_T%ROWTYPE ++
+Returns a LOGICAL_WORKPLACE row for the specified criteria.
+There are three sets of criteria. You can retrieve a row by specifying:
+1. the primary key: id
+2. the unique id_context
+3. the code, name, and active_date
+If a match is found the function returns the corresponding row, otherwise
+it returns NULL. It will raise any exceptions except NO_DATA_FOUND.
+
+PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++FUNCTION set_row( +ain_parent_id in LOGICAL_WORKPLACE_T.parent_id%TYPE, +ain_workplace_type_id in LOGICAL_WORKPLACE_T.workplace_type_id%TYPE, +aiv_code in LOGICAL_WORKPLACE_T.code%TYPE, +aiv_name in LOGICAL_WORKPLACE_T.name%TYPE, +aid_active_date in LOGICAL_WORKPLACE_T.active_date%TYPE) +return LOGICAL_WORKPLACE_T.id%TYPE ++
+Updates or inserts a row matching the passed parameters into table LOGICAL_WORKPLACE_T. +See PROCEDURE set_row( ). +
++PROCEDURE set_row( +aior_logical_workplace in out LOGICAL_WORKPLACE_T%ROWTYPE) ++
+Updates or inserts a row matching the passed row into table LOGICAL_WORKPLACE_T. +First, set_row() calls get row to try to find a matching row that already +exists in the database. So you need to set the id, id_context, +and code, name and active_date appropriately in order to prperly detect an +existing row. +Next, if an existing row is found, any non-key data items are updated to match +the passed row. Otherwise, and new row is inserted, including the allocation of +a new primary key and id_context value. Upon inserting a new value, the +id and id_context values are updated in the passed row. +See PROCEDURE get_row( ); +
++PROCEDURE test ++
+Performs unit tests for this package. +
++numbers.pks +by Donald J. Bales on 12/15/2006 +A utility package for the data type NUMBER +
+| Method Summary | |
|---|---|
| to_number_or_null | +Returns the passed varchar2 as a number if it represents a number, |
| Method Detail |
|---|
+FUNCTION to_number_or_null ( +aiv_number in varchar2 ) +return number ++
+Returns the passed varchar2 as a number if it represents a number, +otherwise, it returns NULL +
+| Packages/Types | |
|---|---|
| DATES | Additional DATE data type methods. |
| DEBUG_O | debug_o. |
| DEBUG_OTS | aiv_text in DEBUG_OT. |
| DEBUG_TS | return DEBUG_T. |
| GENDER_O | gender_o. |
| GENDER_TS | Table GENDER_T's methods. |
| HTML_HELP | Package to create HTML-based help files for packages. |
| LOGICAL_ASSIGNMENT_TS | -- Keep track of the number of inserts and updates to made by +set_row(). | LOGICAL_WORKPLACE_TS | Table LOGICAL_WORKPLACE_T's methods. | +
| PHYSICAL_ASSIGNMENT_TS | -- Keep track of the number of inserts and updates to made by +set_row(). | PHYSICAL_WORKPLACE_TS | Table PHYSICAL_WORKPLACE_T's methods. | +
| REPORT_STAGING_TABLES | -- Display this package's help text. |
| TEST_O | test_o. |
| TEST_TS | aiv_object_name TEST_T. |
| TEXT_HELP | test_help. |
| TOP_100_NAMES | Display the help text for this package. |
| VARCHAR2S | -- ending character values. |
| WEEKLY_INTERFACE | -- Download the data source to its staging area. |
| WEEKLY_INTERFACE_STATUSS | -- Returns TRUE if the data source has been recorded as +downloaded. | WORKER_O | worker_o. | +
| WORKER_TS | Table WORKER_T's methods. |
| WORKER_TYPE_O | worker_type_o. |
| WORKER_TYPE_TS | Code Table WORKER_TYPE_T's methods. |
| WORKPLACE_TYPE_TS | Table WORKPLACE_TYPE_T's methods. |
| WORK_ASSIGNMENT_TS | -- Keep track of the number of inserts and updates to made by +set_row(). | WORK_TS | Table WORK_T's methods. | +
+on_demand_process.pks +by Donald J. Bales on 12/15/2006 +On-demand Data Processing (ON_DEMAND): +An example of an on-demand data processing package +designed to truncate report staging tables +
+| Method Summary | |
|---|---|
| help | +Displays help text for this procedure |
| process | +Performs the desired on-demand processing |
| test | +This package's test units |
| Method Detail |
|---|
+PROCEDURE help ++
+Displays help text for this procedure +
++PROCEDURE process ++
+Performs the desired on-demand processing +
++PROCEDURE test ++
+This package's test units +
++parameters.pks +by Donald J. Bales on 12/15/2006 +A packge to test parameter scope +
+| Method Summary | |
|---|---|
| in_out_inout | +A function that execises the scope of parameters |
| in_out_inout | +A procedure that execises the scope of parameters |
| Method Detail |
|---|
+FUNCTION in_out_inout( +aiv_in in varchar2, +aov_out out varchar2, +aiov_inout in out varchar2) +return varchar2 ++
+A function that execises the scope of parameters +
++PROCEDURE in_out_inout( +aiv_in in varchar2, +aov_out out varchar2, +aiov_inout in out varchar2) ++
+A procedure that execises the scope of parameters +
++physical_assignment_ts.pks +Copyright by Donald J. Bales on 12/15/2006 +Table PHYSICAL_ASSIGNMENT_T's methods +
+| Global Constants and Variables |
|---|
+
+Keep track of the number of inserts and updates to made by set_row(). +
+n_inserted number := 0; +n_updated number := 0; ++
| Method Summary | |
|---|---|
| get_id | +Returns a new primary key id value for a row |
| get_physical_workplace | +Returns a the PHYSICAL_WORKPLACE row for the specified worker_id and on the specified date |
| get_physical_workplace | +Returns a the current PHYSICAL_WORKPLACE row for the specified worker_id |
| get_row | +Returns a PHYSICAL_ASSIGNMENT row for the specified criteria |
| help | +Test-based help for this package |
| is_active | +Returns TRUE if the worker has a physical assignment on the specified date, otherwise FALSE |
| is_active | +Returns TRUE if the worker currently has a physical assignment, otherwise FALSE |
| set_row | +Updates or inserts a row matching the passed row into table PHYSICAL_WORKPLACE_T |
| test | +The test unit for this package |
| Method Detail |
|---|
+FUNCTION get_id +return PHYSICAL_ASSIGNMENT_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_physical_workplace( +ain_worker_id in PHYSICAL_ASSIGNMENT_T.worker_id%TYPE, +aid_on in PHYSICAL_ASSIGNMENT_T.active_date%TYPE) +return PHYSICAL_WORKPLACE_T%ROWTYPE ++
+Returns a the PHYSICAL_WORKPLACE row for the specified worker_id and on the specified date. +
++FUNCTION get_physical_workplace( +ain_worker_id in PHYSICAL_ASSIGNMENT_T.worker_id%TYPE) +return PHYSICAL_WORKPLACE_T%ROWTYPE ++
+Returns a the current PHYSICAL_WORKPLACE row for the specified worker_id. +
++FUNCTION get_row( +air_physical_assignment in PHYSICAL_ASSIGNMENT_T%ROWTYPE) +return PHYSICAL_ASSIGNMENT_T%ROWTYPE ++
+Returns a PHYSICAL_ASSIGNMENT row for the specified criteria.
+
+There are two sets of criteria. You can retrieve a row by specifying:
+1. the primary key: id
+2. the woker_id and active_date
+
+If a match is found the function returns the corresponding row, otherwise
+it returns NULL. It will raise any exceptions except NO_DATA_FOUND.
+
+PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++FUNCTION is_active( +ain_worker_id in PHYSICAL_ASSIGNMENT_T.worker_id%TYPE, +aid_on in date) +return boolean ++
+Returns TRUE if the worker has a physical assignment on the specified date, otherwise FALSE. +
++FUNCTION is_active( +ain_worker_id in PHYSICAL_ASSIGNMENT_T.worker_id%TYPE) +return boolean ++
+Returns TRUE if the worker currently has a physical assignment, otherwise FALSE. +
++PROCEDURE set_row( +aior_physical_assignment in out PHYSICAL_ASSIGNMENT_T%ROWTYPE) ++
+Updates or inserts a row matching the passed row into table PHYSICAL_WORKPLACE_T.
+
+First, set_row( ) calls get_row( ) to try to find a matching row that already
+exists in the database. So you need to set the id, or worked_id
+and active_date appropriately in order to properly detect an existing row.
+
+Next, if an existing row is found, any non-key data items are updated to match
+the passed row. Otherwise a new row is inserted, including the allocation of
+a new primary key value. Upon inserting a new value, the id
+value is updated in the passed row.
+See PROCEDURE get_row( );
+
+PROCEDURE test ++
+The test unit for this package. +
+
+id_ts.pks
+Copyright by Don Bales on 12/15/2006
+Table PHYSICAL_WORKPLACE_T's methods. Contains all the supporting service
+methods (functions and procedures) for table PHYSICAL_WORKPLACE_T.
+
| Global Constants and Variables |
|---|
+
+Keep track of the number of inserts and updates to made by set_row( ). +
+n_inserted number := 0; +n_updated number := 0; ++
| Method Summary | |
|---|---|
| create_id_context | +Returns an id_context for the specified parent_id and id_id |
| get_code_context | +Returns the value of a context for the code values in the physical workplace assignment |
| get_id | +Returns a new primary key id value for a row |
| get_id_context | +Returns the value of a context for the id values in the logical workplace assignment |
| get_name_context | +Returns the value of a context for the name values in the physical workplace assignment |
| get_row | +Returns a PHYSICAL_WORKPLACE row for the specified criteria |
| help | +Test-based help for this package |
| set_row | +Updates or inserts a row matching the passed parameters into table PHYSICAL_WORKPLACE_T |
| set_row | +Updates or inserts a row matching the passed row into table PHYSICAL_WORKPLACE_T |
| test | +Performs unit tests for this package |
| Method Detail |
|---|
+FUNCTION create_id_context( +ain_parent_id in PHYSICAL_WORKPLACE_T.parent_id%TYPE, +ain_id_id in PHYSICAL_WORKPLACE_T.id%TYPE) +return varchar2 ++
+Returns an id_context for the specified parent_id and id_id. +Whatever creates a new row must also call this mehtod to create an appropriate +id_context value. Method set_row() does this for you. +
++FUNCTION get_code_context( +ain_id_id in PHYSICAL_WORKPLACE_T.id%TYPE) +return varchar2 ++
+Returns the value of a context for the code values in the physical workplace assignment. +
++FUNCTION get_id +return PHYSICAL_WORKPLACE_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_id_context( +ain_id_id in PHYSICAL_WORKPLACE_T.id%TYPE) +return varchar2 ++
+Returns the value of a context for the id values in the logical workplace assignment. +
++FUNCTION get_name_context( +ain_id_id in PHYSICAL_WORKPLACE_T.id%TYPE) +return varchar2 ++
+Returns the value of a context for the name values in the physical workplace assignment. +
++FUNCTION get_row( +air_id in PHYSICAL_WORKPLACE_T%ROWTYPE) +return PHYSICAL_WORKPLACE_T%ROWTYPE ++
+Returns a PHYSICAL_WORKPLACE row for the specified criteria.
+There are three sets of criteria. You can retrieve a row by specifying:
+1. the primary key: id_id
+2. the unique id_context
+3. the code, name, and active_date
+If a match is found the function returns the corresponding row, otherwise
+it returns NULL. It will raise any exceptions except NO_DATA_FOUND.
+
+PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++FUNCTION set_row( +ain_parent_id in PHYSICAL_WORKPLACE_T.parent_id%TYPE, +ain_workplace_type_id in PHYSICAL_WORKPLACE_T.workplace_type_id%TYPE, +aiv_code in PHYSICAL_WORKPLACE_T.code%TYPE, +aiv_name in PHYSICAL_WORKPLACE_T.name%TYPE, +aid_active_date in PHYSICAL_WORKPLACE_T.active_date%TYPE) +return PHYSICAL_WORKPLACE_T.id%TYPE ++
+Updates or inserts a row matching the passed parameters into table PHYSICAL_WORKPLACE_T. +See PROCEDURE set_row( ). +
++PROCEDURE set_row( +aior_id in out PHYSICAL_WORKPLACE_T%ROWTYPE) ++
+Updates or inserts a row matching the passed row into table PHYSICAL_WORKPLACE_T. +First, set_row() calls get row to try to find a matching row that already +exists in the database. So you need to set the id_id, id_context, +and code, name and active_date appropriately in order to prperly detect an +existing row. +Next, if an existing row is found, any non-key data items are updated to match +the passed row. Otherwise, and new row is inserted, including the allocation of +a new primary key and id_context value. Upon inserting a new value, the +id_id and id_context values are updated in the passed row. +See PROCEDURE get_row( ); +
++PROCEDURE test ++
+Performs unit tests for this package. +
++polling_process.pks +by Donald J. Bales on 12/15/2006 +An example of a polling data processing package +
+| Method Summary | |
|---|---|
| enable | +Enable debug logging |
| disable | +Disable debug logging |
| process | +Perform the required polling type processing |
| quit | +Send a command to tell this process to quit |
| status | +Ask this process for it's current status |
| Method Detail |
|---|
+PROCEDURE enable ++
+Enable debug logging +
++PROCEDURE disable ++
+Disable debug logging +
++PROCEDURE process ++
+Perform the required polling type processing +
++PROCEDURE quit ++
+Send a command to tell this process to quit +
++PROCEDURE status ++
+Ask this process for it's current status +
++report_staging_tables.pks +by Donald J. Bales on 12/15/2006 +On-demand Data Processing (ODP): +An example of an on-demand data processing package +designed to truncate report staging tables +
+| Method Summary | |
|---|---|
| help | +Display this package's help text |
| process | +Delete any data more than two days old from the report staging tables |
| test | +Test this package's methods |
| Method Detail |
|---|
+PROCEDURE help ++
+Display this package's help text. +
++PROCEDURE process ++
+Delete any data more than two days old from the report staging tables. +
++PROCEDURE test ++
+Test this package's methods. +
++scopes.pks +by Donald J. Bales on 12/15/2006 +A package to test scope +
+| Global Constants and Variables |
|---|
+
+Here's a global variable declaration +
+gv_scope varchar2(80) := +'I''m a global (or package spec) variable'; ++
| Method Summary | |
|---|---|
| my_scope_is_global | +Here's a global (or package spec) function declaration |
| my_scope_is_global | +Here's a global (or package spec) procedure declaration |
| Method Detail |
|---|
+FUNCTION my_scope_is_global +return varchar2 ++
+Here's a global (or package spec) function declaration +
++PROCEDURE my_scope_is_global ++
+Here's a global (or package spec) procedure declaration +
++test_o.tps +by Donald J. Bales on 12/15/2006 +A Type for logging test results +
+| Attributes |
|---|
+
+Type TEST_O's attributes +
+id number, +object_name varchar2(30), +method_name varchar2(30), +test_number number, +description varchar2(80), +result varchar2(256), +unique_session_id varchar2(24), +insert_user varchar2(30), +insert_date date, ++
| Method Summary | |
|---|---|
| get_id | +Allocate the next primary key value fir id |
| get_test_19000101 | +Get the test value for January 1, 1900 |
| get_test_19991231 | +Get the test value for December 31, 1999 |
| get_test_n | +Get the test value N for any indicators |
| get_test_y | +Get the test value Y for any indicators |
| get_test_30 | +Get the 30 character test value |
| get_test_30_1 | +Get the first 30 character test value duplicate for LIKE |
| get_test_30_2 | +Get the second 30 character test value duplicate for LIKE |
| get_test_80 | +Get the 80 character test value |
| get_test_100 | +Get the 100 character test value |
| get_test_2000 | +Get the 2000 character test value |
| clear | +Clear any previous test run for the specified object name |
| error, | +Set the result to ERROR |
| error | +Set the result to Oracle ERROR |
| set_result | +Set the result to the specified result value |
| help, | +Show the help text for this object |
| ok, | +Set the result to OK |
| success, | +Set the result of the execution of test() to SUCCESS |
| test, | +Test this object |
| set_test | +Set the test about to be performed |
| to_map | +Get the map value |
| test_o | +Parameter-less constructor |
| test_o | +Convenience constructor |
| Method Detail |
|---|
+STATIC FUNCTION get_id +return number, ++
+Allocate the next primary key value fir id +
++STATIC FUNCTION get_test_19000101 +return date, ++
+Get the test value for January 1, 1900 +
++STATIC FUNCTION get_test_19991231 +return date, ++
+Get the test value for December 31, 1999 +
++STATIC FUNCTION get_test_n +return varchar2, ++
+Get the test value N for any indicators +
++STATIC FUNCTION get_test_y +return varchar2, ++
+Get the test value Y for any indicators +
++STATIC FUNCTION get_test_30 +return varchar2, ++
+Get the 30 character test value +
++STATIC FUNCTION get_test_30_1 +return varchar2, ++
+Get the first 30 character test value duplicate for LIKE +
++STATIC FUNCTION get_test_30_2 +return varchar2, ++
+Get the second 30 character test value duplicate for LIKE +
++STATIC FUNCTION get_test_80 +return varchar2, ++
+Get the 80 character test value +
++STATIC FUNCTION get_test_100 +return varchar2, ++
+Get the 100 character test value +
++STATIC FUNCTION get_test_2000 +return varchar2, ++
+Get the 2000 character test value +
++STATIC PROCEDURE clear( +aiv_object_name varchar2), ++
+Clear any previous test run for the specified object name +
++MEMBER PROCEDURE error, ++
+Set the result to ERROR +
++MEMBER PROCEDURE error( +aiv_result in varchar2), ++
+Set the result to Oracle ERROR +
++MEMBER PROCEDURE set_result( +aiv_result in varchar2), ++
+Set the result to the specified result value +
++STATIC PROCEDURE help, ++
+Show the help text for this object +
++MEMBER PROCEDURE ok, ++
+Set the result to OK +
++MEMBER PROCEDURE success, ++
+Set the result of the execution of test() to SUCCESS +
++STATIC PROCEDURE test, ++
+Test this object +
++MEMBER PROCEDURE set_test( +aiv_object_name in varchar2, +aiv_method_name in varchar2, +ain_test_number in number, +aiv_description in varchar2), ++
+Set the test about to be performed +
++MAP MEMBER FUNCTION to_map +return number, ++
+Get the map value +
++CONSTRUCTOR FUNCTION test_o( +self in out nocopy test_o) +return self as result, ++
+Parameter-less constructor +
++CONSTRUCTOR FUNCTION test_o( +self in out nocopy test_o, +ain_id in number, +aiv_object_name in varchar2, +aiv_method_name in varchar2, +ain_test_number in number, +aiv_description in varchar2) +return self as result +) ++
+Convenience constructor +
++test_ts.pks +by Donald J. Bales on 12/15/2006 +A Testing package +
+| Global Constants and Variables |
|---|
+
+Result constants +
+v_TEST_ERROR constant varchar2(5) := 'ERROR'; +v_TEST_OK constant varchar2(2) := 'OK'; +v_TEST_SUCCESS constant varchar2(7) := 'SUCCESS'; +
+Testing constants +
+d_TEST_19000101 constant date :=
+to_date('19000101', 'YYYYMMDD');
+d_TEST_19991231 constant date :=
+to_date('19000101', 'YYYYMMDD');
+v_TEST_N constant varchar2(1) := 'N';
+v_TEST_Y constant varchar2(1) := 'Y';
+v_TEST_30 constant varchar2(30) :=
+'TEST TEST TEST TEST TEST TESTx';
+v_TEST_30_1 constant varchar2(30) :=
+'TEST1 TEST1 TEST1 TEST1 TEST1x';
+v_TEST_30_2 constant varchar2(30) :=
+'TEST2 TEST2 TEST2 TEST2 TEST2x';
+v_TEST_80 constant varchar2(80) :=
+'Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Testx';
+v_TEST_100 constant varchar2(100) :=
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Testx';
+v_TEST_2000 constant varchar2(2000) :=
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Test '||
+'Test Test Test Test Test Test Test Test Test Testx';
+
+| Method Summary | |
|---|---|
| clear | +Clear the results of the last test |
| error | +Set the result of the last test to v_TEST_ERROR |
| error | +Set the result of the last test to the passed Oracle error |
| help | +Display help text |
| initialize | +Instantiate the package |
| ok | +Set the result of the last test to v_TEST_OK |
| set_result | +Update the test with it's results |
| set_test | +Add a test |
| success | +Set the result of the last test to v_TEST_SUCCESS |
| test | +Test unit |
| Method Detail |
|---|
+PROCEDURE clear( +aiv_object_name TEST_T.object_name%TYPE) ++
+Clear the results of the last test +
++PROCEDURE error ++
+Set the result of the last test to v_TEST_ERROR +
++PROCEDURE error( +aiv_result in TEST_T.result%TYPE) ++
+Set the result of the last test to the passed Oracle error +
++PROCEDURE help ++
+Display help text +
++PROCEDURE initialize ++
+Instantiate the package +
++PROCEDURE ok ++
+Set the result of the last test to v_TEST_OK +
++PROCEDURE set_result( +aiv_result in TEST_T.result%TYPE) ++
+Update the test with it's results +
++PROCEDURE set_test( +aiv_object_name in TEST_T.object_name%TYPE, +aiv_method_name in TEST_T.method_name%TYPE, +ain_test_number in TEST_T.test_number%TYPE, +aiv_description in TEST_T.description%TYPE) ++
+Add a test +
++PROCEDURE success ++
+Set the result of the last test to v_TEST_SUCCESS +
++PROCEDURE test ++
+Test unit +
++test_help.pkb +by Donald J. Bales on 12/15/2006 +A package to produce text based help +
+| Method Summary | |
|---|---|
| help | +The help text for this package |
| process | +Generate help text for the specified object using its specification |
| test | +The test unit for this package |
| Method Detail |
|---|
+PROCEDURE help ++
+The help text for this package. +
++PROCEDURE process( +aiv_object_name in varchar2) ++
+Generate help text for the specified object using its specification. +
++PROCEDURE test ++
+The test unit for this package. +
++top_100_names.pks +by Donald J. Bales on 12/15/2006 +Data Migration: +Seed the Worker table with the top 100 names +100 last x 100 first x 26 middle = 260,000 entries +
+| Method Summary | |
|---|---|
| help | +Display the help text for this package |
| Initialize | +Initializes package pseudo-constants, it is called |
| Process | +Migrates data (inserts or updates) from tables TOP_100_LAST_NAME, |
| test | +Test the methods in this package |
| Method Detail |
|---|
+PROCEDURE help ++
+Display the help text for this package. +
++PROCEDURE Initialize ++
+Initializes package pseudo-constants, it is called +by the package body's initialization section. +
++PROCEDURE Process ++
+Migrates data (inserts or updates) from tables TOP_100_LAST_NAME, +TOP_100_FIRST_NAME, and A_THRU_Z to table WORKER_TS +
++PROCEDURE test ++
+Test the methods in this package +
++varchar2s.pks +Copyright by Donald J. Bales on 12/15/2006 +VARCHAR2 data type utilities +
+| Method Summary | |
|---|---|
| random | +ending character values |
| test | +This package's test units |
| Method Detail |
|---|
+FUNCTION random( +aiv_starting_character varchar2, +aiv_ending_character varchar2) +return varchar2 ++
+ending character values. +
++PROCEDURE test ++
+This package's test units +
++weekly_interface.pks +by Donald J. Bales on 12/15/2006 +An example of a weekly interface process +
+| Method Summary | |
|---|---|
| download | +Download the data source to its staging area |
| is_downloaded | +Returns TRUE if the data source has been downloaded THIS week |
| process | +Download if needed, then upload if needed, THIS week |
| set_downloaded | +Record that the data source has been downloaded for THIS week |
| upload | +Upload the data source into the target relational structure |
| is_verified | +Returns TRUE is the data source's code have been verified |
| Method Detail |
|---|
+PROCEDURE download ++
+Download the data source to its staging area. +
++FUNCTION is_downloaded +return number ++
+Returns TRUE if the data source has been downloaded THIS week. +
++PROCEDURE process ++
+Download if needed, then upload if needed, THIS week. +
++PROCEDURE set_downloaded ++
+Record that the data source has been downloaded for THIS week. +
++PROCEDURE upload ++
+Upload the data source into the target relational structure. +
++FUNCTION is_verified +return boolean ++
+Returns TRUE is the data source's code have been verified. +
++weekly_interface_statuss.pks +by Donald J. Bales on 12/15/2006 +Table WEEKLY_INTERFACE_STATUS' routines +
+| Method Summary | |
|---|---|
| get_week | +Returns the CURRENT number of the week in the CURRENT year |
| is_downloaded | +Returns TRUE if the data source has been recorded as downloaded |
| is_uploaded | +Returns TRUE if the data source has been recorded as uploaded |
| set_downloaded | +Record that the data source has been downloaded for THIS week |
| set_uploaded | +Record that the data source has been uploaded for THIS week |
| Method Detail |
|---|
+FUNCTION get_week +return number ++
+Returns the CURRENT number of the week in the CURRENT year +
++FUNCTION is_downloaded +return boolean ++
+Returns TRUE if the data source has been recorded as downloaded. +
++FUNCTION is_uploaded +return boolean ++
+Returns TRUE if the data source has been recorded as uploaded. +
++PROCEDURE set_downloaded ++
+Record that the data source has been downloaded for THIS week. +
++PROCEDURE set_uploaded ++
+Record that the data source has been uploaded for THIS week. +
++work_assignment_ts.pks +by Donald J. Bales on 12/15/2006 +Table WORK_ASSIGNMENT_T's methods +
+| Global Constants and Variables |
|---|
+
+Keep track of the number of inserts and updates to made by set_row(). +
+n_inserted number := 0; +n_updated number := 0; ++
| Method Summary | |
|---|---|
| get_id | +Returns a new primary key id value for a row |
| get_work | +Returns a the WORK row for the specified worker_id and on the specified date |
| get_work | +Returns a the current WORK row for the specified worker_id |
| get_row | +Returns a WORK_ASSIGNMENT row for the specified criteria |
| help | +Test-based help for this package |
| is_active | +Returns TRUE if the worker has a work assignment on the specified date, otherwise FALSE |
| is_active | +Returns TRUE if the worker currently has a work assignment, otherwise FALSE |
| set_row | +Updates or inserts a row matching the passed row into table WORK_WORKPLACE_T |
| test | +The test unit for this package |
| Method Detail |
|---|
+FUNCTION get_id +return WORK_ASSIGNMENT_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_work( +ain_worker_id in WORK_ASSIGNMENT_T.worker_id%TYPE, +aid_on in WORK_ASSIGNMENT_T.active_date%TYPE) +return WORK_T%ROWTYPE ++
+Returns a the WORK row for the specified worker_id and on the specified date. +
++FUNCTION get_work( +ain_worker_id in WORK_ASSIGNMENT_T.worker_id%TYPE) +return WORK_T%ROWTYPE ++
+Returns a the current WORK row for the specified worker_id. +
++FUNCTION get_row( +air_work_assignment in WORK_ASSIGNMENT_T%ROWTYPE) +return WORK_ASSIGNMENT_T%ROWTYPE ++
+Returns a WORK_ASSIGNMENT row for the specified criteria.
+
+There are two sets of criteria. You can retrieve a row by specifying:
+1. the primary key: id
+2. the woker_id and active_date
+
+If a match is found the function returns the corresponding row, otherwise
+it returns NULL. It will raise any exceptions except NO_DATA_FOUND.
+
+PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++FUNCTION is_active( +ain_worker_id in WORK_ASSIGNMENT_T.worker_id%TYPE, +aid_on in date) +return boolean ++
+Returns TRUE if the worker has a work assignment on the specified date, otherwise FALSE. +
++FUNCTION is_active( +ain_worker_id in WORK_ASSIGNMENT_T.worker_id%TYPE) +return boolean ++
+Returns TRUE if the worker currently has a work assignment, otherwise FALSE. +
++PROCEDURE set_row( +aior_work_assignment in out WORK_ASSIGNMENT_T%ROWTYPE) ++
+Updates or inserts a row matching the passed row into table WORK_WORKPLACE_T.
+
+First, set_row( ) calls get_row( ) to try to find a matching row that already
+exists in the database. So you need to set the id, or worked_id
+and active_date appropriately in order to properly detect an existing row.
+
+Next, if an existing row is found, any non-key data items are updated to match
+the passed row. Otherwise a new row is inserted, including the allocation of
+a new primary key value. Upon inserting a new value, the id
+value is updated in the passed row.
+See PROCEDURE get_row( );
+
+PROCEDURE test ++
+The test unit for this package. +
+
+work_ts.pks
+by Donald Bales on 12/15/2006
+Table WORK_T's methods. Contains all the supporting service
+methods (functions and procedures) for table WORK_T.
+
| Global Constants and Variables |
|---|
+
+Keep track of the number of inserts and updates to made by set_row( ). +
+n_inserted number := 0; +n_updated number := 0; ++
| Method Summary | |
|---|---|
| get_id | +Returns a new primary key id value for a row |
| get_row | +Returns a WORK row for the specified criteria |
| help | +Text-based help for this package |
| set_row | +Updates or inserts a row matching the passed row into table WORK_T |
| set_row | +Parametric version of set_row() |
| test | +Performs unit tests for this package |
| Method Detail |
|---|
+FUNCTION get_id +return WORK_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_row( +air_work in WORK_T%ROWTYPE) +return WORK_T%ROWTYPE ++
+Returns a WORK row for the specified criteria.
+There are three sets of criteria. You can retrieve a row by specifying:
+1. the primary key: work_id
+2. the unique id_context
+3. the code, name, and active_date
+If a match is found the function returns the corresponding row, otherwise
+it returns NULL. It will raise any exceptions except NO_DATA_FOUND.
+
+PROCEDURE help ++
+Text-based help for this package. +
++PROCEDURE set_row( +aior_work in out WORK_T%ROWTYPE) ++
+Updates or inserts a row matching the passed row into table WORK_T. +First, set_row() calls get row to try to find a matching row that already +exists in the database. So you need to set the work_id, id_context, +and code, name and active_date appropriately in order to prperly detect an +existing row. +Next, if an existing row is found, any non-key data items are updated to match +the passed row. Otherwise, and new row is inserted, including the allocation of +a new primary key and id_context value. Upon inserting a new value, the +work_id and id_context values are updated in the passed row. +See PROCEDURE get_row( ); +
++PROCEDURE set_row( +aiv_code in WORK_T.code%TYPE, +aiv_name in WORK_T.name%TYPE, +aid_active_date in WORK_T.active_date%TYPE, +aid_inactive_date in WORK_T.inactive_date%TYPE) ++
+Parametric version of set_row() +
++PROCEDURE test ++
+Performs unit tests for this package. +
++worker_o.tps +by Don Bales on 12/15/2006 +Type WORKER_O's attributes and methods. +
+| Attributes |
|---|
+
+worker_o.tps +by Don Bales on 12/15/2006 +Type WORKER_O's attributes and methods. +
+id number, +worker_type_id number, +external_id varchar2(30), +first_name varchar2(30), +middle_name varchar2(30), +last_name varchar2(30), +name varchar2(100), +birth_date date, +gender_id number, ++
| Method Summary | |
|---|---|
| get_age | +Get the worker's current age |
| get_age | +Get the worker's age on the specified date |
| get_age | +Calculate a worker's age for the given birth date |
| get_age | +Calculate a worker's current age for the given bith date |
| get_age | +Get the specified worker's age at the given point in time |
| get_age | +Get the specified worker's current age |
| get_birth_date | +Get the specified worker's birth date |
| get_external_id | +Get the specified worker's external ID |
| get_formatted_name | +Calculate the locale specific formatted name |
| get_formatted_name | +Get the specified worker's formatted name |
| get_id | +Get the next primary key value for the table |
| get_id | +Get the specified worker's internal ID |
| get_row | +Get the specified worker's row object |
| get_unformatted_name | +Calculate the non-locale specific unformmated name |
| help, | +Display the help text for this TYPE |
| is_duplicate | +Check to see if a worker with the same name, birth_date and |
| set_row | +Set the specified worker's row object |
| test, | +Execute the test unit for this TYPE |
| to_varchar2 | +The MAP function for this TYPE |
| worker_o | +A convenience constructor for this TYPE |
| worker_o | +A NULL values constructor for this TYPE |
| Method Detail |
|---|
+MEMBER FUNCTION get_age +return number, ++
+Get the worker's current age. +
++MEMBER FUNCTION get_age( +aid_on date) +return number, ++
+Get the worker's age on the specified date. +
++STATIC FUNCTION get_age( +aid_birth_date in date, +aid_on in date) +return number, ++
+Calculate a worker's age for the given birth date +and point in time. +
++STATIC FUNCTION get_age( +aid_birth_date in date) +return number, ++
+Calculate a worker's current age for the given bith date. +
++STATIC FUNCTION get_age( +ain_id in number, +aid_on in date) +return number, ++
+Get the specified worker's age at the given point in time. +
++STATIC FUNCTION get_age( +ain_id in number) +return number, ++
+Get the specified worker's current age. +
++STATIC FUNCTION get_birth_date( +ain_id in number) +return date, ++
+Get the specified worker's birth date. +
++STATIC FUNCTION get_external_id +return varchar2, ++
+Get the specified worker's external ID. +
++STATIC FUNCTION get_formatted_name( +aiv_first_name in varchar2, +aiv_middle_name in varchar2, +aiv_last_name in varchar2) +return varchar2, ++
+Calculate the locale specific formatted name. +
++STATIC FUNCTION get_formatted_name( +ain_id in number) +return varchar2, ++
+Get the specified worker's formatted name. +
++STATIC FUNCTION get_id +return number, ++
+Get the next primary key value for the table. +
++STATIC FUNCTION get_id( +aiv_external_id in varchar2) +return number, ++
+Get the specified worker's internal ID. +
++STATIC FUNCTION get_row( +aio_worker in WORKER_O) +return WORKER_O, ++
+Get the specified worker's row object. +
++STATIC FUNCTION get_unformatted_name( +aiv_first_name in varchar2, +aiv_middle_name in varchar2, +aiv_last_name in varchar2) +return varchar2, ++
+Calculate the non-locale specific unformmated name. +
++MEMBER PROCEDURE help, ++
+Display the help text for this TYPE. +
++STATIC FUNCTION is_duplicate( +aiv_name in varchar2, +aid_birth_date in varchar2, +ain_gender_id in varchar2) +return boolean, ++
+Check to see if a worker with the same name, birth_date and +gender already exists in the database. +
++STATIC PROCEDURE set_row( +aioo_worker in out WORKER_O), ++
+Set the specified worker's row object. +
++MEMBER PROCEDURE test, ++
+Execute the test unit for this TYPE. +
++MAP MEMBER FUNCTION to_varchar2 +return varchar2, ++
+The MAP function for this TYPE. +
++CONSTRUCTOR FUNCTION worker_o( +self in out worker_o, +ain_worker_type_id in number, +aiv_first_name in varchar2, +aiv_middle_name in varchar2, +aiv_last_name in varchar2, +aid_birth_date in date, +ain_gender_id in number) +return self as result, ++
+A convenience constructor for this TYPE. +
++CONSTRUCTOR FUNCTION worker_o( +self in out worker_o) +return self as result +) ++
+A NULL values constructor for this TYPE. +
++worker_ts.pks +Copyright by Don Bales on 12/15/2006 +Table WORKER_T's methods. +
+| Global Constants and Variables |
|---|
+
+Keep track of the number of inserts and updates +
+n_inserted number := 0; +n_updated number := 0; ++
| Method Summary | |
|---|---|
| get_age | +Calculate age based on the specified birth data and day |
| get_age | +Calcualte age based on the specified birth date and today |
| get_age | +Returns the age of the specified worker on the specified day |
| get_age | +Returns the age of the specified worker as of today |
| get_birth_date | +Returns the specified worker's birth date |
| get_external_id | +Returns the next available external ID value from its sequence |
| get_id | +Returns the next available primar key ID value from its sequence |
| get_id | +Returns the primary key ID value for the specified external ID value |
| get_formatted_name | +Returns a name properly formatted for the current locale |
| get_formatted_name | +Returns a name for the specified worker properly formatted for the current locale |
| get_row | +Returns a matching worker row |
| get_unformatted_name | +Returns an unformmated name |
| is_duplicate | +gender already exists in the database |
| help | +Text-based help for this package |
| set_row | +Insert or update the specified row into the database |
| test | +This package's test units |
| Method Detail |
|---|
+FUNCTION get_age( +aid_birth_date in WORKER_T.birth_date%TYPE, +aid_on in date) +return number ++
+Calculate age based on the specified birth data and day +
++FUNCTION get_age( +aid_birth_date in WORKER_T.birth_date%TYPE) +return number ++
+Calcualte age based on the specified birth date and today +
++FUNCTION get_age( +ain_id in WORKER_T.id%TYPE, +aid_on in date) +return number ++
+Returns the age of the specified worker on the specified day +
++FUNCTION get_age( +ain_id in WORKER_T.id%TYPE) +return number ++
+Returns the age of the specified worker as of today +
++FUNCTION get_birth_date( +ain_id in WORKER_T.id%TYPE) +return WORKER_T.birth_date%TYPE ++
+Returns the specified worker's birth date +
++FUNCTION get_external_id +return WORKER_T.external_id%TYPE ++
+Returns the next available external ID value from its sequence +
++FUNCTION get_id +return WORKER_T.id%TYPE ++
+Returns the next available primar key ID value from its sequence +
++FUNCTION get_id( +aiv_external_id in WORKER_T.external_id%TYPE) +return WORKER_T.id%TYPE ++
+Returns the primary key ID value for the specified external ID value +
++FUNCTION get_formatted_name( +aiv_first_name in WORKER_T.first_name%TYPE, +aiv_middle_name in WORKER_T.middle_name%TYPE, +aiv_last_name in WORKER_T.last_name%TYPE) +return WORKER_T.name%TYPE ++
+Returns a name properly formatted for the current locale +
++FUNCTION get_formatted_name( +ain_id in WORKER_T.id%TYPE) +return WORKER_T.name%TYPE ++
+Returns a name for the specified worker properly formatted for the current locale +
++FUNCTION get_row( +air_worker in WORKER_T%ROWTYPE) +return WORKER_T%ROWTYPE ++
+Returns a matching worker row +
++FUNCTION get_unformatted_name( +aiv_first_name in WORKER_T.first_name%TYPE, +aiv_middle_name in WORKER_T.middle_name%TYPE, +aiv_last_name in WORKER_T.last_name%TYPE) +return WORKER_T.name%TYPE ++
+Returns an unformmated name +
++FUNCTION is_duplicate( +aiv_name in WORKER_T.name%TYPE, +aid_birth_date in WORKER_T.birth_date%TYPE, +ain_gender_id in WORKER_T.gender_id%TYPE) +return boolean ++
+gender already exists in the database +
++PROCEDURE help ++
+Text-based help for this package. "set serveroutput on" in SQL*Plus. +
++PROCEDURE set_row( +aior_worker in out WORKER_T%ROWTYPE) ++
+Insert or update the specified row into the database +
++PROCEDURE test ++
+This package's test units +
++worker_type_o.tps +by Don Bales on 12/15/2006 +Type WORKER_TYPE_O's attributes and methods. +
+| Attributes |
|---|
+
+worker_type_o.tps +by Don Bales on 12/15/2006 +Type WORKER_TYPE_O's attributes and methods. +
+id number, +code varchar2(30), +description varchar2(80), +active_date date, +inactive_date date, ++
| Method Summary | |
|---|---|
| get_code_descr | +Gets the code and decription values for the specified work_type_id |
| get_code_id_descr | +date specified |
| get_code_id_descr | +Verifies the passed aiov_code value is currently an exact or like match |
| get_id | +Returns a newly allocated id value |
| get_id | +Returns the id for the specified code value |
| help, | +Test-based help for this package |
| test, | +Test units for this package |
| to_varchar2 | +A MAP function for sorting at the object level |
| worker_type_o | +with NULL values |
| worker_type_o | +for insert |
| Method Detail |
|---|
+STATIC PROCEDURE get_code_descr( +ain_id in number, +aov_code out varchar2, +aov_description out varchar2 ), ++
+Gets the code and decription values for the specified work_type_id. +
++STATIC PROCEDURE get_code_id_descr( +aiov_code in out varchar2, +aon_id out number, +aov_description out varchar2, +aid_on in date ), ++
+date specified. +
++STATIC PROCEDURE get_code_id_descr( +aiov_code in out varchar2, +aon_id out number, +aov_description out varchar2 ), ++
+Verifies the passed aiov_code value is currently an exact or like match. +
++MEMBER FUNCTION get_id +return number, ++
+Returns a newly allocated id value. +
++STATIC FUNCTION get_id( +aiv_code in varchar2 ) +return number, ++
+Returns the id for the specified code value. +
++STATIC PROCEDURE help, ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++STATIC PROCEDURE test, ++
+Test units for this package. +
++MAP MEMBER FUNCTION to_varchar2 +return varchar2, ++
+A MAP function for sorting at the object level. +
++CONSTRUCTOR FUNCTION worker_type_o( +self in out worker_type_o) +return self as result, ++
+with NULL values. +
++CONSTRUCTOR FUNCTION worker_type_o( +self in out worker_type_o, +aiv_code in varchar2, +aiv_description in varchar2) +return self as result +) ++
+for insert. +
++worker_type_ts.pks +by Don Bales on 12/15/2006 +Code Table WORKER_TYPE_T's methods. +
+| Method Summary | |
|---|---|
| get_code_descr | +Gets the code and decription values for the specified work_type_id |
| get_code_id_descr | +Verifies the passed aiov_code value is an exact or like match on the date specified |
| get_code_id_descr | +Verifies the passed aiov_code value is currently an exact or like match |
| get_id | +Returns a newly allocated id value |
| get_id | +Returns the id for the specified code value |
| help | +Test-based help for this package |
| test | +Test units for this package |
| Method Detail |
|---|
+PROCEDURE get_code_descr( +ain_id in WORKER_TYPE_T.id%TYPE, +aov_code out WORKER_TYPE_T.code%TYPE, +aov_description out WORKER_TYPE_T.description%TYPE ) ++
+Gets the code and decription values for the specified work_type_id. +
++PROCEDURE get_code_id_descr( +aiov_code in out WORKER_TYPE_T.code%TYPE, +aon_id out WORKER_TYPE_T.id%TYPE, +aov_description out WORKER_TYPE_T.description%TYPE, +aid_on in WORKER_TYPE_T.active_date%TYPE ) ++
+Verifies the passed aiov_code value is an exact or like match on the date specified. +
++PROCEDURE get_code_id_descr( +aiov_code in out WORKER_TYPE_T.code%TYPE, +aon_id out WORKER_TYPE_T.id%TYPE, +aov_description out WORKER_TYPE_T.description%TYPE ) ++
+Verifies the passed aiov_code value is currently an exact or like match. +
++FUNCTION get_id +return WORKER_TYPE_T.id%TYPE ++
+Returns a newly allocated id value. +
++FUNCTION get_id( +aiv_code in WORKER_TYPE_T.code%TYPE ) +return WORKER_TYPE_T.id%TYPE ++
+Returns the id for the specified code value. +
++PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++PROCEDURE test ++
+Test units for this package. +
++workplace_type_ts.pks +by Don Bales on 12/15/2006 +Table WORKPLACE_TYPE_T's methods. +
+| Method Summary | |
|---|---|
| get_code_descr | +Gets the code and decription values for the specified id |
| get_code_id_descr | +Verifies that the passed code value is an exact or like match on the date specified |
| get_code_id_descr | +Verifies that the passed code value is currently an exact or like match |
| get_id | +Returns a new primary key id value for a row |
| get_id | +Returns the id for the specified code value |
| help | +Test-based help for this package |
| test | +Test units for this package |
| Method Detail |
|---|
+PROCEDURE get_code_descr( +ain_id in WORKPLACE_TYPE_T.id%TYPE, +aov_code out WORKPLACE_TYPE_T.code%TYPE, +aov_description out WORKPLACE_TYPE_T.description%TYPE) ++
+Gets the code and decription values for the specified id. +
++PROCEDURE get_code_id_descr( +aiov_code in out WORKPLACE_TYPE_T.code%TYPE, +aon_id out WORKPLACE_TYPE_T.id%TYPE, +aov_description out WORKPLACE_TYPE_T.description%TYPE, +aid_on in WORKPLACE_TYPE_T.active_date%TYPE) ++
+Verifies that the passed code value is an exact or like match on the date specified. +
++PROCEDURE get_code_id_descr( +aiov_code in out WORKPLACE_TYPE_T.code%TYPE, +aon_id out WORKPLACE_TYPE_T.id%TYPE, +aov_description out WORKPLACE_TYPE_T.description%TYPE) ++
+Verifies that the passed code value is currently an exact or like match. +
++FUNCTION get_id +return WORKPLACE_TYPE_T.id%TYPE ++
+Returns a new primary key id value for a row. +
++FUNCTION get_id( +aiv_code in WORKPLACE_TYPE_T.code%TYPE) +return WORKPLACE_TYPE_T.id%TYPE ++
+Returns the id for the specified code value. +
++PROCEDURE help ++
+Test-based help for this package. "set serveroutput on" in SQL*Plus. +
++PROCEDURE test ++
+Test units for this package. +
+'||UTL_TCP.crlf); + for i in ait_lines.first..ait_lines.last loop + UTL_SMTP.WRITE_DATA(r_connection, ait_lines(i)||UTL_TCP.crlf); + end loop; + t_log(incr(n_log)) := '...