can you rewrite the outer loop (the one that implied in the code you 
supplied) so that you pass a pointer to the array from calling method, 
rather then trying to create the pointer.

Array Real($MetalAmount_1;10)
Array Real($MetalAmount_2;10)
Array Real($MetalAmount_3;10)

for($i;1;3)
  case of
  :($i=1)
    $Array_ptr:= -> $MetalAmount_1
  :($i=2)
    $Array_ptr:= -> $MetalAmount_2
      etc
  end case
  process_metal_amount($Array_ptr)
end for


On Wed, 7 Aug 2019 13:06:49 -0400, Chuck Miller via 4D_Tech wrote:
> Hi All,
> The following fails 
> $MetalAmount_ptr:=Get pointer("$MetalAmount_"+String($MetalPos_L)+"_aR")
> $MetalAmount_ptr->{$Loop_L}:=$metalFactors_aR{$InnerLoop_L}
> 
> When I changed arrays to process
> $MetalAmount_ptr:=Get pointer("MetalAmount_"+String($MetalPos_L)+"_aR")
> $MetalAmount_ptr->{$Loop_L}:=$metalFactors_aR{$InnerLoop_L}
> 
> 
> It seems even in the same method you can not have a pointer to a 
> local array. I am not sure as to why. Any insight would be 
> appreciated, as I know you can pass a pointer to local (i.e. $) array 
> form method 1 to method 2 and that works. I would guess I could write 
> a method but that seems kind of a worth around
> 
> Thanks and regards
> 
> 
> Chuck
> 
------------------------------------------------------------------------------------------------
>  Chuck Miller Voice: (617) 739-0306
>  Informed Solutions, Inc. Fax: (617) 232-1064       
>  mailto:cjmiller<AT SIGN>informed-solutions.com 
>  Brookline, MA 02446 USA Registered 4D Developer                
>        Providers of 4D and Sybase connectivity
>           http://www.informed-solutions.com  
> 
------------------------------------------------------------------------------------------------
> This message and any attached documents contain information which may 
> be confidential, subject to privilege or exempt from disclosure under 
> applicable law.  These materials are intended only for the use of the 
> intended recipient. If you are not the intended recipient of this 
> transmission, you are hereby notified that any distribution, 
> disclosure, printing, copying, storage, modification or the taking of 
> any action in reliance upon this transmission is strictly 
> prohibited.  Delivery of this message to any person other than the 
> intended recipient shall not compromise or waive such 
> confidentiality, privilege or exemption from disclosure as to this 
> communication. 
> 
> **********************************************************************
> 4D Internet Users Group (4D iNUG)
> Archive:  http://lists.4d.com/archives.html
> Options: https://lists.4d.com/mailman/options/4d_tech
> Unsub:  mailto:[email protected]
> **********************************************************************
---------------
Gas is for washing parts
Alcohol is for drinkin'
Nitromethane is for racing 
**********************************************************************
4D Internet Users Group (4D iNUG)
Archive:  http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub:  mailto:[email protected]
**********************************************************************

Reply via email to