PreviousNextIndex

GET-INT64 function

Returns the signed 64-bit value at the specified memory location as an INT64 value.

Syntax

GET-INT64 ( source , position ) 

source
position
Example

The following example demonstrates how to get values in and out of RAW and MEMPTR values:

r-getint64.p 
DEFINE VARIABLE myint64  AS INT64   NO-UNDO INITIAL 7888999000. 
DEFINE VARIABLE myint    AS INTEGER NO-UNDO INITIAL 2345. 
DEFINE VARIABLE myraw    AS RAW     NO-UNDO. 
DEFINE VARIABLE result64 AS INT64   NO-UNDO. 
DEFINE VARIABLE result1  AS INTEGER NO-UNDO. 
DEFINE VARIABLE mymem    AS MEMPTR  NO-UNDO. 
ASSIGN 
  PUT-LONG(myraw,1)  = myint 
  result1            = GET-LONG(myraw,1) 
  PUT-INT64(myraw,1) = myint64 
  result64           = GET-INT64(myraw,1). 
MESSAGE "raw version " result1 result64. 
ASSIGN 
  result1            = ? 
  result64           = ? 
  SET-SIZE(mymem)    = 40 
  PUT-LONG(mymem,1)  = myint 
  result1            = GET-LONG(mymem,1) 
  PUT-INT64(mymem,1) = myint64 
  result64           = GET-INT64(mymem,1). 
MESSAGE "memptr version " result1 result64. 
result1 = get-int64(mymem,1) NO-ERROR. 
MESSAGE "store getint64 in int gives" ERROR-STATUS:GET-MESSAGE(1). 
MESSAGE "doing put-long of in64" myint64. 
PUT-LONG(mymem,1) = myint64 NO-ERROR. 
MESSAGE "storeint64 with put-long gives" ERROR-STATUS:GET-MESSAGE(1).  
SET-SIZE(mymem) = 0. 

See also

INT64 function, INTEGER function, PUT-INT64 statement, GET-LONG function


OpenEdge Release 10.2B
Copyright © 2009 Progress Software Corporation
PreviousNextIndex