7

我有一个安装了 Coldfusion 9 的 Windows 2008 服务器。我有一个提交表单的应用程序,提交后会出现 500 Internal Server Error 页面。我检查了日志,那里没有任何记录。我听说过提交 100 多个表单字段的问题,但我的表单最多提交 64 个。我勾选了启用鲁棒异常信息并添加了我的 IP 地址并且未勾选 HTTP 状态代码。我可以看到所有页面上的所有调试信息,直到错误页面。我已将页面放入表单字段的所有信息输出到一个文件,并创建了一个仅包含这些表单字段和这些值的页面,并且它提交得很好。我已经坚持了一周了。我不知道还有什么可以尝试的。有什么建议么???请!!!!

<!---  #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">&nbsp;

            </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>&nbsp;
                    <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>&nbsp;
                        <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>
                        &nbsp;
                        <INPUT type="hidden" name="SpeedType2" value="">
                    </CFIF>
                </TD>
            </TR>
            <TR>
                <TD colspan="2">
                    School/Center/Lab:
                </TD>
                <TD colspan="3">
                     #qHdr1.DESCR# - #qHdr1.DEPTID#&nbsp;
                    <INPUT type="hidden" name="DEPTID1" value="#qHdr1.DEPTID# - #qHdr1.DESCR#&nbsp;">
                    <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#&nbsp;
                        <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>
                        &nbsp;
                    </CFIF>
                </TD>
            </TR>
            <TR>
                <TD colspan="2">
                    Fund:
                </TD>
                <TD colspan="3">
                    #qHdr1.FUND_CODE# - #qHdr1.DESCR#&nbsp;
                    <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#&nbsp;
                <CFELSEIF SpeedType2 EQ "">
                      &nbsp;
                <CFELSE>
                    #qHdr2.FUND_CODE# - #qHdr2.DESCR#&nbsp;
                </CFIF>
                <!--- CC8254 - End --->
                </TD>
            </TR>
            <TR>
                <TD colspan="2">
                    Project Director:
                </TD>
                <TD colspan="3">
                    #qHdr1.GT_PROJ_DIR# - #qHdr1.NAME#&nbsp;
                    <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#&nbsp;
                        <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>
                        &nbsp;
                    </CFIF>
                </TD>
            </TR>
            <TR>
                <TD colspan="2">
                    Award No.:
                </TD>
                <TD colspan="3">
                    #qHdr1.GT_CONTR_NO#&nbsp;
                    <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#&nbsp;
                    <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>&nbsp; 
                <CFIF SpeedType2 EQ "NEW">
                    #qHdr1.GT_CONTR_NO#&nbsp;
                <CFELSEIF SpeedType2 EQ "">
                      &nbsp;
                <CFELSE>
                    #qHdr2.GT_CONTR_NO#&nbsp;
                </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>
                        &nbsp;
                    </CFIF>
                </TD>
            </TR>
            <TR>
                <TD colspan="2">
                    Start Date: 
                </TD>
                <TD colspan="3">
                    #DateFormat(qHdr1.GT_PROJ_STARTDT, "mm/dd/yyyy")#&nbsp;
                    <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")#&nbsp;
                        <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>
                        &nbsp;
                    </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")#&nbsp;
                    <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")#&nbsp;
                        <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>
                        &nbsp;
                    </CFIF>
                    <CFIF SpeedType2 EQ "new">(mm/dd/yyyy)</CFIF>
                        </TR>

                </TD>
            <TR>
                <TD colspan="2">
                    Sponsor:
                </TD>
                <TD colspan="3">
                    #qHdr1.GT_SPON_NAME#&nbsp;
                    <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#&nbsp;
                    <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>&nbsp;
                <CFIF SpeedType2 EQ "NEW">
          #qHdr1.GT_SPON_NAME#&nbsp;
                <CFELSEIF SpeedType2 EQ "">
                      &nbsp;
                <CFELSE>
          #qHdr2.GT_SPON_NAME#&nbsp;
                </CFIF>
                <!--- CC8254 - End --->
                </TD>
            </TR>
            <TR>
                <TD colspan="2">
                    Name of Project:
                </TD>
                <TD colspan="3">
                    #qHdr1.GT_PROJ_TITLE#&nbsp;
                    <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#&nbsp;
                        <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>
                        &nbsp;
                    </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>
                        &nbsp;
                    </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>
                        &nbsp;
                    </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>
                        &nbsp;
                    </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">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    Title:
    <INPUT type="Text" name="Title" size="20" maxlength="35">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    Date:
    <cfinput type="Text" name="Date" required="No" size="20" maxlength="35" onChange="return (isValidDate(this))">
    <BR>
    &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
    <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>

这是它提交的页面(非常简单的页面只是为了编写文本文件,它没有这样做):

<!--- For testing--->
<cffile action="write" file="\\eisdevl.nas.gatech.edu\coldfusion\test\cfapps\cfeis\grantsys\testing\tf100.txt" output=#URL.tfile#>

在表单之前的页面上,还有另一个表单,它只有两个输入框。如果您在该页面上的第一个框 (SpeedType1) 中输入任何内容,则一切正常。但是,如果您在第一个框 (SpeedType1) 和第二个框 (SpeedType2) 中输入任何内容,则在提交上述表单后,我会收到错误页面。我还检查了 application.cfm 文件中的 cfcatch 和 cferror 标签。

4

3 回答 3

7

... ColdFusion 9 的最新修补程序 [原文如此] 可能会给提交大量表单的人带来问题。该修复在提交时将表单字段限制为 100 个字段。有一个可用于默认行为的覆盖,但......

参考:Adobe ColdFusion 9 Hotfix APSB12-06 导致大型表单出现问题

简而言之,您可以通过更改<var name='postParametersLimit'>设置来覆盖限制neo-runtime.xml

于 2013-03-04T16:39:46.730 回答
1

您需要在 iis 中启用详细错误,然后您将收到 cf 错误而不是 500 Internal server,这将使调试更加容易。见这里 www.michaels.me.uk/post.cfm/enabling-coldfusion-railo-errors-on-iis-7

于 2013-03-03T14:51:47.587 回答
0

添加您是否测试过使用 ColdFusion 写入该网络路径?它是否具有写入 eisdev1.nas.gatech.edu 的正确凭据?还要确保您的服务器配置为 @user1433501 建议的那样。

将您的 cffile 包装在 try catch 中:

<!--- For testing--->
<cftry>

<cffile
    action="write"
    file="\\eisdevl.nas.gatech.edu\coldfusion\test\cfapps\cfeis\grantsys\testing\tf100.txt"
    output=#URL.tfile#
    nameconflict="overwrite"
>
<cfcatch type="any">
    <cfdump var="#cfcatch#">
</cfcatch>

看看这是否暴露了错误。

于 2013-03-04T22:24:49.207 回答