I am trying to convert some VB examples using SAS to VFP using SAS. The example I am using can be found at http://support.sas.com/rnd/itech/doc/dist-obj/winclnt/winvbpro.html under Passing Arrays in IOM Method Calls.

 Dim obWSMgr As New SASWorkspaceManager.WorkspaceManager
 Dim obWS As SAS.Workspace
 Dim errString As String
 Set obWS = obWSMgr.Workspaces.CreateWorkspaceByServer("My workspace", VisibilityNone, Nothing, "", "", errString)

 Dim obDS as SAS.DataService
 Dim vName as variant
 ' Declare a dynamic array of strings to hold libnames
 Dim arLibnames() as string
 Set obDS = obWS.DataService
 ' pass the dynamic array variable to "ListLibrefs". Upon return,
 ' the array variable will be filled in with an array of strings
 ' one element for each libref in the workspace
 obDS.ListLibrefs arLibnames
 ' Print each name in the returned array
  For Each vName in arLibnames
    debug.print vName
  Next vName
  ' Print the size of the array
   debug.print "Number of librefs was: " & Ubound(arLibnames)+1
   ObWS.Close

Here is my VFP attempt to do the same

  *All the above code works in VFP including the oLibRef =   ;
    oSAS.DataService.AssignLibref("unixlib","","/mktg01/usg774a","") assignment.

  DIMENSION arlibnames[1] AS String 
  arlibnames = "x"

  oSAS.DataService.ListLibrefs( @arLibnames )
  For lni = 1 TO ALEN( arlibnames,1)
    ? arlibnames[lni]
  Next  

I am getting 'x' back as the value of arlibnames array. Any suggestions? I tried passing the array by value and with a dimension of 10.