Three routines are available to define, translate and delete symbols within a program using SIC without using the SYMBOL command.
Defines a symbol of name SYMBOL (Character*(*), maximum 12 characters), translation TRANSLATION (Character*(*), maximum 132 characters). An error flag (ERROR logical) is returned if the symbol could not be defined. Any previous definition is overridden.
Obtains the current translation of a given symbol. If TRANSLATION is too short, the translation is truncated without warning or error. ERROR is returned if the symbol is undefined only.
Deletes a symbol definition. ERROR is returned if the symbol was not defined.