%GETCRC

Return internal CRC of a GRFA

WSupported on Windows

USupported on Unix

VSupported on OpenVMS

NSupported in Synergy .NET

crc = %GETCRC(grfa)

Return value

crc

The returned CRC.

Arguments

grfa

The global RFA whose CRC is being returned. (a10)

Discussion

%GETCRC is a ^VAL function that returns the internal CRC of a GRFA as an i4 value. The value is a portable integer that can be compared across platforms.

This function is available to help avoid problems if the GRFA format were to change in a future version.

See also

• GETRFA statement
• RFA statement

Examples

function ischanged      ,i
    a_key               ,a
    a_crc               ,i
record
    grfa                ,a10
    crc                 ,i4
    sts                 ,i1, 0
proc
    read(master.chan, master.rec, a_key, GETRFA:grfa)
    crc = %getcrc(grfa)
    if (crc .ne. a_crc)
      sts = 1
    freturn(sts)
end