MI-L Problem creating points.

[Scott, David]

Hello all.  I am trying to write an app that takes a table of points and
maps them.  The problem that I am having is that all the points are on top
of each other.  I cannot figure out what is happening.  Here is the sub that
I am using:
 
dim iCPLoop as integer
   dim iNumCP as integer
   
   iNumCP = tableinfo(sNewTabName,tab_info_nrows)
 
   for iCPLoop = 1 to iNumCP
 
       fetch first from sNewTabName
 
       update sNewTabName set obj = createpoint(sLongColumn,sLatColumn)
       fetch next from sNewTabName
       iCPLoop = iCPLoop + 1
 
   next
 
Any help would be much appreciated.
 
thanks
 
David Scott
GIS Specialist
RF Engineering
U.S. Unwired
Sprint PCS Network Partner
52 Corporate Circle
Albany, New York 12203
PCS: 518.506.2172