From 86deaf65951a107626a24dea5b6bf9da5f864744 Mon Sep 17 00:00:00 2001 From: PriestJ Date: Thu, 21 Feb 2008 18:05:50 +0000 Subject: [PATCH] added validations for the Site detail region fields previously caused nasty APEX error to occur... git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3667 248e525c-4dfb-0310-94bc-949c084e9493 --- Screens/f155.sql | 223 +++++++++++++++++++++++++++++++++++------------ 1 file changed, 169 insertions(+), 54 deletions(-) diff --git a/Screens/f155.sql b/Screens/f155.sql index b6c2f8d..0c13008 100644 --- a/Screens/f155.sql +++ b/Screens/f155.sql @@ -13,7 +13,7 @@ prompt APPLICATION 155 - webmip -- Application Export: -- Application: 155 -- Name: webmip --- Date and Time: 15:50 Thursday February 21, 2008 +-- Date and Time: 18:04 Thursday February 21, 2008 -- Exported By: PRIESTJ -- Flashback: 0 -- Export Type: Application Export @@ -28,7 +28,7 @@ prompt APPLICATION 155 - webmip -- Pages: 54 -- Items: 338 -- Computations: 1 --- Validations: 233 +-- Validations: 236 -- Processes: 91 -- Regions: 78 -- Buttons: 118 @@ -145,7 +145,7 @@ wwv_flow_api.create_flow( p_default_region_template=> 24740611526526770 + wwv_flow_api.g_id_offset, p_error_template => 38911722486594102 + wwv_flow_api.g_id_offset, p_page_protection_enabled_y_n=> 'N', - p_checksum_salt_last_reset => '20080221155019', + p_checksum_salt_last_reset => '20080221180416', p_home_link => 'f?p=&APP_ID.:1', p_box_width => '98%', p_flow_language => 'en-gb', @@ -187,7 +187,7 @@ wwv_flow_api.create_flow( p_substitution_string_01 => 'SYSTEM_ENVIRONMENT', p_substitution_value_01 => '(Development)', p_last_updated_by => 'PRIESTJ', - p_last_upd_yyyymmddhh24miss=> '20080221155019', + p_last_upd_yyyymmddhh24miss=> '20080221180416', p_required_roles=> wwv_flow_utilities.string_to_table2('')); @@ -1530,11 +1530,18 @@ wwv_flow_api.create_list_of_values ( p_lov_name => 'PRTY_ROLES', p_lov_query=> 'begin'||chr(10)|| 'if mip_parties.get_user_role(:APP_USER) = ''MIPADMIN'' then'||chr(10)|| -'return'||chr(10)|| -'''select DESCRIPTION display_value, CODE return_value '||chr(10)|| -'from ROLE_TYPES'||chr(10)|| -'where upper(rt_type) = ''''PRT'''''||chr(10)|| -'order by 1'';'||chr(10)|| +' if :P61_PRTY_TYPE = ''MKTP'' then'||chr(10)|| +' return ''SELECT ''''Gas supplier'''' display_value, ''''SUPP'''' return_value'||chr(10)|| +' from dual'';'||chr(10)|| +' elsif :P61_PRTY_TYPE = ''MANU'' then'||chr(10)|| +' return ''SELECT ''''External organization'''' display_value, ''''EXTORG'''' return_value'||chr(10)|| +' from dual'';'||chr(10)|| +' else'||chr(10)|| +' return ''select DESCRIPTION display_value, CODE return_value '||chr(10)|| +' from ROLE_TYPES'||chr(10)|| +' where upper(rt_type) = ''''PRT'''''||chr(10)|| +' order by 1'';'||chr(10)|| +' end if;'||chr(10)|| 'else'||chr(10)|| ' return ''SELECT ''''Agent'''' display_value, ''''AGENT'''' return_value'||chr(10)|| ' from dual'';'||chr(10)|| @@ -2173,6 +2180,25 @@ wwv_flow_api.create_app_comments ( p_app_version=>''); end; / +begin +wwv_flow_api.create_app_comments ( + p_id=>41037118695325569 + wwv_flow_api.g_id_offset, + p_flow_id=>wwv_flow.g_flow_id, + p_pages=>'62', + p_app_comment=>'Ticket #286'||chr(10)|| +''||chr(10)|| +'Changed the way the drop-down list is populated.'||chr(10)|| +''||chr(10)|| +'If attempting to create a MKTP then you are restricted to a role of Gas supplier.'||chr(10)|| +''||chr(10)|| +'If creating a MANU then restricted to a role of External organization.', + p_updated_on=>'2008.02.21.16:21:48', + p_updated_by=>'MULLENM', + p_created_on=>'2008.02.21.16:21:48', + p_created_by=>'MULLENM', + p_app_version=>''); +end; +/ --application/pages/page_00000 prompt ...PAGE 0: system @@ -10796,7 +10822,7 @@ wwv_flow_api.create_page( p_required_role => 16097609166220701+ wwv_flow_api.g_id_offset, p_required_patch=> null + wwv_flow_api.g_id_offset, p_last_updated_by => 'PRIESTJ', - p_last_upd_yyyymmddhh24miss => '20080221154642', + p_last_upd_yyyymmddhh24miss => '20080221180052', p_page_is_public_y_n=> 'N', p_protection_level=> 'C', p_page_comment => ''); @@ -11429,6 +11455,17 @@ wwv_flow_api.create_page_branch( p_branch_condition=> 'P32_REQUIRED_SVCP_CODE', p_branch_comment=> 'Created 26-NOV-2007 15:45 by PRIESTJ'); +wwv_flow_api.create_page_branch( + p_id=>31354418922698169 + wwv_flow_api.g_id_offset, + p_flow_id=> wwv_flow.g_flow_id, + p_flow_step_id=> 32, + p_branch_action=> 'f?p=&APP_ID.:30:&SESSION.::&DEBUG.:::&success_msg=#SUCCESS_MSG#', + p_branch_point=> 'AFTER_PROCESSING', + p_branch_type=> 'REDIRECT_URL', + p_branch_when_button_id=>31354104183698139+ wwv_flow_api.g_id_offset, + p_branch_sequence=> 12, + p_branch_comment=> ''); + wwv_flow_api.create_page_branch( p_id=>26621402583798277 + wwv_flow_api.g_id_offset, p_flow_id=> wwv_flow.g_flow_id, @@ -11437,40 +11474,7 @@ wwv_flow_api.create_page_branch( p_branch_point=> 'AFTER_PROCESSING', p_branch_type=> 'REDIRECT_URL', p_branch_when_button_id=>26601511471798259+ wwv_flow_api.g_id_offset, - p_branch_sequence=> 10, - p_branch_comment=> ''); - -wwv_flow_api.create_page_branch( - p_id=>26621619537798277 + wwv_flow_api.g_id_offset, - p_flow_id=> wwv_flow.g_flow_id, - p_flow_step_id=> 32, - p_branch_action=> 'f?p=&APP_ID.:41:&SESSION.::&DEBUG.::P41_PREVIOUS_PAGE:&APP_PAGE_ID.&success_msg=#SUCCESS_MSG#', - p_branch_point=> 'AFTER_PROCESSING', - p_branch_type=> 'REDIRECT_URL', - p_branch_when_button_id=>26601725488798259+ wwv_flow_api.g_id_offset, - p_branch_sequence=> 10, - p_branch_comment=> ''); - -wwv_flow_api.create_page_branch( - p_id=>28015925492078573 + wwv_flow_api.g_id_offset, - p_flow_id=> wwv_flow.g_flow_id, - p_flow_step_id=> 32, - p_branch_action=> 'f?p=&APP_ID.:80:&SESSION.::&DEBUG.:80:P80_ENQU_ID:&P32_ID.&success_msg=#SUCCESS_MSG#', - p_branch_point=> 'AFTER_PROCESSING', - p_branch_type=> 'REDIRECT_URL', - p_branch_when_button_id=>28015631689078569+ wwv_flow_api.g_id_offset, - p_branch_sequence=> 10, - p_branch_comment=> ''); - -wwv_flow_api.create_page_branch( - p_id=>31354418922698169 + wwv_flow_api.g_id_offset, - p_flow_id=> wwv_flow.g_flow_id, - p_flow_step_id=> 32, - p_branch_action=> 'f?p=&FLOW_ID.:30:&SESSION.::&DEBUG.&success_msg=#SUCCESS_MSG#', - p_branch_point=> 'AFTER_PROCESSING', - p_branch_type=> 'REDIRECT_URL', - p_branch_when_button_id=>31354104183698139+ wwv_flow_api.g_id_offset, - p_branch_sequence=> 10, + p_branch_sequence=> 14, p_branch_comment=> ''); wwv_flow_api.create_page_branch( @@ -11481,7 +11485,29 @@ wwv_flow_api.create_page_branch( p_branch_point=> 'AFTER_PROCESSING', p_branch_type=> 'REDIRECT_URL', p_branch_when_button_id=>31857019013517337+ wwv_flow_api.g_id_offset, - p_branch_sequence=> 10, + p_branch_sequence=> 16, + p_branch_comment=> ''); + +wwv_flow_api.create_page_branch( + p_id=>26621619537798277 + wwv_flow_api.g_id_offset, + p_flow_id=> wwv_flow.g_flow_id, + p_flow_step_id=> 32, + p_branch_action=> 'f?p=&APP_ID.:41:&SESSION.::&DEBUG.::P41_PREVIOUS_PAGE:&APP_PAGE_ID.&success_msg=#SUCCESS_MSG#', + p_branch_point=> 'AFTER_PROCESSING', + p_branch_type=> 'REDIRECT_URL', + p_branch_when_button_id=>26601725488798259+ wwv_flow_api.g_id_offset, + p_branch_sequence=> 18, + p_branch_comment=> ''); + +wwv_flow_api.create_page_branch( + p_id=>28015925492078573 + wwv_flow_api.g_id_offset, + p_flow_id=> wwv_flow.g_flow_id, + p_flow_step_id=> 32, + p_branch_action=> 'f?p=&APP_ID.:80:&SESSION.::&DEBUG.:80:P80_ENQU_ID:&P32_ID.&success_msg=#SUCCESS_MSG#', + p_branch_point=> 'AFTER_PROCESSING', + p_branch_type=> 'REDIRECT_URL', + p_branch_when_button_id=>28015631689078569+ wwv_flow_api.g_id_offset, + p_branch_sequence=> 20, p_branch_comment=> ''); wwv_flow_api.create_page_branch( @@ -11516,6 +11542,16 @@ wwv_flow_api.create_page_branch( p_branch_sequence=> 500, p_branch_comment=> ''); +wwv_flow_api.create_page_branch( + p_id=>40943215953201689 + wwv_flow_api.g_id_offset, + p_flow_id=> wwv_flow.g_flow_id, + p_flow_step_id=> 32, + p_branch_action=> 'f?p=155:32:&SESSION.#jobinfo', + p_branch_point=> 'AFTER_PROCESSING', + p_branch_type=> 'REDIRECT_URL', + p_branch_sequence=> 510, + p_branch_comment=> 'Created 21-FEB-2008 16:00 by PRIESTJ'); + end; / @@ -12713,7 +12749,7 @@ wwv_flow_api.create_page_item( p_lov_display_null=> 'NO', p_lov_translated=> 'N', p_cSize=> 32, - p_cMaxlength=> 255, + p_cMaxlength=> 30, p_cHeight=> 1, p_begin_on_new_line => 'YES', p_begin_on_new_field=> 'YES', @@ -12764,7 +12800,7 @@ wwv_flow_api.create_page_item( p_lov_display_null=> 'NO', p_lov_translated=> 'N', p_cSize=> 50, - p_cMaxlength=> 250, + p_cMaxlength=> 210, p_cHeight=> 2, p_begin_on_new_line => 'YES', p_begin_on_new_field=> 'YES', @@ -13473,7 +13509,7 @@ wwv_flow_api.create_page_item( p_lov_display_null=> 'NO', p_lov_translated=> 'N', p_cSize=> 30, - p_cMaxlength=> 2000, + p_cMaxlength=> 35, p_cHeight=> 5, p_cAttributes=> 'nowrap="nowrap"', p_begin_on_new_line => 'YES', @@ -18125,6 +18161,78 @@ end; / +begin + +wwv_flow_api.create_page_validation( + p_id => 41166830440802003 + wwv_flow_api.g_id_offset, + p_flow_id => wwv_flow.g_flow_id, + p_flow_step_id => 32, + p_validation_name => 'Access Instructions limit to 210 chars', + p_validation_sequence=> 1680, + p_validation => 'if length(:P32_ACCESS_ADDITIONAL) > 210 then'||chr(10)|| +' return ''Limit of 210 chars'';'||chr(10)|| +'else'||chr(10)|| +' return null;'||chr(10)|| +'end if;', + p_validation_type => 'FUNC_BODY_RETURNING_ERR_TEXT', + p_error_message => '', + p_associated_item=> 26605928498798264 + wwv_flow_api.g_id_offset, + p_error_display_location=>'INLINE_WITH_FIELD_AND_NOTIFICATION', + p_validation_comment=> ''); + +null; + +end; +/ + + +begin + +wwv_flow_api.create_page_validation( + p_id => 41168811787825027 + wwv_flow_api.g_id_offset, + p_flow_id => wwv_flow.g_flow_id, + p_flow_step_id => 32, + p_validation_name => 'MPRN a number (up to 30 digits)', + p_validation_sequence=> 1690, + p_validation => 'P32_MPRN', + p_validation2 => '^[[:digit:]]{0,30}$', + p_validation_type => 'REGULAR_EXPRESSION', + p_error_message => 'Must be a number(up to 30 digits)', + p_associated_item=> 26606111771798264 + wwv_flow_api.g_id_offset, + p_error_display_location=>'INLINE_WITH_FIELD_AND_NOTIFICATION', + p_validation_comment=> 'When checking for numeric values, typically PL/SQL will throw an exception, unfortunately this is not what we want as we get a nasty error when trying to run AH''s handy validation routine. So we set those fields that are dates or numbers to check if they are numbers if not then we display an error, we''ve set a condition on AH''s routine and others to only run if there are no errors on the page and this way we avoid the exception raising and can validate safely.'); + +null; + +end; +/ + + +begin + +wwv_flow_api.create_page_validation( + p_id => 41199805693908489 + wwv_flow_api.g_id_offset, + p_flow_id => wwv_flow.g_flow_id, + p_flow_step_id => 32, + p_validation_name => 'MPRN_ALT limit to 250 chars', + p_validation_sequence=> 1700, + p_validation => 'if length(:P32_MPRN_ALT) > 250 then'||chr(10)|| +' return ''Limit of 250 chars'';'||chr(10)|| +'else'||chr(10)|| +' return null;'||chr(10)|| +'end if;', + p_validation_type => 'FUNC_BODY_RETURNING_ERR_TEXT', + p_error_message => '', + p_associated_item=> 26606304208798264 + wwv_flow_api.g_id_offset, + p_error_display_location=>'INLINE_WITH_FIELD_AND_NOTIFICATION', + p_validation_comment=> ''); + +null; + +end; +/ + + begin declare @@ -29036,7 +29144,7 @@ wwv_flow_api.create_page( p_step_template => '', p_required_patch=> null + wwv_flow_api.g_id_offset, p_last_updated_by => 'MULLENM', - p_last_upd_yyyymmddhh24miss => '20080220094428', + p_last_upd_yyyymmddhh24miss => '20080221161736', p_page_is_public_y_n=> 'N', p_page_comment => ''); @@ -29353,11 +29461,18 @@ wwv_flow_api.create_page_item( p_named_lov=> 'PRTY_ROLES', p_lov => 'begin'||chr(10)|| 'if mip_parties.get_user_role(:APP_USER) = ''MIPADMIN'' then'||chr(10)|| -'return'||chr(10)|| -'''select DESCRIPTION display_value, CODE return_value '||chr(10)|| -'from ROLE_TYPES'||chr(10)|| -'where upper(rt_type) = ''''PRT'''''||chr(10)|| -'order by 1'';'||chr(10)|| +' if :P61_PRTY_TYPE = ''MKTP'' then'||chr(10)|| +' return ''SELECT ''''Gas supplier'''' display_value, ''''SUPP'''' return_value'||chr(10)|| +' from dual'';'||chr(10)|| +' elsif :P61_PRTY_TYPE = ''MANU'' then'||chr(10)|| +' return ''SELECT ''''External organization'''' display_value, ''''EXTORG'''' return_value'||chr(10)|| +' from dual'';'||chr(10)|| +' else'||chr(10)|| +' return ''select DESCRIPTION display_value, CODE return_value '||chr(10)|| +' from ROLE_TYPES'||chr(10)|| +' where upper(rt_type) = ''''PRT'''''||chr(10)|| +' order by 1'';'||chr(10)|| +' end if;'||chr(10)|| 'else'||chr(10)|| ' return ''SELECT ''''Agent'''' display_value, ''''AGENT'''' return_value'||chr(10)|| ' from dual'';'||chr(10)||