(DataFlex) Egypt ITIDA Generate eReceipt UUID

See more Egypt ITIDA Examples

Demonstrates how to generate the eReceipt UUID for Egypt ITIDA.

Note: This example requires Chilkat v9.5.0.92 or greater.

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoSb
    Boolean iSuccess
    String sUuid

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    // Note: This example requires Chilkat v9.5.0.92 or greater.
    // (In v9.5.0.92, the "itida" encoding was added to StringBuilder's Encode method.)
    Get Create (RefClass(cComChilkatStringBuilder)) To hoSb
    If (Not(IsComObjectCreated(hoSb))) Begin
        Send CreateComObject of hoSb
    End

    // Load the eReceipt JSON into a StringBuilder object.
    Get ComLoadFile Of hoSb "qa_data/itida/EReceipt_ex.json" "utf-8" To iSuccess
    If (iSuccess = False) Begin
        Showln "Failed to load input file."
        Procedure_Return
    End

    // Convert the contents of sb to the ITIDA canonical form.
    // Always pass utf-8 for the 2nd arg.
    Get ComEncode Of hoSb "itida" "utf-8" To iSuccess

    // Get the lowercase hex encoded SHA256 hash of the canonicalized JSON
    // (always use utf-8)
    Get ComGetHash Of hoSb "sha256" "hex_lower" "utf-8" To sUuid
    Showln "eInvoicing UUID = " sUuid


End_Procedure