| ( |
|
|
|||
| Switches clients active company | |||
 |
|
| Parameters: | |
| New company number | |
|
|
global
updating procedure POSOffLineToServ_SynchRegisters(Integer offlinecomp)
begin
Integer curcomp;
Boolean TrHs;
record IVCashVc IVCashr;
curcomp = CurrentCompany;
SetServerCompany(offlinecomp);
TrHs = true;
while (LoopMain(IVCashr,1,TrHs)) begin
RecordDelete(IVCashr);
StepBack(IVCashr);
end;
SetServerCompany(curcomp);
return;
end;
|
|
| Related topics: | |