andy/mip
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Correction to check_mandatory (all fields were being returned as 'mandatory').

Browse Source 
git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@3958 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
hardya
2008-03-12 14:57:29 +00:00
parent 1190dfb87e
commit 47b70c0e21
1 changed files with 44 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

80
Modules/gen_mandatory.prc
View File

@@ -212,7 +212,7 @@ BEGIN
add_sql(l_sql add_sql(l_sql
,' RETURN VARCHAR2;'); ,' RETURN VARCHAR2;');
add_sql(l_sql add_sql(l_sql
,' '); ,' ');
add_sql(l_sql add_sql(l_sql
,'END MIP_' || l_tables.table_name || '_HELPER;'); ,'END MIP_' || l_tables.table_name || '_HELPER;');
@@ -276,23 +276,25 @@ BEGIN
FOR l_checks IN (SELECT field_name FOR l_checks IN (SELECT field_name
,substr(condition ,substr(condition
,1 ,1
,1) ,1) AS condition
,enty_code ,enty_code
,error_message ,error_message
FROM data_item_roles) LOOP FROM data_item_roles) LOOP
add_sql(l_sql IF l_checks.condition = 'M' THEN
,' IF p_rec.ENTY_CODE = ''' || l_checks.enty_code || add_sql(l_sql
''' AND p_rec.' || l_checks.field_name || ' IS NULL THEN'); ,' IF p_rec.ENTY_CODE = ''' || l_checks.enty_code ||
add_sql(l_sql ''' AND p_rec.' || l_checks.field_name || ' IS NULL THEN');
,' MIP_MANDATORY.add_error(P_mandatory_checks=>l_mandatory_checks, P_field_name=>''' || add_sql(l_sql
l_checks.field_name || ''' ,p_error_message=>''' || ,' MIP_MANDATORY.add_error(P_mandatory_checks=>l_mandatory_checks, P_field_name=>''' ||
nvl(l_checks.error_message l_checks.field_name || ''' ,p_error_message=>''' ||
,'Mandatory Field') || ''');'); nvl(l_checks.error_message
add_sql(l_sql ,'Mandatory Field') || ''');');
,' END IF;'); add_sql(l_sql
add_sql(l_sql ,' END IF;');
,' '); add_sql(l_sql
,' ');
END IF;
END LOOP; END LOOP;
add_sql(l_sql add_sql(l_sql
@@ -500,15 +502,10 @@ BEGIN
,' RETURN data_item_roles.condition%TYPE'); ,' RETURN data_item_roles.condition%TYPE');
add_sql(l_sql add_sql(l_sql
,'IS'); ,'IS');
add_sql(l_sql
,' l_return data_item_roles.condition%TYPE;');
add_sql(l_sql add_sql(l_sql
,' '); ,' ');
add_sql(l_sql add_sql(l_sql
,'BEGIN'); ,'BEGIN');
add_sql(l_sql add_sql(l_sql
,' cout_assert.isnotnull(p_field_name,''NULL enquiry FIELD_NAME'');'); ,' cout_assert.isnotnull(p_field_name,''NULL enquiry FIELD_NAME'');');
@@ -519,29 +516,30 @@ BEGIN
,enty_code ,enty_code
,error_message ,error_message
FROM data_item_roles) LOOP FROM data_item_roles) LOOP
add_sql(l_sql add_sql(l_sql
,' IF p_enty_code = ''' || l_checks.enty_code || ,' IF p_enty_code = ''' || l_checks.enty_code ||
''' AND p_field_name = ''' || l_checks.field_name || ''' AND p_field_name = ''' || l_checks.field_name ||
''' THEN'); ''' THEN');
add_sql(l_sql add_sql(l_sql
,' l_return := ''' || l_checks.condition || ''';'); ,' RETURN (''' || l_checks.condition || ''');');
add_sql(l_sql add_sql(l_sql
,' END IF;'); ,' END IF;');
add_sql(l_sql add_sql(l_sql
,' '); ,' ');
END LOOP; END LOOP;
add_sql(l_sql add_sql(l_sql
,' '); ,' ');
-- return the overall response -- return the overall response
add_sql(l_sql add_sql(l_sql
,' RETURN l_return;'); ,' RETURN NULL;');
add_sql(l_sql add_sql(l_sql
,'END check_condition;'); ,'END check_condition;');
add_sql(l_sql add_sql(l_sql
,' '); ,' ');
add_sql(l_sql add_sql(l_sql
,'FUNCTION label_condition (p_enty_code in enquiries.enty_code%type'); ,'FUNCTION label_condition (p_enty_code in enquiries.enty_code%type');
add_sql(l_sql add_sql(l_sql
@@ -550,17 +548,27 @@ BEGIN
,' RETURN VARCHAR2'); ,' RETURN VARCHAR2');
add_sql(l_sql add_sql(l_sql
,'IS'); ,'IS');
add_sql(l_sql,'BEGIN'); add_sql(l_sql
add_sql(l_sql,' RETURN ('); ,'BEGIN');
add_sql(l_sql,' CASE mip_enquiries_helper.check_condition(p_enty_code, p_field_name)'); add_sql(l_sql
add_sql(l_sql,' WHEN ''M'' THEN ''*'''); ,' RETURN (');
add_sql(l_sql,' WHEN ''O-'' THEN ''+'''); add_sql(l_sql
add_sql(l_sql,' WHEN ''O'' THEN '' '''); ,' CASE mip_enquiries_helper.check_condition(p_enty_code, p_field_name)');
add_sql(l_sql,' WHEN ''H'' THEN ''H'''); add_sql(l_sql
add_sql(l_sql,' END'); ,' WHEN ''M'' THEN ''*''');
add_sql(l_sql,' );'); add_sql(l_sql
add_sql(l_sql,'END label_condition;'); ,' WHEN ''O-'' THEN ''+''');
add_sql(l_sql
,' WHEN ''O'' THEN '' ''');
add_sql(l_sql
,' WHEN ''H'' THEN ''H''');
add_sql(l_sql
,' END');
add_sql(l_sql
,' );');
add_sql(l_sql
,'END label_condition;');
add_sql(l_sql add_sql(l_sql
,' '); ,' ');