use "system.vl"
|
use "win.vl"
|
use "maint.vl"
|
use "file.vl"
|
use "dev:vm[xcell.vm]"
|
unit vbusiness.entity
|
[
|
ForwarderMaint is extend maint;
|
about ForwarderMaint
|
[
|
field:
|
[
|
msxml::IXMLDOMDocument m_configDoc;
|
|
xdwtable__ dw_base;
|
string m_userid;
|
string m_username;
|
string ContactID;
|
xcell__ dw_cell;
|
]
|
|
method:
|
[
|
int alert(string str)
|
{
|
//win__::MessageBox(this.GetHWND(),str,"Ìáʾ22:",0);
|
TApp::alert(this,str);
|
return 0;
|
}
|
int setCellReadOnly()
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
dw_cell = new xcell__;
|
dw_cell.setNativePointer(dw_base.QueryItem("ixcell"));
|
string strnew = "<cellprop celltype='' cellformatex='' cellformat='' cellprotectex='' cellprotect='±£»¤' cellvisibleex='' cellvisible='' cellvalid='' cellinitial=''/>";
|
//dw_cell.SetCellProps(2,2,strnew);
|
return 0;
|
}
|
|
string GetGuid(){
|
return TApp::GetGuid();
|
}
|
int OnClear(){
|
if(this.m_EntityID ==""){
|
trace(1);
|
m_userid = TApp::GetUserInfo().id;
|
m_username = TApp::GetUserInfo().name;
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
dw_base.SetItemString(1,"ForwarderID",GetGuid());
|
dw_base.SetItemString(1,"PartyID",GetGuid());
|
dw_base.SetItemString(1,"PStatus","1");
|
dw_base.SetItemDisplayString(1,"PStatus","ÆÕͨ");
|
dw_base.SetItemString(1,"CreatorID",m_userid);
|
dw_base.SetItemString(1,"PADStatus","1");
|
dw_base.SetItemString(1,"AddressID",GetGuid());
|
dw_base.SetItemString(1,"PADIdentifyAddressFlag","Y");
|
dw_base.SetItemString(1,"PADPrimaryFlag","Y");
|
//dw_base.SetItemString(1,"BankAccountID",GetGuid());
|
dw_base.SetItemString(1,"Type","5");
|
dw_base.SetItemString(1,"EnterName",m_userid);
|
dw_base.SetItemDisplayString(1,"EnterName",m_username);
|
dw_base.SetItemString(1,"CreateDate",TApp::GetCurDate());
|
/*xdwtable__ dw = new xdwtable__;
|
dw.setNativePointer(dw_base.GetCurTable());
|
xdwtable__ dwcon = new xdwtable__;
|
dwcon.setNativePointer(dw.FindDwTable("Contacters",0));
|
dwcon.SetItemString(1,"ContactID",GetGuid());
|
dwcon.SetItemString(1,"PCStatus","1");*/
|
//dw_base.SetItemString(1,"EBankAccountID",GetGuid());
|
//dw_base.SetItemString(1,"CBankAccountID",GetGuid());
|
/*xdwtable__ dweon = new xdwtable__;
|
dweon.setNativePointer(dw_base.FindDwTable("item1",0));
|
xdwtable__ dwcon = new xdwtable__;
|
dwcon.setNativePointer(dw_base.FindDwTable("item2",0));
|
dweon.SetItemString(1,"EPBAStatus","Y");
|
dwcon.SetItemString(1,"CPBAStatus","Y");
|
dweon.SetItemString(1,"ECurrencyCode","USD");
|
dwcon.SetItemString(1,"CCurrencyCode","RMB");*/
|
dw_base.SetItemString(1,"ForwarderType","1");
|
dw_base.SetItemDisplayString(1,"ForwarderType","Ô¤¸¶»õ");
|
//dw_base.SetItemString(1,"PrimaryContactID",dwcon.GetItemString(1,"ContactID"));
|
|
}
|
else
|
{
|
setCellReadOnly();
|
}
|
return 0;
|
}
|
|
int OnAddrow()
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
xdwtable__ dw = new xdwtable__;
|
dw.setNativePointer(dw_base.GetCurTable());
|
string dw_n=dw.GetDwName();
|
if(dw_n=="item")
|
{
|
dw.InsertRow(0);
|
int rows = dw.GetRowCount();
|
dw.SetRow(rows);
|
}
|
return 1;
|
}
|
int OnInsertRow()
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
xdwtable__ dw = new xdwtable__;
|
dw.setNativePointer(dw_base.GetCurTable());
|
string dw_n=dw.GetDwName();
|
if(dw_n=="item")
|
{
|
int row=dw.GetRow();
|
if(row<1) return 0;
|
dw.InsertRow(row);
|
dw.SetRow(row);
|
}
|
return 1;
|
}
|
|
int OnDeleteRow()
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
xdwtable__ dw = new xdwtable__;
|
dw.setNativePointer(dw_base.GetCurTable());
|
string dw_n=dw.GetDwName();
|
if(dw_n=="item")
|
{
|
int row=dw.GetRow();
|
if(row<1) return 0;
|
/*string del = dw.GetItemString(row,8);
|
if(del!="")
|
{
|
if(m_dels=="")
|
{
|
m_dels=del;
|
}
|
else
|
{
|
string temp=m_dels;
|
m_dels=del + "|" + temp;
|
//+= "|"+del;
|
}
|
|
}*/
|
dw.DeleteRow(row);
|
dw.SetRow(row - 1);
|
}
|
//trace(m_dels);
|
return 1;
|
}
|
string getGoodsNo()
|
{
|
xml__ x=new xml__;
|
x.setNativePointer(xml__::CreateInstance());
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
if (getUrl("/sale/data/LogisticsCode/pref/PartyNo",arg.GetString(),x) != 1)
|
{
|
trace(x.GetXml());
|
return "";
|
}
|
msxml::IXMLDOMElement e = x.GetXmlDoc().documentElement;
|
if(e)
|
{
|
string code = e.text;
|
trace(code);
|
return "F"+code;
|
}
|
return "F1000";
|
}
|
int OnPreSave()
|
{
|
dw_base.AcceptText();
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
string ForwarderNo = dw_base.GetItemString(1,"ForwarderNo",0);
|
if (ForwarderNo=="" || ForwarderNo== nil)
|
{
|
dw_base.SetItemString(1,"ForwarderNo",getGoodsNo());
|
}
|
xdwtable__ dwcon = new xdwtable__;
|
dwcon.setNativePointer(dw_base.FindDwTable("item",0));
|
int i;
|
for(i=1;i<=dwcon.GetRowCount();i++)
|
{
|
string aTemp;
|
string aName = dwcon.GetItemString(i,"ContacterName",0);
|
trace(aName);
|
if (aName=="" || aName== nil)
|
{
|
aTemp=dwcon.GetItemString(i,"Mobile",0)+dwcon.GetItemString(i,"TEL",0)+dwcon.GetItemString(i,"Fax",0)+dwcon.GetItemString(i,"Email",0)+dwcon.GetItemString(i,"PCRemark",0)+dwcon.GetItemString(i,"fz",0);
|
trace(aTemp);
|
if(aTemp !="" && aTemp != nil)
|
{
|
alert("ÁªÏµÈËÃû³Æ±ØÌ");
|
return -1;
|
}
|
}
|
else{
|
string ContactID = dwcon.GetItemString(i,"ContactID",0);
|
if (ContactID=="" || ContactID== nil)
|
{
|
dwcon.SetItemString(i,"ContactID",GetGuid());
|
dwcon.SetItemString(i,"PCStatus","Y");
|
dw_base.SetItemString(1,"PrimaryContactID",dwcon.GetItemString(1,"ContactID"));
|
}
|
}
|
}
|
xdwtable__ dwcon2 = new xdwtable__;
|
dwcon2.setNativePointer(dw_base.FindDwTable("item2",0));
|
int k;
|
for (k=1;k <= dwcon2.GetRowCount();k++)
|
{
|
string sPBABankName2 = dwcon2.GetItemString(k,"CBank");
|
string sPBABankAccountNo2 = dwcon2.GetItemString(k,"CBankNo");
|
if (sPBABankName2 == nil) sPBABankName2 = "";
|
if (sPBABankAccountNo2 == nil) sPBABankAccountNo2 = "";
|
string sPBAAll2 = sPBABankName2 + sPBABankAccountNo2;
|
|
if (sPBAAll2 != "")
|
{
|
if (sPBABankName2 == "")
|
{
|
alert("ÈËÃñ±ÒÒøÐÐÃû³Æ²»ÄÜΪ¿Õ");
|
return -1;
|
}
|
if (sPBABankAccountNo2 == "")
|
{
|
alert("ÈËÃñ±ÒÒøÐÐÕË»§²»ÄÜΪ¿Õ");
|
return -1;
|
}
|
dwcon2.SetItemString(k,"CPBAStatus","Y");
|
dwcon2.SetItemString(k,"CCurrencyCode","RMB");
|
dwcon2.SetItemString(k,"CBankAccountID",GetGuid());
|
|
if(dwcon2.GetItemString(k,"CBankAccountID")!="" && this.m_EntityID =="")
|
{
|
dw_base.SetItemString(1,"CBkAccountID",dwcon2.GetItemString(k,"CBankAccountID"));
|
}
|
}
|
}
|
xdwtable__ dwcon1 = new xdwtable__;
|
dwcon1.setNativePointer(dw_base.FindDwTable("item1",0));
|
int j;
|
for (j=1;j <= dwcon1.GetRowCount();j++)
|
{
|
string sPBABankName1 = dwcon1.GetItemString(j,"EBank");
|
string sPBABankAccountNo1 = dwcon1.GetItemString(j,"EBankNo");
|
if (sPBABankName1 == nil) sPBABankName1 = "";
|
if (sPBABankAccountNo1 == nil) sPBABankAccountNo1 = "";
|
string sPBAAll1 = sPBABankName1 + sPBABankAccountNo1;
|
if (sPBAAll1 != "")
|
{
|
if (sPBABankName1 == "")
|
{
|
alert("ÃÀ½ðÒøÐÐÃû³Æ²»ÄÜΪ¿Õ");
|
return -1;
|
}
|
if (sPBABankAccountNo1 == "")
|
{
|
alert("ÃÀ½ðÒøÐÐÕË»§²»ÄÜΪ¿Õ");
|
return -1;
|
}
|
dwcon1.SetItemString(j,"EPBAStatus","Y");
|
dwcon1.SetItemString(j,"ECurrencyCode","USD");
|
dwcon1.SetItemString(j,"EBankAccountID",GetGuid());
|
if(dwcon1.GetItemString(j,"EBankAccountID")!="" && this.m_EntityID =="")
|
{
|
dw_base.SetItemString(1,"EBkAccountID",dwcon1.GetItemString(j,"EBankAccountID"));
|
}
|
}
|
}
|
return 1;
|
}
|
int OnPostSave()
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
xaserverarg__ args = new xaserverarg__;
|
args.setNativePointer(args.CreateInstance());
|
xml__ x = new xml__;
|
x.setNativePointer(xml__::CreateInstance());
|
dw_base.DwUpdateAllTo(x.GetXmlDoc());
|
//trace(x.GetXml());
|
|
//Ö÷ÁªÏµÈË
|
string spGuid;
|
msxml::IXMLDOMElement e;
|
var list = x.GetXmlDoc().selectNodes("//item");
|
int nlen = list.length;
|
int i;
|
for(i=0; i<nlen; i++)
|
{
|
e = list.item(i);
|
if (i == 0) spGuid = e.selectSingleNode("@guid").text;
|
string sP = e.selectSingleNode("PPrimaryFlag").text;
|
if (sP == "Y")
|
{
|
spGuid = e.selectSingleNode("@guid").text;
|
break;
|
}
|
}
|
if (spGuid == "" || spGuid == nil)
|
{
|
trace("error");
|
return 0;
|
}
|
args.AddArg("contact",spGuid);
|
//trace("<---->");
|
//trace(spGuid);
|
xml__ x1 = new xml__;
|
x1.setNativePointer(x1.CreateInstance());
|
if (getUrl("/sale/data/SupplierSubmit/pref/primarycontact",args.GetString(),x) != 1)
|
{
|
string error = x1.GetXmlDoc().text;
|
trace(error);
|
return 0;
|
}
|
|
|
return 1;
|
}
|
int OnSave()
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
string SName = dw_base.GetItemString(1,"Name");
|
if(SName==""){
|
alert("ÇëÊäÈë»õ´úÃû³Æ£¡");
|
return -1;
|
}
|
int rec =OnPreSave();
|
if (rec== -1) return -1;
|
xml__ x=new xml__;
|
x.setNativePointer(xml__::CreateInstance());
|
dw_base.DwUpdateAllTo(x.GetXmlDoc());
|
trace(x.GetXml());
|
xaserverarg__ arg=new xaserverarg__;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("content",x.GetXml());
|
arg.AddArg("dbmap","Forwarder.dbmap");
|
//arg.AddArg("m_dels",m_dels);
|
if (getUrl("/sale/data/LogisticsCode/entity/save",arg.GetString(),x) != 1)
|
{
|
trace("error:"+x.GetXml());
|
alert("±£´æʧ°Ü!");
|
return 0;
|
}
|
else
|
{
|
trace(x.GetXml());
|
if(x.GetXmlDoc().selectSingleNode("error"))
|
{
|
alert("±£´æ³ö´í2!");
|
return 0;
|
}
|
alert("±£´æ³É¹¦!");
|
dw_base.ResetUpdateStatus();
|
OnPostSave();
|
}
|
dw_base.Redraw();
|
//m_dels="";
|
return 0;
|
}
|
int OnCmdDispatch(string comdid)
|
{
|
if(comdid.find("action:bill.row.add",0)>=0) {
|
OnAddrow();
|
}
|
else if(comdid.find("bill.row.insert",0)>=0) {
|
OnInsertRow();
|
}
|
else if(comdid.find("bill.row.delete",0)>=0) {
|
OnDeleteRow();
|
}
|
else if(comdid.find("bill.save",0)>=0) {
|
trace(1);
|
OnSave();
|
}
|
return 0;
|
}
|
|
int OnXCommand(ref TXCommandEvent evt,int p)
|
{
|
return OnCmdDispatch(evt.pStrID);
|
}
|
int OnCellChanged(ref TNotifyEvent evt,int p)
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
ref DWNMHDR hdr = evt.pnmh;
|
string colname=hdr.colname;
|
string coldata = hdr.data;
|
trace(colname);
|
if(colname=="ForwarderNo")
|
{
|
string cspec = dw_base.GetItemString(1,1);
|
trace(cspec);
|
string SpecRule="^\\d*$";
|
xaserverarg__ args = new xaserverarg__;
|
args.setNativePointer(args.CreateInstance());
|
args.AddArg("CSpec",cspec);
|
args.AddArg("SpecRule",SpecRule);
|
xml__ x= new xml__;
|
x.setNativePointer(xml__::CreateInstance());
|
getUrl("/sale/data/LogisticsCode/pref/forwarderno/check",args.GetString(),x);
|
|
if(x.GetXmlDoc().selectSingleNode("root/spec"))
|
{
|
alert("ÇëÊäÈëÊý×Ö£¡");
|
return 0;
|
}
|
|
}
|
//Ö»ÄÜÑ¡Ò»¸öÖ÷ÁªÏµÈË
|
else if (colname == "PPrimaryFlag" && coldata == "Y")
|
{
|
xdwtable__ dw_pc;
|
dw_pc = new xdwtable__;
|
dw_pc.setNativePointer(dw_base.FindDwTable("item"));
|
if (dw_pc)
|
{
|
int i;
|
for (i=1;i <= dw_pc.GetRowCount();i++)
|
{
|
if (i != hdr.row)
|
dw_pc.SetItemString(i,"PPrimaryFlag","N");
|
}
|
}
|
}
|
return 1;
|
}
|
int OnAttachEvent()
|
{
|
AttachEvent("WM_XCOMMAND",OnXCommand);
|
//AttachEvent("WM_SETFOCUS",OnSetFocus);
|
AttachEvent("dw_base","DWV_ITEMCHANGED",OnCellChanged);
|
return 0;
|
}
|
int onload()
|
{
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
|
OnAttachEvent();
|
//if(!m_configDoc) return -1;
|
|
maint::onload();
|
|
OnClear();
|
}
|
|
]
|
]
|
]
|
