7
Ho un server Windows 2008 con Coldfusion 9 installato. Ho un'applicazione che invia un modulo e, al momento dell'invio, riceve la pagina 500 Errore interno del server. Ho controllato i log e non viene registrato nulla. Ho sentito parlare del problema con l'invio di oltre 100 campi modulo, ma il mio modulo invia 64, max. Sono state abilitate le Abilita informazioni sulle eccezioni robuste con il mio indirizzo IP aggiunto e i codici di stato HTTP deselezionati. Posso vedere tutte le informazioni di debug su tutte le pagine fino alla pagina di errore. Ho prodotto in un file tutte le informazioni che la pagina inserisce nei campi del modulo e ha creato una pagina con solo i campi del modulo e quei valori e la sottomette. Sono rimasto bloccato su questo per una settimana. Non so nient'altro da provare. Eventuali suggerimenti??? Per favore!!!!Coldfusion 9 Modulo HTML errore interno server 500
<!--- #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>
E qui è la pagina sottopone (pagina molto semplice, basta scrivere il file di testo, che non sta facendo):
<!--- For testing--->
<cffile action="write" file="\\eisdevl.nas.gatech.edu\coldfusion\test\cfapps\cfeis\grantsys\testing\tf100.txt" output=#URL.tfile#>
Nella pagina prima che il modulo, v'è un'altra forma questo ha solo 2 caselle di input. Se inserisci qualcosa nella prima casella (SpeedType1) su quella pagina, tutto va bene. Ma se inserisci qualcosa nella prima casella (SpeedType1) E nella seconda casella (SpeedType2), è in quel momento che ottengo la pagina di errore dopo aver inviato il modulo sopra. Ho anche controllato il file application.cfm per i tag cfcatch e cferror.
Sembra che tu abbia provato molte cose per isolare il problema. Senza codice, è difficile speculare. Pubblica la tua pagina del modulo e la pagina di destinazione per favore. Hai inserito i tag nella pagina di elaborazione ulteriormente e più in basso nel codice per vedere dove potrebbe generare questo errore? Questo potrebbe aiutarti a capire quale linea sta causando l'errore 500. –
BKK
Inoltre, assicurati di utilizzare method = post ... ma @BenKoshy ha ragione, vediamo il codice, quindi possiamo evitare una stupida speculazione (come "assicurati di utilizzare method = post"). –
È un sacco di codice, ma lo posterò quando torno su un computer. Inoltre, volevo solo aggiungere che questo codice funzionava bene in Coldfusion 8 (su un server Linux). Grazie!! –