Re: Daniel Kluss - tdll

new topic     » goto parent     » topic index » view thread      » older message » newer message

------=_Part_67773_8397924.1169002813531
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline

Try using APC_dll, http://www.rapideuphoria.com/apc_2006_05_09_v2.zip, it
has some examples.
Daniel

On 1/16/07, codepilot Gmail Account <codepilot at gmail.com> wrote:
>
> That is pretty weird, check to see if request_handle is modified
> elsewhere, because euphoria can't modify arguments passed in routines.
>
> On 1/16/07, Jonas Temple <guest at rapideuphoria.com> wrote:
> >
> >
> > posted by: Jonas Temple <jtemple at yhti.net>
> >
> > Daniel,
> >
> > I've been working with tdll.e for a few days and have come across
> > something odd when using t_func to call a routine.  The parameters pass=
ed in
> > to the function via t_func are changed during the call.  Here's a scree=
n
> > dump of the trace screen with shots before and after the call.  Note th=
e
> > value of "request_handle" before and after the call.
> >
> > *** Before t_func call ***
> >
> > cwbdb.ew  F1=main  F2=trace  Enter  down-arrow  ?  q  Q  !
> > 3199:  --                             cwbSV_ErrHandle      errorHandle)=
;
> > 3200:  global atom xcwbDB_Fetch
> > 3201:  --  xcwbDB_Fetch = define_c_func(cwbdb,
> > 3202:  --          "cwbDB_Fetch", {C_ULONG, C_ULONG}, C_UINT)
> > 3203:      xcwbDB_Fetch = define_t_func(cwbdb,
> > 3204:              "cwbDB_Fetch", {C_ULONG, C_ULONG}, C_UINT)
> > 3205:  global function cwbDB_Fetch(atom request_handle, atom
> > error_handle)
> > 3206:  --  cwbDB_EURtnCode = c_func(xcwbDB_Fetch,
> > 3207:  --              {request_handle, error_handle})
> > 3208==>    cwbDB_EURtnCode = t_func(xcwbDB_Fetch,
> > 3209:                  {request_handle, error_handle})
> > 3210:      return {cwbDB_EURtnCode}
> > 3211:  end function
> > 3212:
> >
> > 3213:  --**************************************************************=
*****/
> > 3214:  --                                                              =
    */
> >
> > 3215:  --
> > API:                                                             */
> > 3216:  --
> > cwbDB_GetColumnCCSID                                           */
> > 3217:  --                                                              =
    */
> >
> >
> > sys_conn=34"        request_handle=38&  error_handle=0      row_c=
ount=0
> > statement={82R,84T,86V,74J,79O,66B}
> >
> > sql_stmt={115s,101e,108l,101e,99c,116t,32=A6,74J,79O,66B,95_,73I,78N,=
70F,79O,...
> > parms={}
> >
> > *** After t_func call ***
> >
> > cwbdb.ew  F1=main  F2=trace  Enter  down-arrow  ?  q  Q  !
> > 3201:  --  xcwbDB_Fetch = define_c_func(cwbdb,
> > 3202:  --          "cwbDB_Fetch", {C_ULONG, C_ULONG}, C_UINT)
> > 3203:      xcwbDB_Fetch = define_t_func(cwbdb,
> > 3204:              "cwbDB_Fetch", {C_ULONG, C_ULONG}, C_UINT)
> > 3205:  global function cwbDB_Fetch(atom request_handle, atom
> > error_handle)
> > 3206:  --  cwbDB_EURtnCode = c_func(xcwbDB_Fetch,
> > 3207:  --              {request_handle, error_handle})
> > 3208:      cwbDB_EURtnCode = t_func(xcwbDB_Fetch,
> > 3209:                  {request_handle, error_handle})
> > 3210==>    return {cwbDB_EURtnCode}
> > 3211:  end function
> > 3212:
> >
> > 3213:  --**************************************************************=
*****/
> >
> > 3214:  --                                                              =
    */
> > 3215:  --
> > API:                                                             */
> > 3216:  --
> > cwbDB_GetColumnCCSID                                           */
> >
> > 3217:  --                                                              =
    */
> > 3218:  --
> > Purpose:                                                         */
> > 3219:  --   Returns the Coded Character Set Identifier (CCSID) for
> > a       */
> >
> > sys_conn=34"        request_handle=28   error_handle=0      row_c=
ount=0
> > statement={82R,84T,86V,74J,79O,66B}
> > sql_stmt={115s,101e,108l,101e,99c,116t,32=A6,74J,79O,66B,95_,73I,78N,=
70F,79O,...
> >
> > parms={}
> >
> > If you need more information please let me know.
> >
> > Jonas Temple
> > http://www.yhti.net/~jktemple
> >
> >
p
> >
> > Or send an email to: EUforum-unsubscribe at topica.com
> >
> >

------=_Part_67773_8397924.1169002813531
Content-Type: text/html; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline

<div>Try using APC_dll, <a href="http://www.rapideuphoria.com/apc_2006_05=
_09_v2.zip">http://www.rapideuphoria.com/apc_2006_05_09_v2.zip</a>, it has =
some examples.</div>
<div>Daniel<br>&nbsp;</div>
<div><span class="gmail_quote">On 1/16/07, <b class="gmail_sendername">=
codepilot Gmail Account</b> &lt;<a href="mailto:codepilot at gmail.com">code=
pilot at gmail.com</a>&gt; wrote:</span>
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0=
px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">That is pretty weird, check to s=
ee if request_handle is modified elsewhere, because euphoria can't modi=
fy arguments passed in routines.=20
<div><span class="e" id="q_1102dfdb6a2b71f5_1"><br><br>
<div><span class="gmail_quote">On 1/16/07, <b class="gmail_sendername">=
Jonas Temple</b> &lt;<a onclick="return top.js.OpenExtLink(window,event,t=
his)" href="mailto:guest at rapideuphoria.com" target="_blank">guest@rapid=
euphoria.com
</a>&gt; wrote:</span>=20
<blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0=
px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">===========
== The Euphoria Mailing List ============<br><b=
r><br>posted by: Jonas Temple &lt;jtemple at <a onclick="return top.js.Op=
enExtLink(window,event,this)" href="http://yhti.net/" target="_blank">
yhti.net</a>&gt;<br><br>Daniel,<br><br>I've been working with tdll.e fo=
r a few days and have come across something odd when using t_func to call a=
 routine.&nbsp;&nbsp;The parameters passed in to the function via t_func ar=
e changed during the call.&nbsp;&nbsp;Here's a screen dump of the trace=
 screen with shots before and after the call.&nbsp;&nbsp;Note the value of =
&quot;request_handle&quot; before and after the call.=20
<br><br>*** Before t_func call ***<br><br>cwbdb.ew&nbsp;&nbsp;F1=main&nbs=
p;&nbsp;F2=trace&nbsp;&nbsp;Enter&nbsp;&nbsp;down-arrow&nbsp;&nbsp;?&nbsp=
;&nbsp;q&nbsp;&nbsp;Q&nbsp;&nbsp;!<br>3199:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
 cwbSV_ErrHandle&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;errorHandle);<br>3200:&=
nbsp;&nbsp;global atom xcwbDB_Fetch<br>3201:&nbsp;&nbsp;--&nbsp;&nbsp;xcwbD=
B_Fetch = define_c_func(cwbdb,=20
<br>3202:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&quot;cwbDB_Fetch&quot;, {C_ULONG, C_ULONG}, C_UINT)<br>3203:&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xcwbDB_Fetch = define_t_func(cwbdb,<br>3204=
:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&quot;cwbDB_Fetch&quot;, {C_ULONG, C_ULONG}, C_UINT)<br>3205:&nbs=
p;&nbsp;global function cwbDB_Fetch(atom request_handle, atom error_handle)=

<br>3206:&nbsp;&nbsp;--&nbsp;&nbsp;cwbDB_EURtnCode = c_func(xcwbDB_Fetch,=
<br>3207:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{request_handle, error_handle})<br>3208==
=&gt;&nbsp;&nbsp;&nbsp;&nbsp;cwbDB_EURtnCode = t_func(xcwbDB_Fetch,<br>=
3209:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{request_handle, error_handle})
<br>3210:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;return {cwbDB_EURtnCode}<br>32=
11:&nbsp;&nbsp;end function<br>3212:<br>3213:&nbsp;&nbsp;--****************=
***************************************************/<br>3214:&nbsp;&nbsp;--=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;*/=20
<br>3215:&nbsp;&nbsp;-- API:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp; */<br>3216:&nbsp;&nbsp;--&nbsp;&nbsp; cwbDB_GetColumnCCSID&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp; */<br>3217:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/=

<br><br>sys_conn=34&quot;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
request_handle=38&amp;&nbsp;&nbsp;error_handle=0&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;row_count=0<br>statement={82R,84T,86V,74J,79O,66B}<br>sql_=
stmt={115s,101e,108l,101e,99c,116t,32=A6,74J,79O,66B,95_,73I,78N,70F,79O,=
...<br>parms={}=20
<br><br>*** After t_func call ***<br><br>cwbdb.ew&nbsp;&nbsp;F1=main&nbsp=
;&nbsp;F2=trace&nbsp;&nbsp;Enter&nbsp;&nbsp;down-arrow&nbsp;&nbsp;?&nbsp;=
&nbsp;q&nbsp;&nbsp;Q&nbsp;&nbsp;!<br>3201:&nbsp;&nbsp;--&nbsp;&nbsp;xcwbDB_=
Fetch = define_c_func(cwbdb,<br>3202:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&quot;cwbDB_Fetch&quot;, {C_ULONG, C_=
ULONG}, C_UINT)=20
<br>3203:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xcwbDB_Fetch = define_t_func=
(cwbdb,<br>3204:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&quot;cwbDB_Fetch&quot;, {C_ULONG, C_ULONG}, C_UIN=
T)<br>3205:&nbsp;&nbsp;global function cwbDB_Fetch(atom request_handle, ato=
m error_handle)<br>3206:&nbsp;&nbsp;--&nbsp;&nbsp;cwbDB_EURtnCode = c_fun=
c(xcwbDB_Fetch,=20
<br>3207:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{request_handle, error_handle})<br>3208:&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;cwbDB_EURtnCode = t_func(xcwbDB_Fetch,<b=
r>3209:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;{request_handle, error_handle})<br>=
3210==&gt;&nbsp;&nbsp;&nbsp;&nbsp;return {cwbDB_EURtnCode}<br>3211:&nbs=
p;&nbsp;end function=20
<br>3212:<br>3213:&nbsp;&nbsp;--*******************************************=
************************/<br>3214:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/<br>=
3215:&nbsp;&nbsp;-- API:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nb=
sp;&nbsp; */=20
<br>3216:&nbsp;&nbsp;--&nbsp;&nbsp; cwbDB_GetColumnCCSID&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp; */<br>3217:&nbsp;&nbsp;--&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp=
;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;*/<br>3218:&nbsp;&nb=
sp;-- Purpose:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&=
nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbs=
p;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; */=20
<br>3219:&nbsp;&nbsp;--&nbsp;&nbsp; Returns the Coded Character Set Identif=
ier (CCSID) for a&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; */<br><br>sys_conn==
34&quot;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;request_handle=28=
&nbsp;&nbsp; error_handle=0&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;row_count=
=0<br>statement={82R,84T,86V,74J,79O,66B}<br>sql_stmt={115s,101e,108l=
,101e,99c,116t,32=A6,74J,79O,66B,95_,73I,78N,70F,79O,...
<br>parms={}<br><br>If you need more information please let me know.<br><=
br>Jonas Temple<br><a onclick="return top.js.OpenExtLink(window,event,thi=
s)" href="http://www.yhti.net/~jktemple" target="_blank">http://www.yht=
i.net/~jktemple
</a><br><br>--^------------------------------------------------------------=
---- <br>This email was sent to: <a onclick="return top.js.OpenExtLink(wi=
ndow,event,this)" href="mailto:codepilot at gmail.com" target="_blank">cod=
epilot at gmail.com
</a><br><br>EASY UNSUBSCRIBE click here: <a onclick="return top.js.OpenEx=
tLink(window,event,this)" href="http://topica.com/u/?b1dd66.bS57FK.Y29kZX=
Bp" target="_blank">http://topica.com/u/?b1dd66.bS57FK.Y29kZXBp </a><br>O=
r send an email to:=20
<a onclick="return top.js.OpenExtLink(window,event,this)" href="mailto:=
EUforum-unsubscribe at topica.com" target="_blank">EUforum-unsubscribe@topic=
a.com</a><br><br>For Topica's complete suite of email marketing solutio=
ns visit:
<br><a onclick="return top.js.OpenExtLink(window,event,this)" href="htt=
p://www.topica.com/?p=TEXFOOTER" target="_blank">http://www.topica.com/=
?p=TEXFOOTER</a><br>--^--------------------------------------------------=
--------------
<br><br></blockquote></div><br></span></div></blockquote></div><br>

------=_Part_67773_8397924.1169002813531--

new topic     » goto parent     » topic index » view thread      » older message » newer message

Search



Quick Links

User menu

Not signed in.

Misc Menu