• 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 string for used language from SString definitions

Parameters:
strcode	string code

global
function string 255 GetObservTypeName(Integer type)
begin
  string 255 tstr;
  
  switch (Type) begin
    case 0: tstr = USetStr(10207);
    case 1: tstr = USetStr(10207);
    case 2: tstr = USetStr(10209);
    case 6: tstr = USetStr(10209);
    case 3: tstr = USetStr(10210);
    case 4: tstr = USetStr(10210);
    case 5: tstr = USetStr(10211);
  end;
  GetObservTypeName = tstr;
  return;
end;

Related topics: