ADK - Newbie Question

Hi,

I'm using Dolphin 3.0 (with latest updates) and I am having a problem with
the following;

searchDefinitions

  | searchFor |
  searchFor := Prompter prompt: 'Enter search criteria:'
  caption: 'Search definitions'.
  searchFor notNil ifTrue:[
  self model searchValue: searchFor].

This works OK when called from WorkSpace but when deployed with ADK I get;

        'invalid arg1: Cannot coerce a SmallInteger to lpstr'.

Using 'self halt'. immediately before and after, the offending line would
seem to be 'searchFor := Prompter prompt: 'Enter search criteria:'

I have tried the various options re stripping redundant methods etc, but so
far I haven't been able to overcome the problem.

Any help would be most appreciated.

Don,

> This works OK when called from WorkSpace but when deployed with ADK I get;
>
>         'invalid arg1: Cannot coerce a SmallInteger to lpstr'.

This sounds very much like a known problem with 3.0, for which Blair posted
the attached patch.

Ian






















begin 666 Image_filespec.st
M(4EM86=E(&UE=&AO9'-&;W(A#0H-"F9I;&53<&5C#0H)(E!R:79A=&4@+2!!
M;G-W97)S('1H92!S<&5C:69I97(@=&\@=7-E('=H96X@;&]A9&EN9R!T:&4@
M<F5C96EV97(@9G)O;2!A(&9I;&4B#0H-"@E\(&ED('P-"@E>*"AI9" Z/2!S
M96QF(&ED96YT:69I97(I(&ES26YT96=E<B!O<CH@6W-E;&8@9FEL94QO8V%T
M;W(@:7-.:6Q=*0T*"0EI9E1R=64Z(%MI9%T-"@D):69&86QS93H@6W-E;&8@
M9FEL94QO8V%T;W(@;&]C86Q&:6QE4W!E8T9O<CH@:61=#0HA("$-"@T*(4EM
M86=E(&-A=&5G;W)I97-&;W(Z("-F:6QE4W!E8R%A8V-E<W-I;F<A<'5B;&EC
'(2 A#0H-"@``
`
end

Don,

> This works OK when called from WorkSpace but when deployed with ADK I get;
>
>         'invalid arg1: Cannot coerce a SmallInteger to lpstr'.

This sounds very much like a known problem with 3.0, for which Blair posted
the attached patch.

Ian
























begin 666 Image_filespec.st
M(4EM86=E(&UE=&AO9'-&;W(A#0H-"F9I;&53<&5C#0H)(E!R:79A=&4@+2!!
M;G-W97)S('1H92!S<&5C:69I97(@=&\@=7-E('=H96X@;&]A9&EN9R!T:&4@
M<F5C96EV97(@9G)O;2!A(&9I;&4B#0H-"@E\(&ED('P-"@E>*"AI9" Z/2!S
M96QF(&ED96YT:69I97(I(&ES26YT96=E<B!O<CH@6W-E;&8@9FEL94QO8V%T
M;W(@:7-.:6Q=*0T*"0EI9E1R=64Z(%MI9%T-"@D):69&86QS93H@6W-E;&8@
M9FEL94QO8V%T;W(@;&]C86Q&:6QE4W!E8T9O<CH@:61=#0HA("$-"@T*(4EM
M86=E(&-A=&5G;W)I97-&;W(Z("-F:6QE4W!E8R%A8V-E<W-I;F<A<'5B;&EC
'(2 A#0H-"@``
`
end