>Hi Alejandro,
>
>>The VB code for this function.
>>
>>Dim objMy As acode1
>>Dim r As Object
>>Dim hlon As String, hlat As String, Rv As Double, Glon As String, GLat As String
>>Dim Dearth As Double, ra As String, dec As String, asize As Double
>>Dim elong As Double, phs As Double, mag As Double
>>
>>Set objMy = New acode1
>>Set r = objMy.calcplanets("12/23/1997", "12:15", 89.03, 6, 42.41, "W", _
>> "JUP", 4, hlon, hlat, Rv, Glon, GLat, Dearth, ra, dec, asize, elong, phs, mag, False)
>
>I don't know much VB, but this surely looks like a COM object creation, not a DLL call. In VFP it would be something like:
>
> objMy = CreateObject( "xyz.acode1" )
> objMy.CalcPlanets(...)
>
>Christof

I think CalcPlanets function receive not one but several items perhaps a struct.

So, How may I issue the DECLARE statement ?