Skip to main content

[archive] How to represent 1.7E 308 this number retrieved from an Active-x control

  • December 19, 2007
  • 9 replies
  • 0 views
D

[Migrated content. Thread originally posted on 18 December 2007]

This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


Thanks,
Vara Prasad,Vanima.

    9 replies

    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    Whether you will be able to accept it or not depends on the datatype, can you tell what datatype that is defined in the definition file?
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    Whether you will be able to accept it or not depends on the datatype, can you tell what datatype that is defined in the definition file?
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    It is defined as a Variant data type.
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    It is defined as a Variant data type.
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    Perhaps you can show me the details from the definition file? (not the whole file, just that property)
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    Here are the get and put properties from the definition file.
    * NoValue
    PROPERTY-GET, 1073938451, @NoValue
    RETURNING "VARIANT", TYPE 12
    * NoValue
    PROPERTY-PUT, 1073938451, @NoValue,
    "VARIANT* (Property_Value)", TYPE 16396
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    Here are the get and put properties from the definition file.
    * NoValue
    PROPERTY-GET, 1073938451, @NoValue
    RETURNING "VARIANT", TYPE 12
    * NoValue
    PROPERTY-PUT, 1073938451, @NoValue,
    "VARIANT* (Property_Value)", TYPE 16396
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    Inside the VARIANT wrapper, the real type is stored. For a float, this is normally either VT_R4 (USAGE FLOAT) or VT_R8 (USAGE DOUBLE). These two are handled by the runtime.
    Unfortunately, without documentation there is no way to tell which it is, that is being returned by the variant. Normally it is VT_R4, so I would suggest:

    77 MyFloat USAGE FLOAT.
    ...
    INQUIRE HandleToFloatObject FloatModule NoValue IN MyFloat.
    D

    [Migrated content. Thread originally posted on 18 December 2007]

    This is the value 1.7E 308, which will be returned from an active-x control's property. I want to store this value in a acu variable and use it further. Can anyone tell me what is the picture clause to use for storing this number.


    Thanks,
    Vara Prasad,Vanima.
    Inside the VARIANT wrapper, the real type is stored. For a float, this is normally either VT_R4 (USAGE FLOAT) or VT_R8 (USAGE DOUBLE). These two are handled by the runtime.
    Unfortunately, without documentation there is no way to tell which it is, that is being returned by the variant. Normally it is VT_R4, so I would suggest:

    77 MyFloat USAGE FLOAT.
    ...
    INQUIRE HandleToFloatObject FloatModule NoValue IN MyFloat.

    Recent badge winners

    Explore all badges
    Terms & ConditionsAccessibility statement