7
Tôi có một máy chủ Windows 2008 với Coldfusion 9 được cài đặt. Tôi có một ứng dụng gửi một biểu mẫu, và sau khi gửi được 500 trang Lỗi máy chủ nội bộ. Tôi đã kiểm tra nhật ký và không có gì được ghi lại ở đó. Tôi đã nghe về vấn đề này với việc gửi hơn 100 trường biểu mẫu, nhưng biểu mẫu của tôi gửi 64, tối đa. Tôi đã bật Kiểm tra thông tin ngoại lệ mạnh mẽ với địa chỉ IP được thêm và mã trạng thái HTTP không được chọn. Tôi có thể xem tất cả thông tin gỡ lỗi trên tất cả các trang đến trang lỗi. Tôi có đầu ra cho một tập tin tất cả các thông tin trang đặt vào các lĩnh vực hình thức và tạo ra một trang chỉ với những lĩnh vực hình thức và những giá trị và nó nộp phạt. Tôi đã bị mắc kẹt này trong một tuần nay. Tôi không biết gì khác để thử. Bất kỳ đề xuất??? Xin vui lòng!!!!Coldfusion 9 HTML form 500 lỗi máy chủ nội bộ
<!--- #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>
Và đây là các trang mà nó nộp cho (trang rất đơn giản chỉ để ghi các file văn bản, mà nó không phải làm):
<!--- For testing--->
<cffile action="write" file="\\eisdevl.nas.gatech.edu\coldfusion\test\cfapps\cfeis\grantsys\testing\tf100.txt" output=#URL.tfile#>
Trên trang trước khi form, có một hình thức khác chỉ có 2 ô nhập. Nếu bạn nhập bất cứ thứ gì vào ô đầu tiên (SpeedType1) trên trang đó, mọi thứ đều ổn. Nhưng nếu bạn nhập bất cứ thứ gì vào ô đầu tiên (SpeedType1) VÀ hộp thứ hai (SpeedType2), đó là khi tôi nhận được trang lỗi sau khi gửi biểu mẫu ở trên. Tôi cũng đã kiểm tra tệp application.cfm cho các thẻ cfcatch và cferror.
Có vẻ như bạn đã thử nhiều cách để cô lập sự cố. Không có mã, thật khó để suy đoán. Hãy đăng cả trang biểu mẫu và trang đích của bạn. Bạn đã đặt thêm các thẻ trên trang xử lý và tiếp tục xuống dưới để xem có thể tạo ra lỗi này ở đâu không? Điều đó có thể giúp bạn tìm ra dòng nào gây ra lỗi 500. –
BKK
Ngoài ra, hãy chắc chắn rằng bạn đang sử dụng method = post ... nhưng @BenKoshy là đúng, chúng ta hãy xem mã sau đó chúng ta có thể tránh đầu cơ ngu ngốc (như "chắc chắn bạn đang sử dụng method = post"). –
Đó là rất nhiều mã, nhưng tôi sẽ đăng nó khi tôi trở lại máy tính. Ngoài ra, tôi chỉ muốn thêm rằng mã này làm việc tốt trong Coldfusion 8 (trên một máy chủ Linux). Cảm ơn!! –