Setting an attribute

This example sets the SESSION handle's NUMERIC-FORMAT attribute to "european":

/* Set SESSION:NUMERIC-FORMAT to "european" */

ASSIGN
  hCall:IN-HANDLE      = "session"
  hCall:CALL-TYPE      = SET-ATTR-CALL-TYPE
  hCall:CALL-NAME      = "numeric-format"
  hCall:NUM-PARAMETERS = 1.

hCall:SET-PARAMETER(1, "CHARACTER", "INPUT", "european").
hCall:INVOKE( ).

In contrast to the Getting anattribute example, this "Setting an attribute" example:

Sets the CALL-TYPE attribute to SET-ATTR-CALL-TYPE

Sets the NUM-PARAMETERS attribute to 1

Runs the SET-PARAMETER( ) method to make the first parameter an INPUT parameter of data type CHARACTER with the value "european"