[Progress Communities] [Progress OpenEdge ABL] Forum Post: RE: JWT token - how to read?

[goo]

def var mPnt as Memptr no-undo. def var lcTest as longchar no-undo. fix-codepage(lcTest) = 'utf-8'. lcTest = "eyJraWQiOiJtcVQ1QTNMT1NJSGJwS3JzY2IzRUhHcnItV0lGUmZMZGFxWl81SjlHUjlzIiwiYWxnIjoiUlMyNTYifQ". mPnt = base64-decode(lcTest). CATCH eAny AS Progress.Lang.Error : MESSAGE eAny:GetMessage(1) VIEW-AS ALERT-BOX. END CATCH. Gives me an error....: Error converting Base64 to RAW (12119)

Continue reading...