Comments on: Load-Lookup Love Letter: Introduction

By: administrator

administrator — Wed, 23 Jun 2010 14:07:14 +0000

Wow, Prashanth, that is a very large query! The “where” parameter in load-lookup is limited to 256 characters, and the “table” parameter must be a literal string on a single line. That’s going to be hard to write and harder to read. Try creating database views that encapsulate as much logic as you can. The SQL statement for a view can join tables and be as long as you need. Then you can use the view in the load-lookup statement and it will appear simple.

By: prashanth

prashanth — Mon, 14 Jun 2010 08:00:47 +0000

How can i write a query using load lookup for joining two or more tables…
Here is my query..Can you just change the query using load lookup…

begin-select

alter-printer
font={CourierFont}
point-size={PointSize2}

a.account_name (,{Col1},{Col1Width}) on-break level=1
sh.service_name (,{Col2},{Col2Width}) on-break level=2
!i.effective_date (,{Col3},{Col3Width}) !Edit {TaskQueueDTFormat}
to_char(i.effective_date,’dd-mm-yyyy hh24:mi:ss’) &BillDate (,{Col3},{Col3Width})
move &BillDate to $BillDate
i.invoice_id (,{Col4},{Col4Width})
a.unbilled_amount (,{Col5},{Col5Width}) Edit {NumberMask}
sh.general_1 &RatePlan
move &RatePlan to #RatePlan
sh.general_2 &ServiceCategory
move &ServiceCategory to #ServiceCategory
sh.general_4 &ConnectionType
move &ConnectionType to #ConnectionType
sh.general_5 &CircuitType
move &CircuitType to #CircuitType
sh.general_6 &SubscriptionType
move &SubscriptionType to #SubscriptionType
pih.product_id &ProdId
move &ProdId to #ProdId

do RequiredRentAmount

position (+1)

from account a,service_history sh,invoice i,reference_code rc,customer_node_history cnh,product_instance_history pih
where sh.customer_node_id=a.customer_node_id
and a.invoice_id=i.invoice_id
and a.account_id=i.account_id
and a.account_type_id=10000
and i.invoice_type_id=1000020
and sh.BASE_PRODUCT_INSTANCE_ID = pih.PRODUCT_INSTANCE_ID
and pih.BASE_PRODUCT_INSTANCE_ID is null
and sh.customer_node_id=pih.customer_node_id
and sh.service_id=(select max(service_id) from service_history sh,product_instance_history pih
where sh.BASE_PRODUCT_INSTANCE_ID = pih.PRODUCT_INSTANCE_ID
and pih.BASE_PRODUCT_INSTANCE_ID is null
and sh.customer_node_id=cnh.customer_node_id)
and to_char(rc.reference_code)=sh.general_1
and rc.reference_type_id in(select reference_type_id from reference_type where type_label like $PlanName)
and cnh.region_code=#ref_code
and sh.customer_node_id=cnh.customer_node_id
and a.customer_node_id=cnh.customer_node_id
and i.customer_node_id=cnh.customer_node_id
and trunc(a.LAST_MODIFIED) between trunc(to_date($ReportStDate,’dd-mm-yyyy hh24:mi:ss’))
and trunc(to_date($RptEndDate,’dd-mm-yyyy hh24:mi:ss’))
and trunc(a.LAST_MODIFIED) between trunc(sh.effective_start_date) and trunc(sh.effective_end_date)
and trunc(a.LAST_MODIFIED) between trunc(cnh.effective_start_date) and trunc(cnh.effective_end_date)
and trunc(a.LAST_MODIFIED) between trunc(pih.effective_start_date) and trunc(pih.effective_end_date)
!and cnh.node_name like ‘PcustomerAccured5′

end-select

SOMEONE PLEASE DO THE NEEDFUL AS IT IS HIGHLY ESSENTIAL FOR PERFORMANCE……..

By: administrator

administrator — Sun, 05 Jul 2009 18:21:45 +0000

Very good, you solved it better than I had. I didn’t think of using the built-in #page-count variable.

By: Sundeep Kumar

Sundeep Kumar — Mon, 22 Jun 2009 18:18:54 +0000

!Final Solution to the Brain Teaser

Begin-Heading 1 &nsbp;&nsbp;Print $NAME (+1,70) End-Heading

Begin-footing 1 &nsbp;&nsbp;Print &NAME (,70) End-footing

Begin-Program Begin-Select EMPLID NAME &nsbp;&nsbp;Print &EMPLID (+1,1,20) &nsbp;&nsbp;If #PAGE-COUNT <> #OLD &nsbp;&nsbp;&nsbp;&nsbp;Let $NAME = &NAME &nsbp;&nsbp;End-If &nsbp;&nsbp;Print &NAME (,24,30)

&nsbp;&nsbp;Let #OLD = #PAGE-COUNT

From PS_PERSONAL_DATA where rownum <200 order by EMPLID End-Select End-Program

By: administrator

administrator — Mon, 22 Jun 2009 17:04:57 +0000

Excellent, you’ve solved half the problem – printing the last name. You are correct about the way heading and footing work. Now, try to determine when a name is the first on a page and save that name until the heading prints.

By: Sundeep Kumar

Sundeep Kumar — Mon, 22 Jun 2009 12:25:00 +0000

Yeah I did try using the Headers and footers too. The problem was when i use the variable in Heading and footing section the name of the last employee on the page is being printed always. It seems to me like the SQR first prints all the data and then prints the Header and footer for that page. Since i was using $NAME in the header and footer the last employees name of that page was printed in both header and footer.

By: administrator

administrator — Fri, 19 Jun 2009 23:01:49 +0000

You’re working too hard. Think about the begin-heading command. It waits until you’ve filled the main body of the page, then it prints the header. It is like a subroutine that you don’t have to call, it knows when to do its work. It has access to any global variable in the program and it can perform any command – not just print commands.

By: Sundeep Kumar

Sundeep Kumar — Fri, 19 Jun 2009 17:46:08 +0000

!Below is the code for the brain teaser
! Assumption that i have taken here is that the number of lines per page is 62

Begin-Setup
no-formfeed
End-Setup

Begin-Program
lET #I=1
Begin-Select
EMPLID
NAME
IF MOD(#I, 59) = 1
IF #I = 1
Print &Name (+1,70)
ELSE
Print &Name (+1,70)
END-IF
eND-IF

Print &EMPLID (+1,1,20)
Print &NAME (,24,30)

IF MOD(#I, 59) = 0
Print &Name (+1,70)
eND-IF

LET #I = #I +1

From PS_PERSONAL_DATA
where rownum <200
order by EMPLID
End-Select
If mod(#I – 1,59) 0
Print &Name (62,70,50)
End-If
End-Program

By: administrator

administrator — Mon, 23 Mar 2009 17:25:59 +0000

Definitely. Use code like this:

table = 'PS_EMPLOYEES E, PS_DEPT_TBL D'
where = 'D.DEPTID = E.DEPTID'

By: Petro Philip

Petro Philip — Mon, 23 Mar 2009 15:11:19 +0000

Is it possible to join 2 tables in the ‘TABLE=’ clause? (Without using a view?)