(DataFlex) Validate a ULID

See more ULID/UUID Examples

Checks to see if a ULID is valid.

Important: Chilkat's ULID functionality was introduced in v9.5.0.94.

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

Use ChilkatAx-win32.pkg

Procedure Test
    Handle hoDt
    String sUlid
    Boolean iValid

    Get Create (RefClass(cComCkDateTime)) To hoDt
    If (Not(IsComObjectCreated(hoDt))) Begin
        Send CreateComObject of hoDt
    End

    // A ULID must be exactly 26 chars in length,
    // and is composed of the following chars: 0123456789ABCDEFGHJKMNPQRSTVWXYZ
    // Note: The ULID alphabet excludes the letters I, L, O, and U

    // Here's a valid ULID
    Move "01GRGCH4J88RECEN4D4VK4F629" To sUlid
    Get ComUlidValidate Of hoDt sUlid To iValid
    Showln "valid: " iValid

    // Here's an invalid ULID
    Move "71GRGxx4Jr8RECEN4D4VK4F62!" To sUlid
    Get ComUlidValidate Of hoDt sUlid To iValid
    Showln "valid: " iValid


End_Procedure