RE: [sqr-users] Using Case Statements in SQR,

["Antonio Guiza" <aguiza@pcc.edu>]

Just add DESCR254 field to the selected items right before the case block.

-----Original Message-----
From: sqr-users-bounces+aguiza=pcc.edu@sqrug.org
[mailto:sqr-users-bounces+aguiza=pcc.edu@sqrug.org] On Behalf Of Marc Kane
Sent: Friday, February 23, 2007 12:41 PM
To: sqr-users@sqrug.org
Subject: Re: [sqr-users] Using Case Statements in SQR,

My new code follows Larry's initial recommendation:

!*****************************
Begin-Procedure Get_REBILL_METRICS
!*****************************
               LET #COUNT = 0
               LET $CC_CL_CD = ' '
               LET $CC_TYPE_CD = ' '
               LET $REQ_REASON = ' '
               LET $REBILL_TYPE = ' '

Begin-SELECT
COUNT(*)   &COUNT
CC_CL_CD   &CC_CL_CD
CC_TYPE_CD   &CC_TYPE_CD
(CASE
   WHEN DESCR254 LIKE '%C%' THEN 'CS REQ'
   WHEN DESCR254 LIKE '%B%' THEN 'BILL SEG'
   WHEN DESCR254 LIKE '%R%' THEN 'REREAD'
   WHEN DESCR254 LIKE '%A%' THEN 'AMR' ELSE 'Other' END) &REQUEST_REASON
(CASE
   WHEN DESCR254 LIKE '%FF%'     THEN 'FF Malfunction'
   WHEN DESCR254 LIKE '%thrs%'   THEN 'Threshold'
   WHEN DESCR254 LIKE '%thresh%' THEN 'Threshold'
   WHEN DESCR254 LIKE '%th%'     THEN 'Threshold'
   WHEN DESCR254 LIKE '%stuck%'  THEN 'Meter Stuck'
   WHEN DESCR254 LIKE '%stck%'   THEN 'Meter Stuck'
   WHEN DESCR254 LIKE '%ovr%'    THEN 'Over Estimate'
   WHEN DESCR254 LIKE '%tover%'  THEN 'Over Estimate'
   WHEN DESCR254 LIKE '%O/R%'    THEN 'Over Estimate'
   WHEN DESCR254 LIKE '%oest%'   THEN 'Over Estimate'
   WHEN DESCR254 LIKE '%und%'    THEN 'Under Estimate'
   WHEN DESCR254 LIKE '%under%'  THEN 'Under Estimate'
   WHEN DESCR254 LIKE '%U/R%'    THEN 'Under Estimate'
   WHEN DESCR254 LIKE '%uest%'   THEN 'Under Estimate' ELSE 'Other' END)
&REBILL_TYPE

                SHOW 'IN Get_REBILL_METRICS PROCEDURE'
                DO Get_PRINT_OUTPUT    !Programmed

FROM PS_CI_CC
WHERE CC_DT BETWEEN TO_DATE($start_dt, 'MM/DD/YYYY') AND TO_DATE($end_dt,
'MM/DD/YYYY')
AND CC_CL_CD = 'BLNG'
AND CC_TYPE_CD IN ('OVR/UND ADJ' , 'THRES ADJ')
GROUP BY CC_CL_CD, CC_TYPE_CD, DESCR254, DESCR254, PER_ID
ORDER BY PER_ID ASC, CC_CL_CD ASC, CC_TYPE_CD ASC, DESCR254 ASC, DESCR254
ASC


End-SELECT


!********************************
End-Procedure  !Get_BILL_CORRECTIONS_INFO    !Programed
!********************************


-- 
Thank you,
M. Kane
Reports Developer (Crystal Reports/SQR)
PeopleSoft CIS Production Support
GES/New York, NY
702.349.5107

_______________________________________________
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