update for tokens
This commit is contained in:
parent
c0531287c4
commit
e4c0e0fd48
|
@ -40,10 +40,11 @@ GET(ZRTN,ZTOKEN,NOKILL) ; RETRIEVE A STORED ARRAY INDEXED BY ZTOKEN
|
|||
Q
|
||||
;
|
||||
URLTOKEN(sessid) ; EXTRINSIC WHICH RETRIEVES THE TOKEN PASSED ON THE URL
|
||||
; IN EWD EXAMPLE: https://example.com/ewd/myApp/index.ewd&token="12345"
|
||||
; IN EWD EXAMPLE: https://example.com/ewd/myApp/index.ewd?token="12345"
|
||||
N token
|
||||
S token=""
|
||||
s token=$$getRequestValue^%zewdAPI("token",sessid)
|
||||
s token=$tr(token,"""") ; strip out quotes
|
||||
Q token
|
||||
;
|
||||
cbTestMethod(prefix,seedValue,lastSeedValue,optionNo,options)
|
||||
|
|
Loading…
Reference in New Issue