25 lines
699 B
Plaintext
25 lines
699 B
Plaintext
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
|