付款申请单分录添加收款人实名

栏目:eas cloud知识作者:金蝶来源:金蝶云社区发布:2024-09-22浏览:1

付款申请单分录添加收款人实名

需求描述:

付款申请单修改客户、供应商、银行账户时如果带出的银行账号是维护在客户、供应商财务页签下的银行账号则根据银行账号带出收款人实名

其他情况为空。

DEP方案:

1.新增收款人实名字段字段名成为 "bankAcctName"

2.在界面加载(onload)前置脚本添加如下脚本

pluginCtx.getKDTable("kdtEntrys").addKDTEditListener(function(event,methodName){
	if(methodName == "equals"){ return this == event;}
	if(methodName == "editStopped"){
		var kdtEntrys = pluginCtx.getKDTable("kdtEntrys");
		var rowIndex = kdtEntrys.getSelectManager().getActiveRowIndex();
		var colIndex = kdtEntrys.getSelectManager().getActiveColumnIndex();
		if (kdtEntrys.getColumn("asstActNumber").getColumnIndex() == colIndex || kdtEntrys.getColumn("accountBankNo").getColumnIndex() == colIndex) {
			kdtEntrys.getCell(rowIndex,"bankAcctName").setValue(null);
			var accountBankNo = kdtEntrys.getCell(rowIndex,"accountBankNo").getValue();
			var asstActId = kdtEntrys.getCell(rowIndex,"asstActID").getValue();
			var companyId = pluginCtx.getKDBizPromptBox("prmtcompany").getValue().getId().toString();
			var bosType = null;
			if(asstActId != null){
				bosType = com.kingdee.bos.util.BOSUuid.read(asstActId).getType().toString();
			}
			if(!com.kingdee.util.StringUtils.isEmpty(accountBankNo)){
				if("37C67DFC" == bosType){//供应商
					var oql = "select beneficiary where bankAccount = '" + accountBankNo + "' and supplierCompanyInfo.companyOrgUnit.id = '" + companyId + "' and supplierCompanyInfo.supplier.id = '" + asstActId + "'";
					var  supplierCompanyBankInfo = com.kingdee.eas.basedata.master.cssp.SupplierCompanyBankFactory.getRemoteInstance().getSupplierCompanyBankCollection(oql);
					if(supplierCompanyBankInfo != null && supplierCompanyBankInfo.size() > 0){
						kdtEntrys.getCell(rowIndex,"bankAcctName").setValue(supplierCompanyBankInfo.get(0).getBeneficiary());
					}
				} else if("BF0C040E" == bosType){//客户
					var oql = "select beneficiary where bankAccount = '" + accountBankNo + "' and customerCompanyInfo.companyOrgUnit.id = '" + companyId + "' and customerCompanyInfo.customer.id = '" + asstActId + "'";
					var  customerCompanyBankInfo = com.kingdee.eas.basedata.master.cssp.CustomerCompanyBankFactory.getRemoteInstance().getCustomerCompanyBankCollection(oql);
					if(customerCompanyBankInfo != null && customerCompanyBankInfo.size() > 0){
						kdtEntrys.getCell(rowIndex,"bankAcctName").setValue(customerCompanyBankInfo.get(0).getBeneficiary());
					}
				} else if("80EF7DED" == bosType){
					kdtEntrys.getCell(rowIndex,"bankAcctName").setValue(null);
				}
			}
		}
	}
});



付款申请单分录添加收款人实名

需求描述:付款申请单修改客户、供应商、银行账户时如果带出的银行账号是维护在客户、供应商财务页签下的银行账号则根据银行账号带出收款人...
点击下载文档
确认删除?
回到顶部
客服QQ
  • 客服QQ点击这里给我发消息