use "system.vl"
|
use "win.vl"
|
use "maint.vl"
|
use "file.vl"
|
use "dev:vm[xcell.vm]"
|
unit vbusiness.entity
|
[
|
TestingCompanyMaint is extend maint;
|
about TestingCompanyMaint
|
[
|
field:
|
[
|
msxml::IXMLDOMDocument m_configDoc;
|
string m_userid;
|
string m_username;
|
string ContactID;
|
xdwtable__ dw_base;
|
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;
|
}
|
int OnSetFocus(ref TNotifyEvent evt,int p)
|
{
|
SetAgent("maint");
|
return 1;
|
}
|
string GetGuid(){
|
return TApp::GetGuid();
|
}
|
int OnClear(){
|
if(this.m_EntityID ==""){
|
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,"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,"Type","20");
|
dw_base.SetItemString(1,"AddressID",GetGuid());
|
dw_base.SetItemString(1,"PADIdentifyAddressFlag","Y");
|
dw_base.SetItemString(1,"PrimaryFlag","Y");
|
dw_base.SetItemString(1,"EnterName",m_userid);
|
dw_base.SetItemDisplayString(1,"EnterName",m_username);
|
dw_base.SetItemString(1,"CreateDate",TApp::GetCurDate());
|
}
|
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);
|
}
|
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/shipcompany/PartyNo",arg.GetString(),x) != 1)
|
{
|
trace(x.GetXml());
|
return "";
|
}
|
msxml::IXMLDOMElement e = x.GetXmlDoc().documentElement;
|
if(e)
|
{
|
string code = e.text;
|
trace(code);
|
return "P"+code;
|
}
|
return "P1000";
|
}
|
int OnPreSave()
|
{
|
dw_base.AcceptText();
|
dw_base = new xdwtable__;
|
dw_base.setNativePointer(this.GetControl("dw_base"));
|
string ShipNo = dw_base.GetItemString(1,"ShipNo",0);
|
if (ShipNo=="" || ShipNo== nil)
|
{
|
dw_base.SetItemString(1,"ShipNo",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);
|
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","1");
|
dw_base.SetItemString(1,"PrimaryContactID",dwcon.GetItemString(1,"ContactID"));
|
}
|
|
|
|
}
|
}
|
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","Shipcompany.dbmap");
|
//arg.AddArg("m_dels",m_dels);
|
|
if (getUrl("/sale/data/LogisticsCode/entity/shipcompany/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();
|
setCellReadOnly();
|
}
|
dw_base.Redraw();
|
//m_dels="";
|
return 0;
|
}
|
int OnCmdDispatch(string comdid)
|
{
|
trace(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);
|
dw_base.AcceptText();
|
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;
|
//trace(colname);
|
if(colname=="ShipNo")
|
{
|
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;
|
}
|
|
}
|
return 1;
|
}
|
int OnAttachEvent()
|
{
|
AttachEvent("WM_XCOMMAND",OnXCommand);
|
AttachEvent("WM_SETFOCUS",OnSetFocus);
|
AttachEvent("dw_base","DWV_ITEMCHANGED",OnCellChanged);
|
return 0;
|
}
|
|
int onload()
|
{
|
|
OnAttachEvent();
|
//if(!m_configDoc) return -1;
|
|
maint::onload();
|
|
OnClear();
|
|
}
|
]
|
]
|
]
|
