AMT Help Files

System Items

The following default system items are defined for AMT-COBOL applications:

System Item

Description of the system item.


AMT Objects: Where this system item can be used e.g. Form / Report
Access: Readonly or Writeable
Type: Value Type

SI-APPLICATIONCAPTION

Stores text to be added to the label of the Application Center tab.

The value can be changed dynamically in the code.

Administrators may add additional texts to the title bar through the ControlCenter-screen "System Configuration > System Setup > Runtime behaviour configurations > Form appearance". If the option "Show database name in caption" is checked in that screen, the SI-APPLICATIONCAPTION value will be displayed directly after the concerning database name.


Cobol Form
Writeable
String / PIC X(~)

SI-APPLICATIONNAME

Contains the name of the application as stored in the Control Center. The names of the applications are visible in the list in "System Configuration > Architecture > tab Applications".


Cobol Form / Cobol Program
Readonly
String / PIC X(~)

SI-APPLICATIONPATH

Contains the path to the installation directory of the application as stored in the Control Center. The path is visible when an application is viewed in "System Configuration > Architecture > tab Applications" in the properties tab as "Application base path".


Cobol Form / Cobol Program
Readonly
String / PIC X(~)

SI-CURRFORM

SI-CURRFORM contains the name of the last called form.


Cobol Form / Cobol Program
Readonly
String / PIC X(~)

SI-DBTYPE

Holds the type of database of the runtime. Possible values are: MSSQL, ORACLE and DB2


Cobol Form / Cobol Program
Readonly
Alpha 10 / PIC X(10)

SI-DEBUG

Evaluates "TRUE" if a Cobol Form or Cobol Program is started in debug mode, otherwise the value of this system item is "FALSE".


Cobol Form / Cobol Program
Readonly
Boolean / PIC 1

SI-DEVELOPMENT

Determines whether the application should behave as a production version or development/ test version.

In the code, you can implement different behaviors for the production version and the test version of your application depending on the parameter setting.

The Development parameter can be set in the ControlCenter screen "System Configuration > System Setup > Runtime behaviour configurations > General behaviour". It can not be changed through the source code.


Cobol Form / Cobol Program
Readonly
Boolean / PIC 1

SI-ENVIRONMENT

Returns the environment name from the system settings as defined in the Control Center.


Cobol Form / Cobol Program
Readonly
String / PIC X(~)

SI-FOCUSEDFIELD

Holds the name of the layout control that was active when the screen was sent.

If referring to this system item, keep in mind that it is case sensitive.

E.g. to check if the layout control "EDBXCUST" is currently selected, the following code is written:

IF SI-FOCUSEDFIELD IS 'EDBXCUST' THEN
    DISPLAY 'The field EDBXCUST is currently selected.'
ELSE 
    DISPLAY 'The field EDBXCUST is currently not selected.'
END-IF.


Cobol Program
Readonly
String / PIC X(~)

SI-INITIATOR

Stores the station name of the client that started a transaction, e.g. "PC-001". The content of the station name depends on the station resolve setting.

If multiple connections are opened from the same PC, a connection number will also be stored in SI-INITIATOR. So, for example a second connection from the machine "PC-001" is stored in SI-INITIATOR as "PC-001\1", a third as "PC-001\2", etc.


Cobol Form / Cobol Program
Readonly
String / PIC X(~)

SI-LIONVERSION

Holds the current AMT version number.

The SI-LIONVERSION is always built as:

<Major release number>.<Minor Release number>.<Build number>.<Build revision number>

For example, AMT 25 has the value of "8.0.17279.0".


Cobol Form / Cobol Program
Readonly
Alpha 20 / PIC X(20)

SI-NTLOGIN

Stores the NT-user name of the client.


Cobol Form / Cobol Program
Readonly
Alpha 17 / PIC X(17)

SI-PREVFORM

When used in the WS-TO-FORM section of a COBOL form, contains the name of the previous active form. When used in any other object or section, will give the same result as SI-CURRFORM.
Can be used to determine if the form was previously loaded. Example:

IF NOT SI-CURRFORM = SI-PREVFORM
....
END-IF.


Cobol Form / Cobol Program
Readonly
String / PIC X(~)

SI-REVISION

Contains the revision ID that is assigned to the object when it was generated.


Cobol Form / Cobol Program
Readonly
String / PIC X(~)

SI-SERVERNAME

Contains the NT-server name.


Cobol Form / Cobol Program
Readonly
Alpha 17 / PIC X(17)