RE: [sqr-users] blank line being inserted unexpectedly whileissuingprint commands

["Lynds,Rick" <rlynds@mwdh2o.com>]

-----Original Message-----
From: sqr-users-bounces+rlynds=mwdh2o.com@sqrug.org
[mailto:sqr-users-bounces+rlynds=mwdh2o.com@sqrug.org] On Behalf Of marc
pechaitis
Sent: Tuesday, April 12, 2005 6:40 AM
To: This list is for discussion about the SQR database reporting
languagefrom Hyperion Solutions.
Subject: Re: [sqr-users] blank line being inserted unexpectedly
whileissuingprint commands

Steve,
This is what I am using for the processing of the report:
@#@#@#@#@#@#@#@#@#@#@#start
begin-procedure Get-Transcript-Info

Columns 1 90

Let #bottom-line = 56

begin-Select
A.REPORT_REQUEST_NBR,
A.REQUEST_SEQ_NBR,
C.TSCRPT_TYPE,
A.REPORT_NUMBER,
B.COPY_NUMBER,
A.REPORT_LINE_NBR,
A.TSCRPT_COMP_CODE,
A.TSCRPT_COMP_DATA,
A.DISPLAY_ATTR,
B.TSCRPT_TITLE,
B.TSCRPT_INS_ADDR1,
B.TSCRPT_INS_ADDR2,
B.TSCRPT_INS_ADDR3,
B.TSCRPT_INS_ADDR4,
B.TSCRPT_INS_ADDR5,
B.TSCRPT_INS_ADDR6,
B.TSCRPT_INS_ADDR7,
B.TSCRPT_EM_ADDR1,
B.TSCRPT_EM_ADDR2,
B.TSCRPT_EM_ADDR3,
B.TSCRPT_EM_ADDR4,
B.TSCRPT_EM_ADDR5,
B.TSCRPT_EM_ADDR6,
B.TSCRPT_EM_ADDR7,
B.TSCRPT_EM_ADDR8,
B.TSCRPT_EM_ADDR9,
B.TSCRPT_EM_ADDR10,
B.TSCRPT_EM_ADDR11,

  Let $DisplayAttr = Rtrim(&A.DISPLAY_ATTR,' ')     
  Let $TranscriptLine = Rtrim(&A.TSCRPT_COMP_DATA,' ')
  Let $TranscriptType = Rtrim(&C.TSCRPT_TYPE, ' ')
  
  Let $TrimmedTransLine = Ltrim($TranscriptLine, ' ')
  
  Let $OtherLine = 'Y'
  
  if #current-line >= #bottom-line
        Next-Column Goto-Top=1 At-End=NewPage
        Let $Subject = substr($TranscriptLine, 1, 8)
                  Let $CatalogNbr = substr($TranscriptLine, 11, 10)
                          
                  Evaluate $TranscriptType
                        When = 'OFFIC'
                                do Proc-Transcript-Line-OFFIC
                                break
                        When = 'OFFEX'
                                do Proc-Transcript-Line-OFFEX
                                break
                        When-Other
                                if ($DisplayAttr = 'B')
                                        print $TranscriptLine  (+1,1) bold
                                else
                                        print $TranscriptLine  (+1,1)
                                end-if
          end-evaluate
  else
          Let $Subject = substr($TranscriptLine, 1, 8)
          Let $CatalogNbr = substr($TranscriptLine, 11, 10)
                  
          Evaluate $TranscriptType
                When = 'OFFIC'
                        do Proc-Transcript-Line-OFFIC
                        break
                When = 'OFFEX'
                        do Proc-Transcript-Line-OFFEX
                        break
                When-Other
                        if ($DisplayAttr = 'B')
                                print $TranscriptLine  (+1,1) bold
                        else
                                print $TranscriptLine  (+1,1)
                        end-if
          end-evaluate
  end-if
  
FROM PS_SA_REPORT_RSLT A,
PS_SA_RPT_RSLT_HDR B,
PS_SA_REQUEST_HDR C
WHERE A.REPORT_REQUEST_NBR = $ReptReqstID
  AND A.REQUEST_SEQ_NBR = $ReptReqstSeq
  AND A.REPORT_REQUEST_NBR = B.REPORT_REQUEST_NBR
  AND A.REPORT_REQUEST_NBR = $ReptReqstID
  AND A.REPORT_REQUEST_NBR = C.REPORT_REQUEST_NBR
  AND A.REQUEST_SEQ_NBR = B.REQUEST_SEQ_NBR
  AND A.REPORT_NUMBER = B.REPORT_NUMBER
  AND A.TSCRPT_COMP_CODE NOT LIKE 'T0%' 
  AND A.TSCRPT_COMP_CODE NOT LIKE 'IN%' 
  AND A.TSCRPT_COMP_CODE NOT LIKE 'EM%' 
ORDER BY 1, 2, 3, 5
end-Select

end-procedure !Get-Transcript-Info

@#@#@#@#@#@#@#@#@#@#@#end

And I suspect that the lines:

  if #current-line >= #bottom-line
        Next-Column Goto-Top=1 At-End=NewPage

are the ones that could be issuing the line extra line feeds...is this
possible?  Is there any way to supress this?  (I have included these lines
to print the report two columns of one "page" to a landscape sheet).

Thanks,
Marc

On Apr 12, 2005 4:10 AM, Steve Cavill <steve.cavill@infoclarity.com.au>
wrote:
> Do you have a next-listing or position() command, they also cause line 
> feeds.
> Steve
> 
> -----Original Message-----
> From: sqr-users-bounces+steve.cavill=infoclarity.com.au@sqrug.org
> [mailto:sqr-users-bounces+steve.cavill=infoclarity.com.au@sqrug.org] 
> On Behalf Of marc pechaitis
> Sent: Tuesday, 12 April 2005 11:27 AM
> To: sqr-users@sqrug.org
> Subject: [sqr-users] blank line being inserted unexpectedly while 
> issuingprint commands
> 
> Hello All -
> You've been super helpful to me in the past, and I've got another 
> problem that has me stumped.
> 
> I am writing a report that selects a row of data from a table and 
> based on the data in that row, it may decide to omit the line from the
report.
> 
> So let's say I have table:
> row 1 - a1
> row 2 - a2
> row 3 - a3
> row 4 - b1
> row 5 - b2
> row 6 - b3
> row 7 - c1
> row 8 - c2
> row 9 - c3
> 
> And I know that, based on the content of row 5 (b2) that I want to 
> omit rows
> 4-6 (the b's).  I've got the logic working so that all three rows are 
> omiitted, but for some reason the output is:
> 
> a1
> a2
> a3
> 
> c1
> c2
> c3
> 
> and not:
> a1
> a2
> a3
> c1
> c2
> c3
> 
> I'm just using a basic "print $var (+1,1)" command and have been 
> through the code about a million times to see if I might have an extra
"print"
> statement in my exclusion processing, but I can't find anything.
> 
> Has anyone encountered anything like this?  Any suggestions of things 
> to check that could cause this?
> 
> Thanks!
> Marc
> 
> _______________________________________________
> 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

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