RE: [sqr-users] Can anybody help - - - - Foreign SPY Detected!!!

[Jim McKeever <JMcKeever@fastaff.com>]

PLEASE!!!!! don't start on this again...

-----Original Message-----
From: David Thorburn [mailto:thorburn@conl.net]
Sent: Friday, October 24, 2003 11:23 AM
To: sqr-users@sqrug.org
Subject: Re: [sqr-users] Can anybody help - - - - Foreign SPY
Detected!!!


** Foreign SPY Alert!!! **

Foreign Parasite,

I bet you told your employer that you were an SQR
expert like the rest of your Chutia parasites lie on their
resumes!

Now you're stuck, huh?

Why are you using an anon email address?

Are you afraid of your emplor finding out that you
are trying to get others to do your work for you

Do your own work!

Quit stealing American jobs!

No knowledge transfer to ANON email addresses!

----------------------------------------------------------------------------
-----------------

----- Original Message -----
From: "premnath sunkara" <spn1981@yahoo.com>
To: <sqr-users@sqrug.org>
Sent: Friday, October 24, 2003 10:00 AM
Subject: [sqr-users] Can anybody help


>        I am new to SQR and am working on it from 1
> week. I am trying to run the following program. This
> program reads from a flat file and inserts the data in
> the flat file into a record. It is giving me the
> following error
> <SQR 5703> Error opening the SQR log file: 'sqr.log'
> <13>: Permission denied
> This is happening only for this program. All my other
> programs are fine. The input file is in the following
> format
>
> 34, 34, 34, 34
> 34, 34, 34, 34
> 34, 34, 34, 34
>
> The record in the database is also fine. I mean it has
> all the fields i gave in the program in the same
> order.
> The program is given below:
>
>
> !testing  program
> !using flat files to populate database
>
> begin-program
>
> open 'C:\Documents and
> Settings\psunkara\Desktop\test.txt' as 1 for-reading
> record 3000
> !status=#filestat
> ! if #filestat !0
> ! show 'error opening input file'
> ! else
> do read_input_file
> ! end-if
>
> end-program
>
> begin-procedure read_input_file
>
> display 'inseritng records from file C:\Documents and
> Settings\psunkara\Desktop\test.txt into
> UHS_PORTINVCODE'
> move 0 to #inserts
> move 0 to #tot-recs
>
> while not #end-file
> read 1 into $input:1000
> if #end-file
> break
> end-if
> unstring $input by $sepchar into -
> $UHS_NDIP -
> $UHS_NDNAME -
> $UHS_PORT -
> $UHS_DELTATRAFFIC
>
> do insert_temp_job
> end-while
>
> close 1
> ! display 'total records inserted: ' noline
> ! display #tot_recs 999,999,999
>
> end-procedure
>
> begin-procedure insert_temp_job
>
> begin-sql on-error=insert_error
>
> insert into PS_UHS_PORTINVCODE
> (
> UHS_NDIP,
> UHS_NDNAME,
> UHS_PORT,
> UHS_DELTATRAFFIC
> )
>
> values
>   (
> $UHS_NDIP,
> $UHS_NDNAME,
> $UHS_PORT,
> $UHS_DELTATRAFFIC
> )
>
> end-sql
> ! if #sql-count=1
> ! add 1 to #inserts
> ! if #inserts >= 500
> ! commit
> ! move 0 to #inserts
> ! end-if
> ! add 1 to #tot_recs
> ! end-if
>
> end-procedure
>
> begin-procedure insert_error
>
> if #sql-status=-9 !if duplicate(this code is for
> oracle only)
> show 'insert error:duplicate roe is not allowed for
> NDIP' $UHS_NDIP
> else
> show 'insert error: ' $sql-error
> show 'error number: ' #sql-status
> stop !halt program and rollback
> end-if
>
> end-procedure
>
>
>
>
>
>
> __________________________________
> Do you Yahoo!?
> The New Yahoo! Shopping - with improved product search
> http://shopping.yahoo.com
>
> _______________________________________________
> sqr-users mailing list
> sqr-users@sqrug.org
> http://www.sqrug.org/mailman/listinfo/sqr-users
>

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

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