The CURRENT SERVER special register specifies a VARCHAR(18) value that identifies the current application server. The actual name of the application server (not an alias) is contained in the register.
The CURRENT SERVER can be changed by the CONNECT statement, but only under certain conditions (see CONNECT (Type 1)).
Set the host variable APPL_SERVE (VARCHAR(18)) to the name of the application server to which the application is connected.
VALUES CURRENT SERVER
INTO :APPL_SERVE