• 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 the ID of the conference that is currently selected in the specified conference selection window

Parameters:
WindowId	The conference browsing window that has one conference selected.

global
procedure ConferenceWToolProperties()
BEGIN
  Integer wn,nwn;
  record ConfVc Confp;
  Integer icn,ic2n;
  
  wn = CurWindow;
//  if (UserModuleAccess("modEmail")!=5) or (GetProgramMode==typBooksJobCost) or ((GetProgramMode==typBooks) and (ValuePack(2)))  then begin
  if (GetProgramMode!=typBooks) or (GetProgramMode==typBooksJobCost) or ((GetProgramMode==typBooks) and (ValuePack(2)))  then begin
    if (GetConfWIcn(GetWindowSubset(wn),SelectedConference(wn)-1,icn,ic2n,Confp)==false) then begin
      if (GetConfWIcn(GetWindowSubset(wn),SelectedConference(wn),icn,ic2n,Confp)) then begin
        if (Confp.MotherConf>0) then begin goto LConferenceWToolProperties; end;
      end;
      nwn = OpenWindow("ConfDClass",1,0,"","",Confp);
    end else begin
      if (Confp.MotherConf<=0) then begin
        if (GetConfWIcn(GetWindowSubset(wn),SelectedConference(wn),icn,ic2n,Confp)==false) then begin 
          goto LConferenceWToolProperties;
        end;
      end;
      nwn = OpenWindow("ConfDClass",1,0,"","",Confp);
    end;
  end;
LConferenceWToolProperties:;  
  RETURN;
END;

Related topics: