apzl_leasing/WebContent/Common/Evaluate/EvaluateApplyCreateInfo.jsp
2018-06-03 22:26:41 +08:00

89 lines
3.8 KiB
Plaintext
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

<%@ page contentType="text/html; charset=GBK"%><%@
include file="/Frame/resources/include/include_begin_info.jspf"%><%
/*
Content: 信用等级评估新增信息
*/
//获得组件参数 :对象类型、申请类型、阶段类型、流程编号、阶段编号、对象编号、客户编号、模型编号
String sObjectType = CurPage.getParameter("ObjectType");
String sApplyType = CurPage.getParameter("ApplyType");
String sPhaseType = CurPage.getParameter("PhaseType");
String sFlowNo = CurPage.getParameter("FlowNo");
String sPhaseNo = CurPage.getParameter("PhaseNo");
String sObjectNo = CurPage.getParameter("CustomerID");
String sCustomerID = CurPage.getParameter("CustomerID");
String sModelType = CurPage.getParameter("ModelType");
if(sObjectType == null) sObjectType = "";
if(sApplyType == null) sApplyType = "";
if(sPhaseType == null) sPhaseType = "";
if(sFlowNo == null) sFlowNo = "";
if(sPhaseNo == null) sPhaseNo = "";
if(sCustomerID == null ) sCustomerID="";
if(sObjectNo == null ) sObjectNo="";
if (sModelType==null) sModelType = "010"; //缺省模型类型为"信用等级评估"
ASObjectModel doTemp = new ASObjectModel("EvaluateApplyCreateInfo");
ASObjectWindow dwTemp = new ASObjectWindow(CurPage,doTemp,request);
dwTemp.Style="2"; //设置DW风格 1:Grid 2:Freeform
dwTemp.ReadOnly = "0"; //设置是否只读 1:只读 0:可写
dwTemp.genHTMLObjectWindow("");
String sButtons[][] = {
{"true","","Button","下一步","新增申请的下一步","nextStep()","","","",""},
{"true","","Button","取消","取消申请","doCancel()","","","",""}
};
%><%@include file="/Frame/resources/include/ui/include_info.jspf"%>
<script type="text/javascript">
setDialogTitle("新增信用等级评估申请");
<%/*~[Describe=弹出客户选择窗口,并置将返回的值设置到指定的域;]~*/%>
function selectCustomer(){
sCustomerType = getItemValue(0,0,"CustomerType");
if(typeof(sCustomerType) == "undefined" || sCustomerType == ""){
alert("请先选择客户类型!");
return;
}
//具有业务申办权的客户信息
sParaString = "UserID"+","+"<%=CurUser.getUserID()%>"+","+"CustomerType"+","+sCustomerType;
// 公司、集团、个人的信用等级评估需要不同的过滤操作。
if(sCustomerType == "01") {
AsDialog.SelectGridValue("SelectApplyCustomer4", "<%=CurUser.getUserID()%>", "CUSTOMERID@CUSTOMERNAME@CUSTOMERTYPE", null, false,"",function(sReturn){
if(sReturn && sReturn!="_CLEAR_"){
var myArr = sReturn.split("@");
setItemValue(0,0,"CustomerID", myArr[0]);
setItemValue(0,0,"CustomerName", myArr[1]);
setItemValue(0,0,"SubCustomerType", myArr[2]);
}
});
}
}
<%/*~[Describe=下一步;]~*/%>
function nextStep(){
var sCustomerID = getItemValue(0,0,"CustomerID");
var sCustomerType = getItemValue(0,0,"CustomerType");
var sSubCustomerType = getItemValue(0,0,"SubCustomerType");
if(!sCustomerID) return;
//确定是个人还是公司客户的信用等级评估
if(sCustomerType == "03" && sSubCustomerType == "0310"){
//如果为个人客户,则信用等级评估的类型为"个人信用等级评估"ModelType = "015"
sModelType = "015";
}else if (sCustomerType == "03" && sSubCustomerType == "0320"){
//如果为个体经营户,则信用等级评估的类型为"个体经营户信用等级评估"ModelType = "017"
sModelType = "017";
}else if (sCustomerType == "01" && sSubCustomerType == "0120"){
//如果为中小企业,则信用等级评估的类型为"中小企业信用等级评估"ModelType = "012"
sModelType = "012";
}else {
sModelType = "<%=sModelType%>";
}
AsDialog.PopView("/Common/Evaluate/AddEvaluateMessage.jsp","Action=display&ObjectType=<%=sObjectType%>&ObjectNo="+sCustomerID+"&ModelType="+sModelType+"&EditRight=100",
"dialogWidth:550px;dialogHeight:350px;resizable:yes;scrollbars:no",function(sReturn){
parent.AsDialog.ClosePage(sReturn);
});
}
function doCancel(){
parent.AsDialog.ClosePage();
}
</script>
<%@ include file="/Frame/resources/include/include_end.jspf"%>