Function

SubSetOfStatus

Module

rConsults

Last Modified

7/15/2014 3:26:36 PM

Comments

List box fillers
---------------- list box fillers -----------------------------------

 returns a pointer to a list of stati (for use in a list box)

Scope

Interfaced

Declaration

function  SubSetOfStatus: TStrings;

Called-By Hierarchy


                                  SubSetOfStatus
                                  SelectStatus┤ 
                   TfrmConsults.mnuViewClick┘ │ 
               TfrmConsults.SetViewContext┘   │ 
                TfrmConsults.DisplayPage┤     │ 
TfrmConsults.mnuViewReturntoDefaultClick┘     │ 
                            SelectConsultsView┘ 
                TfrmConsults.mnuViewClick...┘   

Called-By

Name Declaration Comments
SelectConsultsView function SelectConsultsView(FontSize: Integer; CurrentContext: TSelectContext; var SelectContext: TSelectContext): boolean ; -
SelectStatus function SelectStatus(FontSize: Integer; CurrentContext: TSelectContext; var StatusContext: TStatusContext): boolean ; -


Source

382   function SubSetOfStatus: TStrings;
383   { returns a pointer to a list of stati (for use in a list box) }
384   begin
385     CallV('ORQQCN STATUS', [nil]);
386     MixedCaseList(RPCBrokerV.Results);
387     Result := RPCBrokerV.Results;
388   end;