[sqr-users] RE: Reading file into SQR

["White . Denise" <DWhite@drc.com>]

I would say that you will have to do something like this:

while 1 = 1
    read 1 into $recorddata1:1000
    read 1 into $recorddata2:1000
    let $recorddata2 = upper($recorddata2)
    EVALUATE $recorddata2
        when = 'SSN:'
        LET $N_SSN = upper($recorddata1)
        BREAK

HTH,
Denise M. White
EBS Programmer/Analyst III
Dynamics Research Corporation
------------------------------

Message: 10
Date: Fri, 14 Jul 2006 16:56:32 -0500
From: "ViJaYaNaNd gMaiL" <grvijay@gmail.com>
Subject: [sqr-users] Reading file into SQR
To: sqr-users@sqrug.org
Message-ID:
        <bc4751750607141456m63a2f3dcwd771718bf6b223ab@mail.gmail.com>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed

Hi
I have a text file that I am reading in through sqr.
Now the format of the text file has changed and the file is not reading
properly and not updating the tables. Do i need to modify the program.
Any
pointers would be of much helpful to me.

Here is the piece of code:
while 1 = 1
    read 1 into $recorddata:1000
    let $recorddata = upper($recorddata)
    EVALUATE $recorddata
        when = 'SSN:'
        read 1 into $recorddata:1000
        LET $N_SSN = upper($recorddata)
        BREAK

My text file previous was looking like this for SSN:
SSN:
999-99-9999

But now my text file looks like this
999-99-9999
SSN:

Similarly someother fields got rearranged like these.

Need advice

thnx
cvijay

_______________________________________________
sqr-users mailing list
sqr-users@sqrug.org
http://www.sqrug.org/mailman/listinfo/sqr-users