Table of Content
HAL Forum
function Boolean ReadLastMain (
Record NameVc Namer,Integer seg,Boolean matchflag)
Description:
Read last record by specific index from register according conditions, returns false if it is not possible to find record
Parameters:
Namer Record
seg Number of used fields in index (for complex indexes)
matchflag true=exact match, false=most similar
global
procedure GetAssetCurDepartment(string InventoryNr,var string res) 
begin
  record InvBalVc InvBalr;

  res = "";
  InvBalr.InventoryNr = InventoryNr;
  if (ReadLastMain(InvBalr,1,true)) then begin
    res = InvBalr.CurDepartment;
  end;
  return;
end;
Related topics:
««