Font point size & Dynamic query variables

[Erin Bagozzi <erin.e.bagozzi@MAILEXCITE.COM>]

I am working on a report and I am stuck on two things.  Any help
would be extremely appreciated.  I looked through the user-lists
archives but I could not find an answer.

1) I want the entire report to print out in a smaller font point
size.  Right now I am calling setup01.sqc.  I looked at the SQR
manual and I couldn't make heads or tails of the difference
between using a printer-init statement, declare-layout, and
declare printer.  I tried using a Declare-printer statement
in my SQR but I kept getting an error that I can't use that
function when I am using printer-init.  Any help or guidance?

2) I am trying to use two dynamic variables in a select.
I have done something like this before but for some reason I can't
get this to work.  I keep getting the same error - #911 Invalid character.
The code I am using is below.

Thanks in advance.

Erin


if $Profile_Opt = 'S'
   let $var1 = 'and AP.ADM_APPL_NBR = $Adm_Appl_Nbr'
   let $var2 = 'and AP2.ADM_APPL_NBR = AP.ADM_APPL_NBR'
else
   let $var1 = 'and AP.ACAD_CAREER = $Acad_Career'
   let $var2 = 'and AP2.ACAD_CAREER = AP.ACAD_CAREER'
end-if

begin-select loops=1 on-error=sql-error
AP.APPL_PROG_NBR
AP.INSTITUTION
AP.ACAD_CAREER
AP.ADMIT_TERM
AP.ADM_APPL_NBR
AP.EFFDT
AP.JOINT_PROG_APPR
AP.ACAD_PROG_DUAL
AP.ACAD_LOAD_APPR
AP.ACAD_PROG
AP.PROG_STATUS
AP.PROG_ACTION
AP.ACTION_DT
AP.PROG_REASON

        let #Appl_Prog_Nbr = &AP.APPL_PROG_NBR
        let $Institution = &AP.INSTITUTION
        let $Acad_Career = &AP.ACAD_CAREER
        let #Admit_Term = &AP.ADMIT_TERM
        let $Adm_Appl_Nbr = &AP.ADM_APPL_NBR
        let $Prog_Effdt = &AP.EFFDT
        let $Joint_Prog = &AP.JOINT_PROG_APPR
        let $Dual_Prog = &AP.ACAD_PROG_DUAL
        let $Acad_Load_Appr = &AP.ACAD_LOAD_APPR
        let $Acad_Prog = &AP.ACAD_PROG
        let $Prog_Status = &AP.PROG_STATUS
        let $Prog_Action = &AP.PROG_ACTION
        let $Action_Dt = &AP.ACTION_DT
        let $Prog_Reason = &AP.PROG_REASON
        do GET-PROG-DESCR

from PS_ADM_APPL_PROG AP
where AP.EMPLID = $Emplid
[$var1]
and AP.ACTION_DT = (SELECT max(AP2.ACTION_DT)
              FROM PS_ADM_APPL_PROG AP2
              WHERE AP2.EMPLID = AP.EMPLID
              [$var2])
end-select



Free web-based email, Forever, From anywhere!
http://www.mailexcite.com