Function ReadNextA(Array, Pos, Delim)

/******************************************************************************************************* 

    This program is proprietary and is not to be used by or disclosed to others, nor is it to
    be copied without written permission from SRP Computer Solutions, Inc.

    Name        :   ReadNextA

    Description :   

	Tags		:	[SRP]

    Notes		:	Init Pos = 1 and EOL = Len(Array)

    History (Date, Initials, Notes)
        05/31/10    fjt     Initial development

*******************************************************************************************************/

Val = Array[Pos, Delim]
Pos = Col2()+1

Return Val