{
{   The purpose of this request is to get the value of a real variable from a
{ form and transfers it to the program.  The form must not be pushed.
{
{       FDP$XGET_REAL_VARIABLE (FORM_IDENTIFIER, VARIABLE_NAME,
{         VARIABLE_OCCURRENCE, VARIABLE, VARIABLE_STATUS, STATUS)
{
{ FORM_IDENTIFIER: (input)  This parameter specifies the form identifier for
{       the instance of the form.
{
{ VARIABLE_NAME: (input)  This parameter specifies the name of the variable to
{       get.
{
{ VARIABLE_OCCURRENCE: (input)  This parameter specifies the occurrence of the
{       variable name.
{
{ VARIABLE: (output)  This parameter specifies the real variable.
{
{ VARIABLE_STATUS: (output)  This parameter specifies the ordinal which gives
{       the status of the variable.
{
{       Value:  fdc$no_error
{               fdc$invalid_real
{               fdc$invalid_bdp_data
{               fdc$no_digits
{               fdc$loss_of_significance
{               fdc$overflow
{               fdc$underflow
{               fdc$infinite
{               fdc$indefinite
{
{ STATUS: (output) This parameter specifies the name of the variable
{       to set to indicate the results of the request.
{
{       condition identifiers: fde$form_not_scheduled
{                              fde$form_pushed
{                              fde$invalid_form_identifier
{                              fde$system_error
{                              fde$unknown_occurrence
{                              fde$unknown_variable_name
{
{
