7
Ich habe einen Windows 2008 Server mit Coldfusion 9 installiert. Ich habe eine Anwendung, die ein Formular einreicht und nach dem Senden die Seite 500 Interner Serverfehler erhält. Ich habe die Logs überprüft und dort ist nichts geloggt. Ich habe über das Problem mit der Einreichung von mehr als 100 Formularfeldern gehört, aber mein Formular reicht 64, max. Ich habe die Option Robuste Ausnahmeinformationen aktivieren aktiviert, wobei meine IP-Adresse hinzugefügt und die HTTP-Statuscodes deaktiviert wurden. Ich kann alle Debugging-Informationen auf allen Seiten bis zur Fehlerseite sehen. Ich habe alle Informationen, die die Seite in die Formularfelder steckt, in eine Datei ausgegeben und eine Seite mit genau diesen Formularfeldern und diesen Werten erstellt und sie übermittelt. Ich bin jetzt seit einer Woche dran. Ich weiß nichts anderes zu versuchen. Irgendwelche Vorschläge??? Bitte!!!!Coldfusion 9 HTML Formular 500 interner Server Fehler
<!--- #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>
Und hier ist die Seite, um sie unterwirft sie (sehr einfache Seite nur die Textdatei zu schreiben, die es nicht tun):
<!--- For testing--->
<cffile action="write" file="\\eisdevl.nas.gatech.edu\coldfusion\test\cfapps\cfeis\grantsys\testing\tf100.txt" output=#URL.tfile#>
auf der Seite vor der Form, gibt es eine andere Form das hat nur 2 Eingabefelder. Wenn Sie etwas in die erste Box (SpeedType1) auf dieser Seite eingeben, ist alles in Ordnung. Aber wenn Sie etwas in die erste Box (SpeedType1) UND die zweite Box (SpeedType2) eingeben, dann erhalte ich die Fehlerseite, nachdem ich das obige Formular abgeschickt habe. Ich habe auch die application.cfm Datei für cfcatch und cferror Tags überprüft.
Klingt so, als hätten Sie viele Dinge versucht, um das Problem zu isolieren. Ohne Code ist es schwer zu spekulieren. Veröffentlichen Sie bitte sowohl Ihre Formularseite als auch die Zielseite. Haben Sie Tags auf der Verarbeitungsseite immer weiter unten im Code eingefügt, um zu sehen, wo dieser Fehler erzeugt werden könnte? Das könnte Ihnen helfen herauszufinden, welche Zeile den Fehler 500 verursacht. –
BKK
Auch sicher sein, dass Sie method = post verwenden ... aber @BenKoshy ist richtig, lassen Sie uns den Code sehen, dann können wir dumme Spekulation vermeiden (wie "sicher sein, dass Sie method = post verwenden"). –
Es ist eine Menge Code, aber ich werde es veröffentlichen, wenn ich zurück zu einem Computer komme. Außerdem wollte ich nur hinzufügen, dass dieser Code in Coldfusion 8 (auf einem Linux-Server) einwandfrei funktionierte. Vielen Dank!! –