void ismailCreateVend()
{
VendTable vendTable;
EmplTable emplTable;
NumberSeq numberSeq;
str accnum;
;
ttsbegin;
numberSeq = NumberSeq::newGetNumFromCode(VendParameters::numRefVendAccount().NumberSequence);
vendTable.AccountNum = numberseq.num();
accnum = vendTable.AccountNum;
vendTable.Name = EmplTable.EmplName;
vendTable.VATNum = "xxxx";
vendTable.VendGroup = "xxxx";
vendTable.PartyId = EmplTable::find(zzztable.Id,true).PartyId;
vendTable.insert();
ttscommit;
}
{
VendTable vendTable;
EmplTable emplTable;
NumberSeq numberSeq;
str accnum;
;
ttsbegin;
numberSeq = NumberSeq::newGetNumFromCode(VendParameters::numRefVendAccount().NumberSequence);
vendTable.AccountNum = numberseq.num();
accnum = vendTable.AccountNum;
vendTable.Name = EmplTable.EmplName;
vendTable.VATNum = "xxxx";
vendTable.VendGroup = "xxxx";
vendTable.PartyId = EmplTable::find(zzztable.Id,true).PartyId;
vendTable.insert();
ttscommit;
}