运行ColdFusion 2016应用程序时出现以下错误: 错误说:
[Macromedia] [Oracle JDBC驱动程序] [Oracle] ORA-06502:PL / SQL:数字或值错误:字符串缓冲区太小ORA-06512:at“PROC_CHECKDATA”,第1064行ORA-06512:第1行
这与调用存储过程并运行它有关。当我在ColdFusion 8中运行它时,这些代码可以运行多年,但是一旦我搬到ColdFusion 2016,它就会出错。我不太明白这个错误说的是什么。我感谢任何帮助。非常感谢你。
这是我的程序电话:
<cfstoredproc procedure="PROC_CHECKDATA" datasource="#application.DSN#">
<cfprocparam type="in" cfsqltype="CF_SQL_CHAR" DBVARNAME="ins" value="#url.ins#" MAXLENGTH="2">
<cfprocparam type="in" cfsqltype="CF_SQL_CHAR" DBVARNAME="ly" value="#url.ly#" MAXLENGTH="4">
<cfprocparam type="inout" cfsqltype="CF_SQL_VARCHAR" DBVARNAME="summary" variable="summary" value="">
<cfprocparam type="inout" cfsqltype="CF_SQL_VARCHAR" DBVARNAME="continue" variable="continue" value="">
<cfprocresult name="errors" resultset="1">
</cfstoredproc>
这是存储过程(在Oracle 11g中):
create or replace PROCEDURE proc_checkparentdata (
v_institution IN CHAR DEFAULT NULL,
v_load_year IN CHAR DEFAULT NULL,
v_summary OUT VARCHAR2, /* DEFAULT ' '*/
v_continue OUT VARCHAR2, /* DEFAULT ' '*/
cv_1 OUT SYS_REFCURSOR)
AS
v_rowcount NUMBER (10, 0);
v_errorcount NUMBER (5, 0);
BEGIN
-- clear comment
UPDATE um_parent_temp
SET comments = ' '
WHERE load_year = v_load_year AND institution = v_institution;
-- clear status
UPDATE um_parent_temp
SET status = ' '
WHERE load_year = v_load_year AND institution = v_institution;
-- campus code
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Campus code: '
|| institution
WHERE institution NOT IN ('BC', 'CP', 'ES', 'FS', 'SU', 'TU', 'UC')
AND load_year = v_load_year
AND institution = v_institution;
/* parent 1 */
-- firstname
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent firstname1 is missing'
WHERE NVL (trim(parent_fn1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
-- lastname
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent_lastname1 is missing'
WHERE NVL (trim(parent_ln1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
-- lastname1 too short
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent_lastname1 is too short'
WHERE Length(trim(parent_ln1)) = 1
AND load_year = v_load_year
AND institution = v_institution;
-- maximum label name = 60; includes three spaces
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent mailname1 is over 60 characters'
WHERE lengthc (nvl(trim(parent_prefix1),'') ||
nvl(trim(parent_fn1),'') || nvl(trim(parent_mn1),'') ||
nvl(trim(parent_ln1),'')) > 37
AND load_year = v_load_year
AND institution = v_institution;
-- prefix
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Prefix1: '
|| parent_prefix1
WHERE NVL (trim(parent_prefix1), ' ') = ' '
OR (NVL (trim(parent_prefix1), ' ') <> ' '
AND parent_prefix1 NOT IN
(SELECT gl_prefixes.campprefix FROM gl_prefixes)
AND load_year = v_load_year
AND institution = v_institution);
-- suffixPers
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Personal suffix1: '
|| parent_suffix_pers1
WHERE NVL (trim(parent_suffix_pers1), ' ') <> ' '
AND parent_suffix_pers1 NOT IN
(SELECT gl_suffixes.campsuffix FROM gl_suffixes)
AND load_year = v_load_year
AND institution = v_institution;
-- suffixProf
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Profession suffix1: '
|| parent_suffix_prof1
WHERE NVL (trim(parent_suffix_prof1), ' ') <> ' '
AND parent_suffix_prof1 NOT IN
(SELECT gl_suffixes.campsuffix FROM gl_suffixes)
AND load_year = v_load_year
AND institution = v_institution;
-- race
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Race1: '
|| race1
WHERE NVL (trim(race1), ' ') <> ' '
AND race1 NOT IN (SELECT campcode
FROM gl_races
WHERE campuscode = v_institution)
AND load_year = v_load_year
AND institution = v_institution;
-- sex
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Sex code1: '
|| sex1
WHERE NVL (trim(sex1), ' ') NOT IN ('M', 'F')
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Mismatching gender1 and prefix1: '
|| parent_prefix1
|| ' <---> '
|| sex1
WHERE ( (sex1 = 'M'
AND trim(parent_prefix1) IN ('Mrs.', 'Mrs', 'Miss.', 'Miss', 'Ms.',
'Ms'))
OR (trim(sex1) = 'F' AND trim(parent_prefix1) IN ('Mr.', 'Mr')))
AND load_year = v_load_year
AND institution = v_institution;
-- address
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Preferred address flag1: '
|| pref_addr1
|| '<br>'
|| 'note: must also have unlisted flag set for preferred addr'
WHERE trim(pref_addr1) NOT IN ('H', 'B')
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Home address1_1 is empty'
WHERE pref_addr1 = 'H'
AND NVL (trim(home_addr1_1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Business address1 is empty'
WHERE pref_addr1 = 'B'
AND NVL (trim(busn_addr1_1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
-- city
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Home city1 is empty'
WHERE NVL (trim(home_addr1_1), ' ') <> ' '
AND NVL (trim(home_city1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Business city1 is empty'
WHERE NVL (trim(busn_addr1_1), ' ') <> ' '
AND NVL (trim(busn_city1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
-- state
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Home state code1: '
|| home_state1
WHERE NVL (trim(home_addr1_1), ' ') <> ' '
AND trim(home_country1) IN ('US', 'USA', ' ')
AND trim(home_state1) NOT IN (SELECT tms_states.state_code FROM
tms_states)
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Business state code1: '
|| busn_state1
WHERE NVL (trim(busn_addr1_1), ' ') <> ' '
AND trim (busn_country1) IN ('US', 'USA', ' ')
AND busn_state1 NOT IN (SELECT tms_states.state_code FROM tms_states)
AND load_year = v_load_year
AND institution = v_institution;
-- zip
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Invalid home zip code1: '
|| home_zip1
WHERE trim(home_country1) IN ('US', 'USA', ' ')
AND INSTR (home_zip1, '-') > 0
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Invalid business zip code1: '
|| busn_zip1
WHERE trim (busn_country1) IN ('US', 'USA', ' ')
AND INSTR (busn_zip1, '-') > 0
AND load_year = v_load_year
AND institution = v_institution;
-- country
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Home country code1: '
|| home_country1
WHERE NVL (trim(home_country1), ' ') <> ' '
AND NVL (trim(home_country1), ' ') NOT IN (select campcountry from
gl_countries
WHERE gradloadcode = v_institution)
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Business country code1: '
|| busn_country1
WHERE NVL (trim(busn_country1), ' ') <> ' '
AND busn_country1 NOT IN (select campcountry from gl_countries
WHERE gradloadcode = v_institution)
AND load_year = v_load_year
AND institution = v_institution;
-- unlisted flag
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Invalid home unlisted flag 1'
WHERE pref_addr1 = 'H'
AND home_unlisted_flag1 NOT IN ('N', 'Y')
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Invalid business unlisted flag 1'
WHERE pref_addr1 = 'B'
AND busn_unlisted_flag1 NOT IN ('N', 'Y')
AND load_year = v_load_year
AND institution = v_institution;
/* parent 2 */
-- firstname
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent firstname2 is missing'
WHERE NVL (trim(parent_fn2), ' ') = ' '
AND NVL (trim(parent_ln2), ' ') <> ' '
AND load_year = v_load_year
AND institution = v_institution;
-- lastname
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent lastname2 is missing'
WHERE NVL (trim(parent_ln2), ' ') = ' '
AND NVL (trim(parent_fn2), ' ') <> ' '
AND load_year = v_load_year
AND institution = v_institution;
-- lastname2 too short
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent_lastname2 is too short'
WHERE Length(trim(parent_ln2)) = 1
AND NVL (trim(parent_fn2), ' ') <> ' '
AND load_year = v_load_year
AND institution = v_institution;
-- maximum label name = 460; includes three spaces
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Parent mailname2 is over 60 characters'
WHERE NVL (trim(parent_fn2), ' ') <> ' '
AND lengthc (parent_prefix2 || parent_fn2 || parent_mn2 ||
parent_ln2) > 57
AND load_year = v_load_year
AND institution = v_institution;
-- prefix
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Prefix2: '
|| parent_prefix2
WHERE NVL (trim(parent_prefix2), ' ') <> ' '
AND parent_prefix2 NOT IN
(SELECT gl_prefixes.campprefix FROM gl_prefixes)
AND load_year = v_load_year
AND institution = v_institution;
-- suffixPers
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Personal suffix2: '
|| parent_suffix_pers2
WHERE NVL (trim(parent_suffix_pers2), ' ') <> ' '
AND parent_suffix_pers2 NOT IN
(SELECT gl_suffixes.campsuffix FROM gl_suffixes)
AND load_year = v_load_year
AND institution = v_institution;
-- suffixProf
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Profession suffix2: '
|| parent_suffix_prof2
WHERE NVL (trim(parent_suffix_prof2), ' ') <> ' '
AND parent_suffix_prof2 NOT IN
(SELECT gl_suffixes.campsuffix FROM gl_suffixes)
AND load_year = v_load_year
AND institution = v_institution;
-- race
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Race2: '
|| race2
WHERE NVL (trim(race2), ' ') <> ' '
AND race2 NOT IN (SELECT campcode
FROM gl_races
WHERE campuscode = v_institution)
AND load_year = v_load_year
AND institution = v_institution;
-- sex
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Sex code2: '
|| sex2
WHERE NVL (trim(parent_fn2), ' ') <> ' '
AND sex2 NOT IN ('M', 'F')
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Missmatching gender2 and prefix2: '
|| parent_prefix2
|| ' <---> '
|| sex2
WHERE ( (sex2 = 'M'
AND trim(parent_prefix2) IN ('Mrs.', 'Mrs', 'Miss.', 'Miss', 'Ms.',
'Ms'))
OR (sex2 = 'F' AND trim(parent_prefix2) IN ('Mr.', 'Mr')))
AND load_year = v_load_year
AND institution = v_institution;
-- address
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Preferred address flag2: '
|| pref_addr2
|| '<br>'
|| 'note: must also have unlisted flag set for preferred addr'
WHERE NVL (trim(parent_fn2), ' ') <> ' '
AND pref_addr2 NOT IN ('H', 'B')
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Home address2_1 is empty'
WHERE NVL (trim(parent_fn2), ' ') <> ' '
AND pref_addr2 = 'H'
AND NVL (trim(home_addr2_1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Business address2 is empty'
WHERE NVL (trim(parent_fn2), ' ') <> ' '
AND pref_addr2 = 'B'
AND NVL (trim(busn_addr2_1), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
-- city
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Home city2 is empty'
WHERE NVL (trim(home_addr2_1), ' ') <> ' '
AND NVL (trim(home_city2), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Business city2 is empty'
WHERE NVL (trim(busn_addr2_1), ' ') <> ' '
AND NVL (trim(busn_city2), ' ') = ' '
AND load_year = v_load_year
AND institution = v_institution;
-- state
UPDATE um_parent_temp
SET comments =
(CASE comments WHEN ' ' THEN ' ' ELSE comments || '<br>' END)
|| 'Home state 2: '
|| home_state2
WHERE NVL (trim(home_addr2_1), ' ') <> ' '
AND trim(home_country2) IN ('US', 'USA', ' ')
AND trim(home_state2) NOT IN (SELECT tms_states.state_code FROM
tms_states)
AND load_year = v_load_year
AND institution = v_institution;
我无法输入更多代码,但其余部分类似
答案 0 :(得分:3)
ColdFusion 2016无法使用DBVARNAME
代码的<cfstoredproc>
属性。
从评论中提升
我在Oracle中运行程序,程序运行得很好!但是通过ColdFusion调用它会生成错误ORA-06502: PL/SQL: numeric or value error: character string buffer too small
。它指向这一行:
v_summary := '<b>Institution:</b> ' ||
v_institution ||
'<br><b>Load Code:</b> ' ||
v_load_year ||
'<br><b>Total records checked:</b> ' ||
TO_CHAR (v_rowcount, '99999') ||
'<br><b>Total records with errors:</b> ' ||
TO_CHAR (v_errorcount, '99999');
如果我注释掉这部分,程序就会运行。