• Introduction
  • What is HAL?
  • Get Started
  • Language Reference
    • Declarations, assignments and statements
    • Keywords and operations
• Tutorials
  • Change a window
    • Find the window
    • Modify the window
  • Create a report
• HAL Primitives
• HAL Procedures/Functions
• HAL Discussions

Description:

Returns amount from Support Register

Parameters:
FileName	Support Register Vc,Variable of Record Type in example it is ObjBalVc Record
string	Support Register Column Name
d	Date, Amount will be read from the Month

global
procedure GetAccountSumDanTR(string accnumber,Date TransDate,var val resp)
BEGIN
  record ObjBalVc ObjBalr;
  val t;
  
  resp = blankval;
  ObjBalr.AccNumber = accnumber;
  if (ReadFirstMain(ObjBalr,1,true)) then begin  
    resp =  GetBalance(ObjBalr,"transdebit",TransDate);  
    t =  GetBalance(ObjBalr,"transcredit",TransDate);      
    resp = resp - t;
  end;    
  RETURN;
END;

Related topics: