[Date Prev][Date Next][Thread Prev][Thread Next]
[Author Index] [Date Index] [Thread Index]
[SQR-USERS Info] [SQRUG Home Page]

[sqr-users] Re: prompt user for date



SQR creates the variables to hold values returned from the select by
adding "&" to the front of the select fields.

ie:

select
A.EMPLID
from PS_PERSONAL_DATA A

would create &A.EMPLID

You are not using referencing and so the program is trying to create
&EMPLID over and over.

You must use Aliasing in SQR.




******************************
Larry Roux
Syracuse University
lroux@syr.edu
*******************************

>>> lkelsey@alamo-group.com 08/06/03 09:51AM >>>
Thanks for the responses, everyone, the error is gone!  I have one error
left
in the file, still need help. In the procedure get personal data, I get
the
following error: Error on line 33:   (SQR 3719) Columns names and
expressions
must be unique or be given unique pseudonyms (&name).
EMPLID Errors were found in the program file.
SQR: Program Aborting. The error is referring to the line with emplid
under
the procedure get personal data.

Here's the code:

BEGIN-PROCEDURE MAIN
!PROMPT USER TO ENTER BEGIN AND END DATE
INPUT $BEGIN_DT 'ENTER BEGIN DATE' TYPE MM-DD-YYYY
INPUT $END_DT 'ENTER END DATE' TYPE MM-DD-YYYY

BEGIN-SELECT
EMPLID
   LET $EMPLOYMENT.EMPLID=&EMPLID
HIRE_DT
FROM PS_EMPLOYMENT WHERE HIRE_DT >=$BEGIN_DT AND &HIRE_DT <=$END_DT
END-SELECT
END-PROCEDURE MAIN

BEGIN-PROCEDURE GET_PERSONAL_DATA
BEGIN-SELECT
EMPLID
SSN
FNAME
LNAME
STREET1
STREET2
CITY
STATE
ZIP
FROM PS_PERSONAL_DATA WHERE EMPLID=$EMPLOYMENT.EMPLID
END-SELECT
END-PROCEDURE GET_PERSONAL_DATA

Thanks,
Lisa

_______________________________________________
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