ISSERVER()

Purpose

Function used to determine whether an application is being run via the Recital Database Server

Syntax

ISSERVER()

See Also

GETENV(), GETLOCALHOST(), GETREMOTEADDR(), GETREMOTEHOST(), GETREMOTEUSER(), ISMIRAGE(), SET UICONTROLS

Description

The ISSERVER() function returns .T. (TRUE) if the current application code is being run via the Recital Database or Mirage Servers. If the application is being run on Recital Terminal Developer, ISSERVER() will return .F. (FALSE). This allows developers to customize code for the particular environment yet share the same code across all environments.

Example

store 1 to mimagebtn
if isserver()
    @23,46 say "ImageButton: " get mimagebtn;
    function "*HNB   *okbtn;*cancelbtn;*savebtn;*addbtn";
    valid v_imagebtn() size 2,2,-1
else
    @23,46 say "ImageButton: " get mimagebtn;
    function "*HNB ok,cancel;save;add";
    valid v_imagebtn() size 2,2,-1
endif

Products

Recital Server, Recital