riak-users Digest, Vol 42, Issue 12

Julio Cesar Ríos Gutierrez jctaurys at gmail.com
Wed Jan 9 19:49:05 EST 2013


sorry, for the previuos message. I do not describe my problem.

this is my problem.

in the to_pdf function do not arrive name_file with value, arrive empty,
and after process_post, It process "init" again, why this happend?

io:format(Name_File), %%Print empty string

but

in this line I do this.

Ctx2 = Ctx#context{name_file = binary_to_list(Nombre)},

and Nombre contain string value.


Why this happend?

Why do not arrives with values?



-module(rptPedidos_resource).
-export([init/1, allowed_methods/2, process_post/2]).
-export([content_types_provided/2,to_pdf/2]).

-record ( context, {root, name_file } ).

-include_lib("webmachine/include/webmachine.hrl").

%%init([]) -> {ok, undefined}.
init(Config)->
%%{{trace, "/tmp"}, Config}.
%%{{trace,"/tmp"},
#context{root=proplists:get_value(root,Config),name_file=""}}.
{ok, #context{root=proplists:get_value(root,Config),name_file=""}}.

allowed_methods ( RD, Ctx )-> {['POST','GET','HEAD'], RD, Ctx}.

content_types_provided ( RD, Ctx )-> {[{"application/pdf",to_pdf}], RD, Ctx
}.

to_pdf ( RD, #context { root = Root, name_file = Name_File } = Ctx )->
 io:format(Name_File),
Ruta = string:concat("/root/sicap-rpt/reports/", Name_File),
 io:format(Ruta),
Ruta1 = string:concat ( Ruta, ".pdf" ),

io:format(Ruta1),

%%{ok, Body} = file:read_file ( "/root/sicap-rpt/reports/" ++ Name_File  ++
".pdf" ),
%%{ok, Body} = file:read_file ("/root/sicap-rpt/reports/tttt.pdf"),

{ok, Body} = file:read_file ( Ruta1 ),

{Body, RD, Ctx}.


process_post ( RD, Ctx )->
 Data = mochiweb_util:parse_qs ( wrq:req_body ( RD ) ),

Struct = mochijson2:decode ( proplists:get_value ( "json", Data ) ),
Struct2 = proplists:get_value ( "json", Data ),
{struct, [{ <<"nombre">>, Nombre }]} = Struct,

RD1 = wrq:set_resp_header ( "Content-Disposition", "application/pdf", RD ),

%%print_pdf:print ( binary_to_list ( Nombre ) ),

print_pdf:print(binary_to_list(Nombre),"programa",
"01/12/2012","31/12/2012" ),

Ctx2 = Ctx#context{name_file = binary_to_list(Nombre)},

%%{true, RD1, Ctx#context{name_file=Nombre}}.
{true, RD1, Ctx2}.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.basho.com/pipermail/riak-users_lists.basho.com/attachments/20130109/227d8b02/attachment.html>


More information about the riak-users mailing list