Histórico da Página

User function flexibleParamsProvider(jParams) 

  	local jClientParams := JSonObject():new()
  	local cStringToJson := '{"client":[{"client_id": "7LpPC0r3","client_secret": "TlPp#S3cre7@"}],'+;
                         '"expires":[{"access_expires": 3600,"refresh_expires": "Date()+1"}],'+;
                         '"users":[{"username": "7LpPC0r3o@u7h2","password": "P@s5w0rD&7LpPC0r3"},'+;
                            '{"username": "tlppCore","password": "Senha1234"},'+;
                            '{"username": "Pr0ba7","password": "Senh@D3T3ste"}],'+;
                         '"types": [{"grant_type":"password"}]}';
                       
  	local aProps := {}
  
  	jClientParams:fromJson(cStringToJson)
  
	aProps := jClientParams:GetNames()
 
  	aEval(aProps,{|x,y| iIf(!(jParams:hasProperty(x)), jParams[x] := jClientParams[x],'')})

Return .T.