(DataFlex) Convert String to GSM 03.38

Demonstrates how to convert a string to the GSM character set. For more information about the GSM character set, see GSM Character Set

Note: This example requires Chilkat v9.5.0.79 or greater. Support for the GSM character set was added in v9.5.0.79.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Use ChilkatAx-win32.pkg

Procedure Test
    String s
    Handle hoBdGsm
    Boolean iSuccess
    String sTemp1

    // Demonstrates how to convert a string to the GSM character set byte representation.

    Move "support@chilkatsoft.com, {abc}" To s

    // In the above string the a-z letters have the same 1-byte values in the GSM character set.
    // The '@' character is the 0x00 byte in GSM.
    // The curly brace chars are 2-bytes each in GSM -- each beginning with the 0x1B escape char.
    // The '.', ' ', and ',' are the same in GSM as us-ascii.

    // Let's convert to GSM.

    // bdGsm will contain the GSM bytes.
    Get Create (RefClass(cComChilkatBinData)) To hoBdGsm
    If (Not(IsComObjectCreated(hoBdGsm))) Begin
        Send CreateComObject of hoBdGsm
    End

    // Append the string to bdGsm.  The 2nd arg "gsm" tells AppendString to
    // convert the incoming string to the gsm byte representation.
    Get ComAppendString Of hoBdGsm s "gsm" To iSuccess

    // Let's examine what we have in hex:
    Get ComGetEncoded Of hoBdGsm "hex" To sTemp1
    Showln sTemp1

    // The result is:  737570706F7274006368696C6B6174736F66742E636F6D2C201B286162631B29

    // Save the GSM bytes to a file.
    Get ComWriteFile Of hoBdGsm "qa_output/gsm.txt" To iSuccess


End_Procedure