Json web
Bom dia a todos
Na edição 119 da clubdelphi o Rodrigo mostrou como carrega um rest em um html usando jquery.
Gostaria que alguém me ajudasse na seguinte duvida.
Como passar um rest ou json ou objeto para minha aplicação servidor através da minha aplicação web.
Por exemplo minha aplicação servidor tem um método inserir que recebe um objeto que uso para fazer um insert
function TEstadosDao.Inserir(obj: TEstados):Boolean;begin result:= True; Query.Close; Query.SQL.Clear; Query.SQL.Add('insert into '+ 'Estados('+ 'Estados."UF", '+ 'Estados."Descricao", '+ 'Estados."Aliquota de ICMS", '+ 'Estados."Aliquota de ICMS_Interna", '+ 'Estados."Codigo_UF") '+ 'values('+ ':pUF, '+ ':pDescricao, '+ ':pAliquota_de_ICMS, '+ ':pAliquota_de_ICMS_Interna, '+ ':pCodigo_UF)'); Query.Params.ParamByName('pUF' ).AsString := obj.UF; Query.Params.ParamByName('pDescricao' ).AsString := obj.Descricao; Query.Params.ParamByName('pAliquota_de_ICMS' ).AsFloat := obj.Aliquota_de_ICMS; Query.Params.ParamByName('pAliquota_de_ICMS_Interna').AsFloat := obj.Aliquota_de_ICMS_Interna; Query.Params.ParamByName('pCodigo_UF' ).AsFloat := int(obj.Codigo_UF); try try Query.ExecSQL; except on e:Exception do begin result:= False; Log('Falha ao gravar Estados'+ SlineBreak + 'Mesagem original: ' + e.Message); end; end; finally Query.Close; end;end;
No meu controller faço o tratamento convertendo o que recebi para um objeto do tipo Estados poderia estar recebendo um json isso é tranquilo.
Talvez eu esteja complicando demais.
O que gostaria de saber é como passar para dentro da minha aplicação servidor um json ou rest ou objeto que posso converter dentro da minha aplicação servidor em objeto e usar em uma rotina de update ou insert ou em parametros para uma cláusula where para consulta ou delete.
Me desculpem se ficou confuso mas se alguém souber e puder ajudar fico muito agradecido.
Obrigado
Na edição 119 da clubdelphi o Rodrigo mostrou como carrega um rest em um html usando jquery.
Gostaria que alguém me ajudasse na seguinte duvida.
Como passar um rest ou json ou objeto para minha aplicação servidor através da minha aplicação web.
Por exemplo minha aplicação servidor tem um método inserir que recebe um objeto que uso para fazer um insert
function TEstadosDao.Inserir(obj: TEstados):Boolean;begin result:= True; Query.Close; Query.SQL.Clear; Query.SQL.Add('insert into '+ 'Estados('+ 'Estados."UF", '+ 'Estados."Descricao", '+ 'Estados."Aliquota de ICMS", '+ 'Estados."Aliquota de ICMS_Interna", '+ 'Estados."Codigo_UF") '+ 'values('+ ':pUF, '+ ':pDescricao, '+ ':pAliquota_de_ICMS, '+ ':pAliquota_de_ICMS_Interna, '+ ':pCodigo_UF)'); Query.Params.ParamByName('pUF' ).AsString := obj.UF; Query.Params.ParamByName('pDescricao' ).AsString := obj.Descricao; Query.Params.ParamByName('pAliquota_de_ICMS' ).AsFloat := obj.Aliquota_de_ICMS; Query.Params.ParamByName('pAliquota_de_ICMS_Interna').AsFloat := obj.Aliquota_de_ICMS_Interna; Query.Params.ParamByName('pCodigo_UF' ).AsFloat := int(obj.Codigo_UF); try try Query.ExecSQL; except on e:Exception do begin result:= False; Log('Falha ao gravar Estados'+ SlineBreak + 'Mesagem original: ' + e.Message); end; end; finally Query.Close; end;end;
No meu controller faço o tratamento convertendo o que recebi para um objeto do tipo Estados poderia estar recebendo um json isso é tranquilo.
Talvez eu esteja complicando demais.
O que gostaria de saber é como passar para dentro da minha aplicação servidor um json ou rest ou objeto que posso converter dentro da minha aplicação servidor em objeto e usar em uma rotina de update ou insert ou em parametros para uma cláusula where para consulta ou delete.
Me desculpem se ficou confuso mas se alguém souber e puder ajudar fico muito agradecido.
Obrigado
Antonio Alves
Curtidas 0