Consuming RESTful Services in DataFlex: Difference between revisions

From DataFlex Wiki
Jump to navigationJump to search
Keeping backwards compatibility for DF19.x on de demo code
m (Compiler bug in df20 on example. added PointerToString)
(Keeping backwards compatibility for DF19.x on de demo code)
 
Line 107: Line 107:
             Move (Value(oCreds) + ":" + Value(oPassword)) to sToken
             Move (Value(oCreds) + ":" + Value(oPassword)) to sToken
             Move (Base64Encode(AddressOf(sToken), Length(sToken))) to pCreds
             Move (Base64Encode(AddressOf(sToken), Length(sToken))) to pCreds
#IF (!@ < 200)
            Move pCreds  to sToken
#ELSE
             Move (PointerToString(pCreds))  to sToken  
             Move (PointerToString(pCreds))  to sToken  
#ENDIF
             Move (Free(pCreds)) to bOK
             Move (Free(pCreds)) to bOK
             Get AddHeader of oHttp "Authorization" ("Basic" * sToken) to bOK
             Get AddHeader of oHttp "Authorization" ("Basic" * sToken) to bOK

Navigation menu