7
Mam zainstalowany serwer Windows 2008 z zainstalowanym Coldfusion 9. Mam aplikację, która przesyła formularz, a po przesłaniu otrzymuje stronę 500 błędów serwera wewnętrznego. Sprawdziłem logi i nic nie jest tam rejestrowane. Słyszałem o problemie z przesłaniem ponad 100 pól formularzy, ale mój formularz składa się z 64, maks. Mam zaznaczone Włącz sprawdzone informacje o wyjątku z dodanym adresem IP i niezaznaczonymi kodami stanu HTTP. Widzę wszystkie informacje dotyczące debugowania na wszystkich stronach aż do strony błędu. Mam do pliku wszystkie informacje, które strona umieszcza w polach formularzy i utworzyłem stronę z tylko tymi polami formularza i tymi wartościami, która przesyła grzywnę. Utknąłem na tym od tygodnia. Nie wiem nic więcej. Jakieś sugestie??? Proszę!!!!Coldfusion 9 HTML z 500 wewnętrznym błędem serwera
<!--- #Include Header Page Here --->
<cfset session.headertitle = "Budget Revision to Sponsored Project-Calculation">
<!--- <cfinclude template="grantsys_header_nogif.cfm"> --->
<cfinclude template="../ps_common_scripts/header.cfm">
<CFINCLUDE template="grants_logincheck.cfm">
<cfset tfile=''>
<!--- Get Page Inputs --->
<CFIF IsDefined ("Form.Setid") AND IsDefined("Form.SpeedType") AND IsDefined("Form.SpeedType_Sub")>
<CFSET Setid = Trim(UCase(Form.Setid))>
<CFSET SpeedType1 = Trim(UCase(Form.SpeedType))>
<CFSET SpeedType2 = Trim(UCase(Form.SpeedType_Sub))>
<CFLOCK SCOPE="SESSION" TYPE="EXCLUSIVE" TIMEOUT="2">
<CFSET Session.SpeedType2 = Trim(UCase(Form.SpeedType_Sub))>
</CFLOCK>
<CFELSEIF IsDefined("URL.SpeedType") AND IsDefined("URL.SpeedType_Sub")>
<CFSET Setid = Trim(UCase(Form.Setid))>
<CFSET SpeedType1 = Trim(UCase(URL.SpeedType))>
<CFSET SpeedType2 = Trim(UCase(URL.SpeedType_Sub))>
<CFSET Session.SpeedType2 = Trim(UCase(URL.SpeedType_Sub))>
<CFELSE>
<P><B>Error:</B> Expected page inputs are missing.</P>
<CFINCLUDE template="br_footer.cfm">
<CFABORT>
</CFIF>
<!--- If a SubSpeedType is specified (not NEW or blank)... --->
<CFIF SpeedType2 NEQ "NEW" AND SpeedType2 NEQ "">
<!---Get Subheader data--->
<CFQUERY name="qHdr2" datasource="#Application.DSN#">
SELECT /*+ FIRST_ROWS */ SP.DEPTID, SP.FUND_CODE,
PF.GT_FUND_TITLE,
PJ.GT_CONTR_NO,
PJ.GT_PROJ_STARTDT,
PJ.GT_PROJ_EXPDT,
PJ.GT_SPON_NAME,
PJ.GT_PROJ_TITLE,
PD.GT_PROJ_DIR,
PT.DESCR,
PE.NAME
FROM SYSADM.PS_SPEEDTYP_TBL SP,
SYSADM.PS_GT_GM_PROJ PJ,
SYSADM.PS_GT_GM_PROJ_PDPI PD,
SYSADM.PS_DEPT_TBL PT,
SYSADM.PS_GT_GM_HR_DATA PE,
SYSADM.PS_GT_GM_FUND PF
WHERE SP.SETID = '#Setid#'
AND SP.SPEEDTYPE_KEY = '#SpeedType2#'
AND SP.BUDGET_REF = ( SELECT MAX(BUDGET_REF)
FROM SYSADM.PS_SPEEDTYP_TBL
WHERE SETID = SP.SETID
AND SPEEDTYPE_KEY = SP.SPEEDTYPE_KEY
)
AND PJ.SETID = SP.SETID
AND PJ.PROJECT_ID = SP.SPEEDTYPE_KEY
AND PJ.FUND_CODE(+) = SP.FUND_CODE
AND PJ.FUND_CODE BETWEEN 'A0000' AND 'Z9999'
AND PJ.EFF_STATUS = 'A'
AND PJ.EFFDT = (
SELECT MAX(PJ_ED.EFFDT)
FROM SYSADM.PS_GT_GM_PROJ PJ_ED
WHERE PJ_ED.SETID = PJ.SETID
AND PJ_ED.PROJECT_ID = PJ.PROJECT_ID
AND PJ_ED.EFFDT <= SYSDATE)
AND PD.SETID(+) = PJ.SETID
AND PD.PROJECT_ID(+) = PJ.PROJECT_ID
AND PD.EFFDT(+) = PJ.EFFDT
AND PT.SETID = SP.SETID
AND PT.DEPTID = SP.DEPTID
AND PT.EFF_STATUS = 'A'
AND PT.EFFDT = (
SELECT MAX(PT_ED.EFFDT)
FROM SYSADM.PS_DEPT_TBL PT_ED
WHERE PT_ED.SETID = PT.SETID
AND PT_ED.DEPTID = PT.DEPTID
AND PT_ED.EFFDT <= SYSDATE )
AND PE.EMPLID(+) = PD.GT_PROJ_DIR
AND PF.SETID = SP.SETID
AND PF.FUND_CODE = PJ.GT_GM_FUND
AND PF.EFF_STATUS = 'A'
AND PF.EFFDT = (
SELECT MAX(PF_ED.EFFDT)
FROM SYSADM.PS_GT_GM_FUND PF_ED
WHERE PF_ED.SETID = PF.SETID
AND PF_ED.FUND_CODE = PF.FUND_CODE
AND PF_ED.EFFDT <= SYSDATE )
ORDER BY PD.GT_PRIME_PDPI DESC
</CFQUERY>
<cfif "#qHdr2.RecordCount#" EQ 0>
<P align="center"><B>Error:</B> Project ID# <cfoutput><strong>#SpeedType2#</strong></cfoutput> cannot be found. Please go back and enter a valid Project ID.</P>
<CFINCLUDE template="br_footer.cfm">
<CFABORT>
</cfif>
</CFIF>
<!--- Display Data --->
<CFFORM action="br_submit_test.cfm?tfile" method="post" name="frmCalc" id="frmCalc">
<TABLE align="center" border="1" width="100%">
<TR bgcolor="Navy">
<TD colspan="2" align="left">
</TD>
<TD colspan="3" align="center">
<FONT size="+2" color="White">From</FONT>
</TD>
<TD colspan="3" align="center">
<FONT size="+2" color="White">To</FONT>
</TD>
</TR>
<CFOUTPUT>
<TR>
<TD colspan="2" align="left">
Setid: <FONT><B>#Setid#</B></FONT>
</TD>
<TD colspan="3" align="center">
<B>#SpeedType1#</B>
<INPUT type="hidden" name="SpeedType1" value="#SpeedType1#">
<cfset tfile=#tfile#&"SpeedType1 #SpeedType1#"><br>
</TD>
<TD colspan="3" align="center">
<CFIF SpeedType2 NEQ "NEW" AND SpeedType2 NEQ "">
<B>#SpeedType2#</B>
<INPUT type="hidden" name="SpeedType2" value="#SpeedType2#">
<cfset tfile=#tfile#&"SpeedType2 #SpeedType2#"><br>
<CFELSEIF SpeedType2 EQ "NEW">
SpeedType: <input type="hidden" value="NEW" name="SpeedType2" size="10"> (NEW)
<cfset tfile=#tfile#&"SpeedType2 NEW #SpeedType2#"><br>
<CFELSE>
<INPUT type="hidden" name="SpeedType2" value="">
</CFIF>
</TD>
</TR>
<TR>
<TD colspan="2">
School/Center/Lab:
</TD>
<TD colspan="3">
#qHdr1.DESCR# - #qHdr1.DEPTID#
<INPUT type="hidden" name="DEPTID1" value="#qHdr1.DEPTID# - #qHdr1.DESCR# ">
<cfset tfile=#tfile#&"qHdr1.DEPTID - qHdr1.DESCR #qHdr1.DEPTID# - #qHdr1.DESCR#"><br>
</TD>
<TD colspan="3">
<CFIF SpeedType2 NEQ "NEW" AND SpeedType2 NEQ "">
#qHdr2.DESCR# - #qHdr2.DEPTID#
<INPUT type="hidden" name="DEPTID2" value="#qHdr2.DEPTID#">
<cfset tfile=#tfile#&"qHdr2.DEPTID #qHdr2.DEPTID#"><br>
<CFELSEIF SpeedType2 EQ "NEW">
<CFQUERY name="querydeptid2" datasource="#Application.DSN#">
SELECT DISTINCT DEPTID, DESCR
FROM SYSADM.PS_DEPT_TBL
ORDER BY DESCR
</CFQUERY>
<SELECT size="1" name="DEPTID2">
<CFLOOP query="querydeptid2">
<CFIF Trim(DESCR) EQ "">
<OPTION value="#DEPTID#">
#DEPTID#
</OPTION>
<CFELSE>
<OPTION value="#DEPTID#">
#Left(DESCR,30)# - #DEPTID#
</OPTION>
</CFIF>
</CFLOOP>
</SELECT>
<CFELSE>
</CFIF>
</TD>
</TR>
<TR>
<TD colspan="2">
Fund:
</TD>
<TD colspan="3">
#qHdr1.FUND_CODE# - #qHdr1.DESCR#
<INPUT TYPE="hidden" name="FUND_CODE1" value="#qHdr1.FUND_CODE# - #qHdr1.DESCR#">
<cfset tfile=#tfile#&"qHdr1.FUND_CODE - qHdr1.DESCR #qHdr1.FUND_CODE# - #qHdr1.DESCR#"><br>
</TD>
<TD colspan="3">
<!--- CC8254 - Begin --->
<CFIF SpeedType2 EQ "NEW">
#qHdr1.FUND_CODE# - #qHdr1.DESCR#
<CFELSEIF SpeedType2 EQ "">
<CFELSE>
#qHdr2.FUND_CODE# - #qHdr2.DESCR#
</CFIF>
<!--- CC8254 - End --->
</TD>
</TR>
<TR>
<TD colspan="2">
Project Director:
</TD>
<TD colspan="3">
#qHdr1.GT_PROJ_DIR# - #qHdr1.NAME#
<INPUT TYPE="hidden" name="NAME1" value="#qHdr1.GT_PROJ_DIR# - #qHdr1.NAME#">
<cfset tfile=#tfile#&"qHdr1.GT_PROJ_DIR - qHdr1.NAME #qHdr1.GT_PROJ_DIR# - #qHdr1.NAME#"><br>
</TD>
<TD colspan="3">
<CFIF SpeedType2 NEQ "NEW" AND SpeedType2 NEQ "">
#qHdr2.GT_PROJ_DIR# - #qHdr2.NAME#
<INPUT TYPE="hidden" name="NAME2" value="#qHdr2.GT_PROJ_DIR# - #qHdr2.NAME#">
<cfset tfile=#tfile#&"qHdr2.GT_PROJ_DIR - qHdr2.NAME #qHdr2.GT_PROJ_DIR# - #qHdr2.NAME#"><br>
#qHdr2.DEPTID#
<CFELSEIF SpeedType2 EQ "NEW">
<CFQUERY name="queryprojdir2" datasource="#Application.DSN#">
SELECT DISTINCT A.GT_PROJ_DIR EMPLID, B.NAME
FROM SYSADM.PS_GT_GM_FUND_PDPI A,
SYSADM.PS_GT_GM_HR_DATA B
WHERE A.GT_PROJ_DIR = B.EMPLID
UNION
SELECT DISTINCT A.GT_PROJ_DIR EMPLID, B.NAME
FROM SYSADM.PS_GT_GM_PROJ_PDPI A,
SYSADM.PS_GT_GM_HR_DATA B
WHERE A.GT_PROJ_DIR = B.EMPLID
ORDER BY 2,1
</CFQUERY>
<SELECT size="1" name="NAME2">
<CFLOOP query="queryprojdir2">
<OPTION value="#EMPLID#">
#NAME# - #EMPLID#
</OPTION>
</CFLOOP>
</SELECT>
<CFELSE>
</CFIF>
</TD>
</TR>
<TR>
<TD colspan="2">
Award No.:
</TD>
<TD colspan="3">
#qHdr1.GT_CONTR_NO#
<INPUT TYPE="hidden" name="GT_CONTR_NO1" value="#qHdr1.GT_CONTR_NO#">
<cfset tfile=#tfile#&"qHdr1.GT_CONTR_NO #qHdr1.GT_CONTR_NO#"><br>
</TD>
<TD colspan="3">
<!--- CC8254 - Begin--->
<CFIF SpeedType2 NEQ "">
#qHdr1.GT_CONTR_NO#
<INPUT TYPE="hidden" name="GT_CONTR_NO2" value="#qHdr1.GT_CONTR_NO#">
<cfset tfile=#tfile#&"qHdr1.GT_CONTR_NO #qHdr1.GT_CONTR_NO#"><br>
</CFIF>
<CFIF SpeedType2 EQ "NEW">
#qHdr1.GT_CONTR_NO#
<CFELSEIF SpeedType2 EQ "">
<CFELSE>
#qHdr2.GT_CONTR_NO#
</CFIF>
<!--- CC8254 - End --->
</TD>
</TR>
<TR>
<TD colspan="2">
Submission Date:
</TD>
<TD colspan="3">
#DateFormat(Now(), "mm/dd/yyyy")#
<INPUT TYPE="hidden" name="DATE1" value="#DateFormat(Now(), "mm/dd/yyyy")#">
<cfset tfile=#tfile#&"Date 1 #DateFormat(Now(), "mm/dd/yyyy")#<br>">
</TD>
<TD colspan="3">
<CFIF SpeedType2 NEQ "">
#DateFormat(Now(), "mm/dd/yyyy")#
<INPUT TYPE="hidden" name="DATE2" value="#DateFormat(Now(), "mm/dd/yyyy")#">
<cfset tfile=#tfile#&"Date 2 #DateFormat(Now(), "mm/dd/yyyy")#<br>">
<CFELSE>
</CFIF>
</TD>
</TR>
<TR>
<TD colspan="2">
Start Date:
</TD>
<TD colspan="3">
#DateFormat(qHdr1.GT_PROJ_STARTDT, "mm/dd/yyyy")#
<INPUT TYPE="hidden" name="GT_PROJ_STARTDT1" value="#DateFormat(qHdr1.GT_PROJ_STARTDT, "mm/dd/yyyy")#">
<cfset tfile=#tfile#&"qHdr2.GT_PROJ_STARTDT1 #DateFormat(qHdr2.GT_PROJ_STARTDT, "mm/dd/yyyy")#<br>">
</TD>
<TD colspan="3">
<CFIF SpeedType2 NEQ "NEW" AND SpeedType2 NEQ "">
#DateFormat(qHdr2.GT_PROJ_STARTDT, "mm/dd/yyyy")#
<INPUT TYPE="hidden" name="GT_PROJ_STARTDT2" value="#DateFormat(qHdr2.GT_PROJ_STARTDT, "mm/dd/yyyy")#">
<cfset tfile=#tfile#&"qHdr2.GT_PROJ_STARTDT2 #DateFormat(qHdr2.GT_PROJ_STARTDT, "mm/dd/yyyy")#<br>">
<CFELSEIF SpeedType2 EQ "NEW">
<input type="text" name="GT_PROJ_STARTDT2" size="30" onChange = "return(isValidDate(this) && CheckDate(this))">
<CFELSE>
</CFIF>
<CFIF SpeedType2 EQ "new">(mm/dd/yyyy)</CFIF>
</TD>
</TR>
<TR>
<TD colspan="2">
End Date:
</TD>
<TD colspan="3">
#DateFormat(qHdr1.GT_PROJ_EXPDT, "mm/dd/yyyy")#
<INPUT TYPE="hidden" name="GT_PROJ_EXPDT1" value="#DateFormat(qHdr1.GT_PROJ_EXPDT, "mm/dd/yyyy")#">
<cfset tfile=#tfile#&"qHdr2.GT_PROJ_EXPDT1 #DateFormat(qHdr2.GT_PROJ_EXPDT, "mm/dd/yyyy")#<br>">
</TD>
<TD colspan="3">
<CFIF SpeedType2 NEQ "NEW" AND SpeedType2 NEQ "">
#DateFormat(qHdr2.GT_PROJ_EXPDT, "mm/dd/yyyy")#
<INPUT TYPE="hidden" name="GT_PROJ_EXPDT2" value="#DateFormat(qHdr2.GT_PROJ_EXPDT, "mm/dd/yyyy")#">
<cfset tfile=#tfile#&"qHdr2.GT_PROJ_EXPDT2 #DateFormat(qHdr2.GT_PROJ_EXPDT, "mm/dd/yyyy")#<br>">
<CFELSEIF SpeedType2 EQ "NEW">
<input type="text" name="GT_PROJ_EXPDT2" size="30" onChange="return(isValidDate(this) && CheckDate(this))">
<CFELSE>
</CFIF>
<CFIF SpeedType2 EQ "new">(mm/dd/yyyy)</CFIF>
</TR>
</TD>
<TR>
<TD colspan="2">
Sponsor:
</TD>
<TD colspan="3">
#qHdr1.GT_SPON_NAME#
<INPUT TYPE="hidden" name="GT_SPON_NAME1" value="#qHdr1.GT_SPON_NAME#">
<cfset tfile=#tfile#&"qHdr1.GT_SPON_NAME1 #qHdr1.GT_SPON_NAME#<br>">
</TD>
<TD colspan="3">
<!--- CC8254 - Begin--->
<CFIF SpeedType2 NEQ "">
#qHdr1.GT_SPON_NAME#
<INPUT TYPE="hidden" name="GT_SPON_NAME2" value="#qHdr1.GT_SPON_NAME#">
<cfset tfile=#tfile#&"qHdr1.GT_SPON_NAME2 #qHdr1.GT_SPON_NAME#<br>">
</CFIF>
<CFIF SpeedType2 EQ "NEW">
#qHdr1.GT_SPON_NAME#
<CFELSEIF SpeedType2 EQ "">
<CFELSE>
#qHdr2.GT_SPON_NAME#
</CFIF>
<!--- CC8254 - End --->
</TD>
</TR>
<TR>
<TD colspan="2">
Name of Project:
</TD>
<TD colspan="3">
#qHdr1.GT_PROJ_TITLE#
<INPUT TYPE="hidden" name="GT_PROJ_TITLE1" value="#qHdr1.GT_PROJ_TITLE#">
<cfset tfile=#tfile#&"qHdr2.GT_PROJ_TITLE1 #qHdr2.GT_PROJ_TITLE#<br>">
</TD>
<TD colspan="3">
<CFIF SpeedType2 NEQ "NEW" AND SpeedType2 NEQ "">
#qHdr2.GT_PROJ_TITLE#
<INPUT TYPE="hidden" name="GT_PROJ_TITLE2" value="#qHdr2.GT_PROJ_TITLE#">
<cfset tfile=#tfile#&"qHdr2.GT_PROJ_TITLE2 #qHdr2.GT_PROJ_TITLE#<br>">
<CFELSEIF SpeedType2 EQ "NEW">
<input type="text" name="GT_PROJ_TITLE2" size="30">
<CFELSE>
</CFIF>
</TD>
</TR>
</CFOUTPUT>
<!--- Display Budget Totals & Input Fields --->
<TR bgcolor="Navy">
<TD colspan="2">
<FONT color="White"><B>BUDGET CATEGORY</B></FONT>
</TD>
<TD align="right">
<FONT color="White"><B>CURRENT<BR>BUDGET</FONT>
</TD>
<TD align="right">
<FONT color="White"><B>INCREASE+<BR>DECREASE-</FONT>
</TD>
<TD align="right">
<FONT color="White"><B>REVISED<BR>BUDGET</FONT>
</TD>
<TD align="right">
<FONT color="White"><B>CURRENT<BR>BUDGET</FONT>
</TD>
<TD align="right">
<FONT color="White"><B>INCREASE+<BR>DECREASE-</FONT>
</TD>
<TD align="right">
<FONT color="White"><B>REVISED<BR>BUDGET</FONT>
</TD>
</TR>
<CFQUERY name="qData" datasource="#Application.DSN#">
SELECT X.FIELDVALUE, X.XLATSHORTNAME,
H.PROJECT_ID PID1, H.BUDG_LTD BUD1, H.FISCAL_YEAR FY1,
H.ACCOUNTING_PERIOD P1, H2.PROJECT_ID PID2,
H2.BUDG_LTD BUD2, H2.FISCAL_YEAR FY2,
H2.ACCOUNTING_PERIOD P2
<!--- FROM SYSADM.XLATTABLE X, SYSADM.PS_GT_GS_AMTS_HDR H, SYSADM.PS_GT_GS_AMTS_HDR H2 --->
FROM SYSADM.XLATTABLE_VW X, SYSADM.PS_GT_GS_AMTS_HDR H, SYSADM.PS_GT_GS_AMTS_HDR H2
WHERE X.FIELDNAME = 'GT_SPONSORED_CAT'
AND X.FIELDVALUE NOT IN ('S89','SDT','SCH')
AND X.FIELDVALUE LIKE 'S%'
<!--- AND X.LANGUAGE_CD = 'ENG' --->
AND X.EFF_STATUS = 'A'
AND X.EFFDT = (
SELECT MAX(EFFDT)
<!--- FROM SYSADM.XLATTABLE --->
FROM SYSADM.XLATTABLE_VW
WHERE FIELDNAME = 'GT_SPONSORED_CAT'
AND FIELDVALUE = X.FIELDVALUE
<!--- AND LANGUAGE_CD = X.LANGUAGE_CD --->
AND EFF_STATUS = X.EFF_STATUS
)
AND H.SETID (+) = '#Setid#'
AND H.PROJECT_ID (+) = '#SpeedType1#'
AND H.GT_SPONSORED_CAT (+) = X.FIELDVALUE
AND (H.FISCAL_YEAR = (
SELECT MAX(FISCAL_YEAR)
FROM SYSADM.PS_GT_GS_AMTS_HDR
WHERE SETID = H.SETID
AND PROJECT_ID = H.PROJECT_ID
)
OR
H.FISCAL_YEAR IS NULL)
AND (H.ACCOUNTING_PERIOD = (
SELECT MAX(ACCOUNTING_PERIOD)
FROM SYSADM.PS_GT_GS_AMTS_HDR
WHERE SETID = H.SETID
AND FISCAL_YEAR = H.FISCAL_YEAR
AND PROJECT_ID = H.PROJECT_ID
)
OR
H.ACCOUNTING_PERIOD IS NULL)
AND H2.SETID (+) = '#Setid#'
AND H2.PROJECT_ID (+) = '#SpeedType2#'
AND H2.GT_SPONSORED_CAT (+) = X.FIELDVALUE
AND (H2.FISCAL_YEAR = (
SELECT MAX(FISCAL_YEAR)
FROM SYSADM.PS_GT_GS_AMTS_HDR
WHERE SETID = H2.SETID
AND PROJECT_ID = H2.PROJECT_ID
)
OR
H2.FISCAL_YEAR IS NULL)
AND (H2.ACCOUNTING_PERIOD = (
SELECT MAX(ACCOUNTING_PERIOD)
FROM SYSADM.PS_GT_GS_AMTS_HDR
WHERE SETID = H2.SETID
AND FISCAL_YEAR = H2.FISCAL_YEAR
AND PROJECT_ID = H2.PROJECT_ID
)
OR
H2.ACCOUNTING_PERIOD IS NULL)
ORDER BY X.FIELDVALUE
</CFQUERY>
<CFSET TCurrBud = 0>
<CFSET TCurrBudSub = 0>
<CFOUTPUT query="qData">
<CFQUERY name="qCat" datasource="#Application.DSN#">
SELECT CAT.GT_LBL_#qData.FIELDVALUE# LABEL, CAT.GT_CAT_#qData.FIELDVALUE# CATEGORY
FROM SYSADM.PS_GT_GM_PROJ_CAT CAT
WHERE CAT.SETID = '#Setid#'
AND CAT.PROJECT_ID = '#SpeedType1#'
AND CAT.GT_CAT_KEY = 'CAT'
AND CAT.EFFDT = (
SELECT MAX(EFFDT)
FROM SYSADM.PS_GT_GM_PROJ_CAT CAT_DT
WHERE CAT_DT.SETID = CAT.SETID
AND CAT_DT.PROJECT_ID = CAT.PROJECT_ID
AND CAT_DT.GT_CAT_KEY = CAT.GT_CAT_KEY
)
</CFQUERY>
<CFQUERY name="qCatSub" datasource="#Application.DSN#">
SELECT CAT.GT_LBL_#qData.FIELDVALUE# LABEL, CAT.GT_CAT_#qData.FIELDVALUE# CATEGORY
FROM SYSADM.PS_GT_GM_PROJ_CAT CAT
WHERE CAT.SETID = '#Setid#'
AND CAT.PROJECT_ID = '#SpeedType2#'
AND CAT.GT_CAT_KEY = 'CAT'
AND CAT.EFFDT = (
SELECT MAX(EFFDT)
FROM SYSADM.PS_GT_GM_PROJ_CAT CAT_DT
WHERE CAT_DT.SETID = CAT.SETID
AND CAT_DT.PROJECT_ID = CAT.PROJECT_ID
AND CAT_DT.GT_CAT_KEY = CAT.GT_CAT_KEY
)
</CFQUERY>
<TR>
<TD>
#FIELDVALUE#
<INPUT type="hidden" name="Cat#FIELDVALUE#" value="#FIELDVALUE#">
<cfset tfile=#tfile#&"Cat#FIELDVALUE# #FIELDVALUE#<br>">
</TD>
<TD>
#XLATSHORTNAME#
<INPUT type="hidden" name="CatName#FIELDVALUE#" value="#XLATSHORTNAME#">
<cfset tfile=#tfile#&"CatName#FIELDVALUE# #XLATSHORTNAME#<br>">
</TD>
<TD align="right">
<INPUT type="text" name="#FIELDVALUE#CurrBud" value="#NumberFormat(IIF(BUD1 IS "", "0", "BUD1"), "L9999999999.00")#" size="10" readonly>
<cfset tfile=#tfile#&"#FIELDVALUE#CurrBud #NumberFormat(IIF(BUD1 IS "", "0", "BUD1"), "L9999999999.00")#<br>">
<CFIF Bud1 NEQ "">
<CFSET TCurrBud = TCurrBud + Bud1>
</CFIF>
</TD>
<TD align="right">
<!--- <INPUT type="Text" name="#FIELDVALUE#AdjBud" maxlength="10" size="10" onChange="return Calc('#FIELDVALUE#',0)"> --->
<CFIF "#qCat.CATEGORY#" EQ 'Y'>
<INPUT type="Text" name="#FIELDVALUE#AdjBud" maxlength="10" size="10" onChange="return CheckCalc('#FIELDVALUE#',0)">
<CFELSE>
<input type="text" name="#FIELDVALUE#AdjBud" size="10" maxlength="10" readonly onChange="return CheckCalc('#FIELDVALUE#',0)">
</cfif>
</TD>
<TD align="right">
<INPUT type="text" name="#FIELDVALUE#RevBud" value="#NumberFormat(IIF(BUD1 IS "", "0", "BUD1"), "L9999999999.00")#" size="10" readonly>
</TD>
<TD align="right">
<CFIF SpeedType2 NEQ "">
<INPUT type="text" name="#FIELDVALUE#CurrBudSub" value="#NumberFormat(IIF(BUD2 IS "", "0", "BUD2"), "L9999999999.00")#" size="10" readonly>
<cfset tfile=#tfile#&"FIELDVALUECurrBudSub #FIELDVALUE#CurrBudSub #NumberFormat(IIF(BUD2 IS "", "0", "BUD2"), "L9999999999.00")#<br>">
<CFIF Bud2 NEQ "">
<CFSET TCurrBudSub = TCurrBudSub + Bud2>
<cfset tfile=#tfile#&"TCurrBudSub #TCurrBudSub#<br>">
</CFIF>
<CFELSE>
</CFIF>
</TD>
<TD align="right">
<CFIF SpeedType2 NEQ "">
<CFIF "#qCatSub.CATEGORY#" EQ 'Y' OR "#FORM.SpeedType_Sub#" EQ 'NEW'>
<INPUT type="Text" name="#FIELDVALUE#AdjBudSub" maxlength="10" size="10" onChange="return CheckCalc('#FIELDVALUE#',1)">
<CFELSE>
<INPUT type="Text" name="#FIELDVALUE#AdjBudSub" maxlength="10" size="10" onChange="return CheckCalc('#FIELDVALUE#',1)" readonly>
<cfset tfile=#tfile#&"FIELDVALUEAdjBudSub #FIELDVALUE#AdjBudSub<br>">
</CFIF>
<CFELSE>
</CFIF>
</TD>
<TD align="right">
<CFIF SpeedType2 NEQ "">
<INPUT type="text" name="#FIELDVALUE#RevBudSub" value="#NumberFormat(IIF(BUD2 IS "", "0", "BUD2"), "L9999999999.00")#" size="10" readonly>
<cfset tfile=#tfile#&"NumberFormat(IIF(BUD2 IS , 0, BUD2), L9999999999.00) #NumberFormat(IIF(BUD2 IS "", "0", "BUD2"), "L9999999999.00")#<br>">
<CFELSE>
</CFIF>
</TD>
</TR>
</CFOUTPUT>
<!--- Display Totals --->
<CFOUTPUT>
<TR bgcolor="Navy">
<TD colspan="2" align="right">
<FONT color="White">TOTALS:</FONT>
</TD>
<TD align="right">
<INPUT type="text" name="CurrBudTotal" value="#NumberFormat(TCurrBud, "L9999999999.00")#" size="10" readonly>
</TD>
<TD align="right">
<INPUT type="text" name="AdjBudTotal" value="#NumberFormat(0, "L9999999999.00")#" size="10" readonly>
</TD>
<TD align="right">
<INPUT type="text" name="RevBudTotal" value="#NumberFormat(TCurrBud, "L9999999999.00")#" size="10" readonly>
</TD>
<CFIF SpeedType2 NEQ "">
<TD align="right">
<INPUT type="text" name="CurrBudSubTotal" value="#NumberFormat(TCurrBudSub, "L9999999999.00")#" size="10" readonly>
</TD>
<TD align="right">
<INPUT type="text" name="AdjBudSubTotal" value="#NumberFormat(0, "L9999999999.00")#" size="10" readonly>
</TD>
<TD align="right">
<INPUT type="text" name="RevBudSubTotal" value="#NumberFormat(TCurrBudSub, "L9999999999.00")#" size="10" readonly>
</TD>
<CFELSE>
<TD align="right">
<INPUT type="hidden" name="CurrBudSubTotal" value="0" size="10" readonly>
</TD>
<TD align="right">
<INPUT type="hidden" name="AdjBudSubTotal" value="0" size="10" readonly>
</TD>
<TD align="right">
<INPUT type="hidden" name="RevBudSubTotal" value="0" size="10" readonly>
</TD>
</CFIF>
</TR>
</CFOUTPUT>
</TABLE>
<BR>
<H2>Department/Unit Approval:</H2>
Approved by:
<INPUT type="Text" name="Approvedby" size="20" maxlength="35">
Title:
<INPUT type="Text" name="Title" size="20" maxlength="35">
Date:
<cfinput type="Text" name="Date" required="No" size="20" maxlength="35" onChange="return (isValidDate(this))">
<BR>
<FONT color="black">(Department Officer/Project Director)</FONT>
<HR>
<P>E-mail copy (or copies) of this request to the following e-mail address(es):
<input type="text" name="CC_To" size="70" maxlength="250">
<BR>
<BR>
<HR>
<!---
<B>NOTIFICATION TO BE SENT TO:</B>(Please enter name and fax number of individuals to receive copy of completed form)
<HR>
<TABLE>
<TR>
<TD>
<B>Title</B>
</TD>
<TD>
<B>Name</B>
</TD>
<TD>
<B>Fax Number</B>
</TD>
</TR>
<TR>
<TD>
School/Department Director:
</TD>
<TD>
<INPUT type="Text" name="SDC" size="30" maxlength="35">
</TD>
<TD>
<INPUT type="Text" name="FaxNumber1" size="10" maxlength="15">
</TD>
</TR>
<TR>
<TD>
Project Director-Main Project:
</TD>
<TD>
<INPUT type="Text" name="PDMP" size="30" maxlength="35">
</TD>
<TD>
<INPUT type="Text" name="FaxNumber2" size="10" maxlength="15">
</TD>
</TR>
<TR>
<TD>
Project Director-Sub Project:
</TD>
<TD>
<INPUT type="Text" name="PDSP" size="30" maxlength="35">
</TD>
<TD>
<INPUT type="Text" name="FaxNumber3" size="10" maxlength="15">
</TD>
</TR>
<TR>
<TD>
School/Department Administrator:
</TD>
<TD>
<INPUT type="Text" name="SDA" size="30" maxlength="35">
</TD>
<TD>
<INPUT type="Text" name="FaxNumber4" size="10" maxlength="15">
</TD>
</TR>
<TR>
<TD>
Other: <INPUT type="Text" name="othername" size="30" maxlength="15">
</TD>
<TD>
<INPUT type="Text" name="other" size="30" maxlength="35">
</TD>
<TD>
<INPUT type="Text" name="FaxNumber5" size="10" maxlength="15">
</TD>
</TR>
</TABLE>
--->
Remarks (Maximum characters: 250):
<br>
<!--<textarea name="remarks" wrap="physical" cols="75" rows="3" maxlength="500"> CC8230 disabled mk5 -->
<!--</textarea> CC8230 disabled mk5 -->
<!-- CC8230 mk5 - Begin -->
<TEXTAREA name="remarks" cols="75" onKeyDown="limitText(remarks,countdown,250);"
onKeyUp="limitText(remarks,countdown,250);">
</TEXTAREA>
<BR>
You have <INPUT readonly type="text" name="countdown" size="3" value="250"> characters left.</font>
<!-- CC8230 mk5 - End -->
<HR>
<BR>
<!-------------------------------------------------------------------------------------------->
<!--- For testing --->
<cffile action="write" file="location\tf99.txt" output=#tfile#>
<!-------------------------------------------------------------------------------------------->
<TABLE WIDTH = "100%">
<TR COLSPAN= "100%">
<TD align="right" width="50%">
<INPUT type="submit" name="SubmitForm" value="Submit" onClick="return (CheckIfEmailEntered() && CheckFundTotalConsistency())">
</TD>
<TD align="left" width="50%">
<INPUT type="reset" name="ResetForm" value="Clear Form">
</TD>
</TR>
</TABLE>
</CFFORM>
<CFINCLUDE template="br_footer.cfm">
</HTML>
A oto strona podnosi się (bardzo prostej strony po prostu napisać plik tekstowy, który nie robi):
<!--- For testing--->
<cffile action="write" file="\\eisdevl.nas.gatech.edu\coldfusion\test\cfapps\cfeis\grantsys\testing\tf100.txt" output=#URL.tfile#>
Na stronie przed postaci, istnieje inna forma to ma tylko 2 pola wprowadzania. Jeśli wprowadzisz cokolwiek do pierwszego pola (SpeedType1) na tej stronie, wszystko pójdzie dobrze. Ale jeśli wpiszesz cokolwiek do pierwszego pola (SpeedType1) ORAZ do drugiego pola (SpeedType2), wtedy otrzymam stronę błędu po przesłaniu powyższego formularza. Sprawdziłem również plik application.cfm dla tagów cfcatch i cferror.
Wygląda na to, że próbowałeś rozwiązać wiele problemów. Bez kodu trudno go spekulować. Opublikuj zarówno stronę formularza, jak i stronę docelową. Czy umieściłeś tagi na stronie przetwarzania dalej i dalej w dół kodu, aby zobaczyć, gdzie może generować ten błąd? To może pomóc ci ustalić, która linia powoduje błąd 500. –
BKK
Pamiętaj też, że używasz metody = post ... ale @BenKoshy ma rację, zobaczmy kod, a następnie unikniemy głupich spekulacji (np. "Upewnij się, że używasz metody = post"). –
To dużo kodu, ale opublikuję go, gdy wrócę do komputera. Ponadto, chciałem tylko dodać, że ten kod działa dobrze w Coldfusion 8 (na serwerze Linux). Dzięki!! –