|
This procedure gets specified Window number and returns Window's contents |
|
wn |
Window Number,every open Window has got its Number, here you specify from which Window you want to get Record |
FileName |
any Vc or Block,Variable of Record Type(Register/Block Name), in example it is VIVc Record |
|
global
procedure ConnectToPrepayVIDsm()
BEGIN
record VIVc VIr;
row VIVc VIrw;
Integer wn;
wn = CurWindow;
DeselectWindow(wn,false);
GetWindowRecord(wn,VIr);
if (VIr.OKFlag==0) then begin
ClearRow(VIr,VIrw,6);
VIrw.Comment = USetStr(1288);
MatRowInsert(VIr,0,VIrw);
end;
PutWindowRecord(wn,VIr);
WindowFieldGoto(wn,VIr,0,"PrepayNr");
RETURN;
END;
««