Re: Font point size & Dynamic query variables

["Peters, Brian" <PetersB@HSN.NET>]

Erin
What value are you putting in $Adm_Appl_Nbr and $Acad_Career?  Please
list your let or move statement for populating these variables.

Brian   at HSN

> -----Original Message-----
> From: Erin Bagozzi [SMTP:erin.e.bagozzi@MAILEXCITE.COM]
> Sent: Wednesday, August 12, 1998 3:44 PM
> To:   Multiple recipients of list SQR-USERS
> Subject:      Font point size & Dynamic query variables
>
> 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