( |
|
|
|||
Updates browse window of specified Vc |
Parameters: | |
any Vc | |
global updating procedure StartAccessIntORDsm() begin record IntORVc IntORr; Integer wn; wn = CurWindow; GetWindowRecord(wn,IntORr); if (nonblank(IntORr.AcceptanceGroup)) then begin if (IntORr.StatusFlag==0) then begin IntORr.StatusFlag = 4; PutWindowRecord(wn,IntORr); if (WindowDoOK(wn,0)) then begin UpdateBrowses("IntORVc"); end; end; end; return; end;
Related topics: |