Can someone please suggest me in tuning this query?

Can someone please suggest me in tuning this query?
select pemail.email_oid,
pemail.parent_oid,
md.message_data_oid,
ea.email_account_oid,
ef.email_folder_oid,
md.channel,
ea.email_account_name,
md.from_address,
md.to_address,
eref.ref_id ticket_number,
( select count(email_oid) from esg.email where email_oid = pemail.email_oid and email.attachment_flag = 'Y' ) attachment_flag_a,
( select count(email_oid) from esg.email cemail
where cemail.parent_oid = pemail.email_oid and
( cemail.email_type is null or cemail.email_type != 'S') and
cemail.vec_status not in ('G', 'D', 'P') and
cemail.vec_status in ('N', 'O') and
cemail.attachment_flag = 'Y' ) attachment_flag_b,
md.received_date,
pemail.vec_status,
pemail.email_type,
md.subject,
md.content,
pemail.tracking_id,
pemail.assignee_oid,
( select count(email_oid) from email cemail
where cemail.parent_oid = pemail.email_oid and
(cemail.email_type is null or cemail.email_type != 'S' ) and
cemail.vec_status not in ('G','D', 'P') and
cemail.vec_status in ('N', 'O' ) ) child_email_cnt,
( select count(0) from email
where vec_status = 'N' and
email_type = 'O' and
email_oid = pemail.email_oid and
vec_status in ('N', 'O' )) parent_newemail_cnt,
( select count(0) from email
where vec_status = 'N' and
email_type = 'O' and
parent_oid = pemail.email_oid and
vec_status in ('N', 'O' )) child_newemail_cnt
From esg.email pemail,
esg.message_data md,
esg.email_account ea,
esg.email_folder ef,
(select email_oid, ref_id from email_ref
where email_ref_oid in (select min(email_ref_oid) from email_ref where ref_tid = -9000 and ref_sid = 'ESG' and confirmed_flag = 'Y' group by email_oid )) eref
where
md.message_data_oid = pemail.message_data_oid and
pemail.email_folder_oid = ef.email_folder_oid(+) and
ef.email_account_oid = ea.email_account_oid(+) and
pemail.vec_status not in ('G','D','P') and
pemail.vec_status in ('N', 'O') and
pemail.email_oid = eref.email_oid(+) and
lower(md.channel) in ('[email protected]', '[email protected]') and
pemail.email_oid in
( select parent.email_oid from message_data md,
email parent
where md.message_data_oid = parent.message_data_oid and
parent.parent_oid is null and
pemail.email_type = 'O' and
lower(md.to_address) in
( select lower(contact_info) from esg.user_profile up,
esg.person p,
esg.person_contact pc
where up.user_oid = 802239 and
up.person_oid = p.person_oid and
p.person_oid = pc.person_oid and
pc.contact_type_oid = 6 )
union all
select child.parent_oid from message_data md,
email child
where md.message_data_oid = child.message_data_oid and
parent_oid is not null and
child.vec_status not in ('G','D','P') and
child.vec_status in ('N', 'O') and
child.email_type = 'O' and
lower(md.to_address) in
( select lower(contact_info) from esg.user_profile up,
esg.person p,
esg.person_contact pc
where up.user_oid = 802239 and
up.person_oid = p.person_oid and
p.person_oid = pc.person_oid and
pc.contact_type_oid = 6 )
ORDER BY RECEIVED_DATE DESC;
1st run
Elapsed: 00:00:03.39
2nd run
Elapsed: 00:00:01.80
SQL> Select TABLE_NAME,LAST_ANALYZED, num_rows from user_tables where table_name in ('EMAIL','MESSAGE_DATA', 'EMAIL_ACCOUNT','EMAIL_FOLDER','EMAIL_REF','USER_PROFILE','PERSON','PERSON_CONTACT');
TABLE_NAME LAST_ANAL NUM_ROWS
USER_PROFILE 11-JUN-11 385808
PERSON_CONTACT 11-JUN-11 698624
PERSON 11-JUN-11 405364
MESSAGE_DATA 11-JUN-11 1069
EMAIL_REF 11-JUN-11 559
EMAIL_FOLDER 11-JUN-11 563
EMAIL_ACCOUNT 11-JUN-11 563
EMAIL 11-JUN-11 101652
8 rows selected.
row count from all tables
email - 102063
message_data - 1069
email_account - 563
email_folder - 563
email_ref - 559
user_profile - 386055
person - 404057
person_contact - 698696
Thanks,
Suman M.

======================================
Execution Plan
Plan hash value: 110416976
| Id | Operation | Name | Rows | Bytes | Cost |
| 0 | SELECT STATEMENT | | 1 | 1361 | 17 |
| 1 | SORT AGGREGATE | | 1 | 8 | |
|* 2 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 8 | 1 |
|* 3 | INDEX UNIQUE SCAN | PK_EMAIL | 1 | | 1 |
| 4 | SORT AGGREGATE | | 1 | 8 | |
|* 5 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 8 | 1 |
|* 6 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 3 | | 1 |
| 7 | SORT AGGREGATE | | 1 | 6 | |
|* 8 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 6 | 1 |
|* 9 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 3 | | 1 |
| 10 | SORT AGGREGATE | | 1 | 10 | |
|* 11 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 10 | 1 |
|* 12 | INDEX UNIQUE SCAN | PK_EMAIL | 1 | | 1 |
| 13 | SORT AGGREGATE | | 1 | 6 | |
|* 14 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 6 | 1 |
|* 15 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 3 | | 1 |
| 16 | SORT ORDER BY | | 1 | 1361 | 17 |
|* 17 | FILTER | | | | |
| 18 | NESTED LOOPS OUTER | | 1 | 1361 | 5 |
| 19 | NESTED LOOPS OUTER | | 1 | 1336 | 4 |
| 20 | NESTED LOOPS | | 1 | 1328 | 3 |
| 21 | NESTED LOOPS OUTER | | 1 | 53 | 2 |
| 22 | INLIST ITERATOR | | | | |
| 23 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 35 | 1 |
|* 24 | INDEX RANGE SCAN | IE_EMAIL | 55 | | 1 |
| 25 | VIEW PUSHED PREDICATE | | 1 | 18 | 1 |
| 26 | NESTED LOOPS | | 1 | 36 | 4 |
| 27 | VIEW | VW_NSO_1 | 11 | 143 | 3 |
| 28 | SORT GROUP BY | | 11 | 231 | 3 |
|* 29 | TABLE ACCESS BY INDEX ROWID| EMAIL_REF | 11 | 231 | 3 |
|* 30 | INDEX FULL SCAN | AK1_EMAIL_REF | 21 | | 3 |
|* 31 | TABLE ACCESS BY INDEX ROWID | EMAIL_REF | 1 | 23 | 1 |
|* 32 | INDEX UNIQUE SCAN | PK_EMAIL_REF | 1 | | 1 |
|* 33 | TABLE ACCESS BY INDEX ROWID | MESSAGE_DATA | 1 | 1275 | 1 |
|* 34 | INDEX UNIQUE SCAN | PK_MESSAGE_DATA | 1 | | 1 |
| 35 | TABLE ACCESS BY INDEX ROWID | EMAIL_FOLDER | 1 | 8 | 1 |
|* 36 | INDEX UNIQUE SCAN | PK_EMAIL_FOLDER | 1 | | 1 |
| 37 | TABLE ACCESS BY INDEX ROWID | EMAIL_ACCOUNT | 1 | 25 | 1 |
|* 38 | INDEX UNIQUE SCAN | PK_EMAIL_ACCOUNT | 1 | | 1 |
| 39 | UNION-ALL | | | | |
| 40 | NESTED LOOPS SEMI | | 1 | 116 | 5 |
| 41 | NESTED LOOPS | | 1 | 50 | 2 |
|* 42 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 14 | 1 |
|* 43 | INDEX UNIQUE SCAN | PK_EMAIL | 1 | | 1 |
| 44 | TABLE ACCESS BY INDEX ROWID | MESSAGE_DATA | 1069 | 38484 | 1 |
|* 45 | INDEX UNIQUE SCAN | PK_MESSAGE_DATA | 1 | | 1 |
|* 46 | VIEW | VW_NSO_3 | 1 | 66 | 3 |
|* 47 | FILTER | | | | |
| 48 | NESTED LOOPS | | 1 | 45 | 3 |
| 49 | NESTED LOOPS | | 1 | 15 | 2 |
| 50 | TABLE ACCESS BY INDEX ROWID | USER_PROFILE | 1 | 10 | 1 |
|* 51 | INDEX UNIQUE SCAN | PK_USER | 1 | | 1 |
|* 52 | INDEX UNIQUE SCAN | PK_PERSON | 405K| 1979K| 1 |
|* 53 | TABLE ACCESS BY INDEX ROWID | PERSON_CONTACT | 1 | 30 | 1 |
|* 54 | INDEX RANGE SCAN | FK_PERSON_CONTACT_PERSON | 2 | | 1 |
| 55 | NESTED LOOPS | | 1 | 114 | 5 |
| 56 | MERGE JOIN CARTESIAN | | 1 | 78 | 4 |
|* 57 | TABLE ACCESS BY INDEX ROWID | EMAIL | 1 | 12 | 1 |
|* 58 | INDEX RANGE SCAN | FK_EMAIL_PARENT | 1 | | 1 |
| 59 | BUFFER SORT | | 1 | 66 | 3 |
| 60 | VIEW | VW_NSO_2 | 1 | 66 | 3 |
| 61 | SORT UNIQUE | | 1 | 45 | |
| 62 | NESTED LOOPS | | 1 | 45 | 3 |
| 63 | NESTED LOOPS | | 1 | 15 | 2 |
| 64 | TABLE ACCESS BY INDEX ROWID| USER_PROFILE | 1 | 10 | 1 |
|* 65 | INDEX UNIQUE SCAN | PK_USER | 1 | | 1 |
|* 66 | INDEX UNIQUE SCAN | PK_PERSON | 405K| 1979K| 1 |
|* 67 | TABLE ACCESS BY INDEX ROWID | PERSON_CONTACT | 1 | 30 | 1 |
|* 68 | INDEX RANGE SCAN | FK_PERSON_CONTACT_PERSON | 2 | | 1 |
|* 69 | TABLE ACCESS BY INDEX ROWID | MESSAGE_DATA | 1 | 36 | 1 |
|* 70 | INDEX UNIQUE SCAN | PK_MESSAGE_DATA | 1 | | 1 |
Predicate Information (identified by operation id):
2 - filter("EMAIL"."ATTACHMENT_FLAG"='Y')
3 - access("EMAIL_OID"=:B1)
5 - filter("CEMAIL"."EMAIL_TYPE"<>'S' AND "CEMAIL"."VEC_STATUS"<>'G' AND
"CEMAIL"."VEC_STATUS"<>'D' AND "CEMAIL"."VEC_STATUS"<>'P' AND ("CEMAIL"."VEC_STATUS"='N'
OR "CEMAIL"."VEC_STATUS"='O') AND "CEMAIL"."ATTACHMENT_FLAG"='Y')
6 - access("CEMAIL"."PARENT_OID"=:B1)
8 - filter("CEMAIL"."EMAIL_TYPE"<>'S' AND "CEMAIL"."VEC_STATUS"<>'G' AND
"CEMAIL"."VEC_STATUS"<>'D' AND "CEMAIL"."VEC_STATUS"<>'P' AND ("CEMAIL"."VEC_STATUS"='N'
OR "CEMAIL"."VEC_STATUS"='O'))
9 - access("CEMAIL"."PARENT_OID"=:B1)
11 - filter("VEC_STATUS"='N' AND "EMAIL_TYPE"='O')
12 - access("EMAIL_OID"=:B1)
14 - filter("VEC_STATUS"='N' AND "EMAIL_TYPE"='O')
15 - access("PARENT_OID"=:B1)
17 - filter( EXISTS ( (SELECT "PARENT"."EMAIL_OID" FROM "EMAIL" "PARENT","MESSAGE_DATA"
"MD", (SELECT LOWER("CONTACT_INFO") "$nso_col_1" FROM "ESG"."PERSON_CONTACT"
"PC","ESG"."PERSON" "P","ESG"."USER_PROFILE" "UP" WHERE :B1='O' AND
"UP"."USER_OID"=802239 AND "UP"."PERSON_OID"="P"."PERSON_OID" AND
"P"."PERSON_OID"="PC"."PERSON_OID" AND "PC"."CONTACT_TYPE_OID"=6)
"VW_NSO_3" WHERE
"$nso_col_1"=LOWER("MD"."TO_ADDRESS") AND "MD"."MESSAGE_DATA_OID"="PARENT"."MESSAGE_DATA_O
ID" AND "PARENT"."EMAIL_OID"=:B2 AND "PARENT"."PARENT_OID" IS NULL
) UNION ALL (SELECT
"CHILD"."PARENT_OID" FROM "EMAIL" "CHILD","MESSAGE_DATA" "MD", (SELECT DISTINCT
LOWER("CONTACT_INFO") "$nso_col_1" FROM "ESG"."PERSON_CONTACT" "PC","ESG"."PERSON"
"P","ESG"."USER_PROFILE" "UP" WHERE "UP"."USER_OID"=802239 AND
"UP"."PERSON_OID"="P"."PERSON_OID" AND "P"."PERSON_OID"="PC"."PERSON_OID" AND
"PC"."CONTACT_TYPE_OID"=6) "VW_NSO_2" WHERE "MD"."MESSAGE_DATA_OID
"="CHILD"."MESSAGE_DATA_
OID" AND "$nso_col_1"=LOWER("MD"."TO_ADDRESS") AND "CHILD"."PARENT
_OID"=:B3 AND
"CHILD"."VEC_STATUS"<>'G' AND "CHILD"."VEC_STATUS"<>'D' AND "CHILD
"."VEC_STATUS"<>'P' AND
("CHILD"."VEC_STATUS"='N' OR "CHILD"."VEC_STATUS"='O') AND "CHILD"
."EMAIL_TYPE"='O' AND
"PARENT_OID" IS NOT NULL)))
24 - access("PEMAIL"."VEC_STATUS"='N' OR "PEMAIL"."VEC_STATUS"='O')
filter("PEMAIL"."VEC_STATUS"<>'G' AND "PEMAIL"."VEC_STATUS"<>'D' AND
"PEMAIL"."VEC_STATUS"<>'P')
29 - filter("CONFIRMED_FLAG"='Y')
30 - access("REF_SID"='ESG' AND "REF_TID"=(-9000))
filter("REF_TID"=(-9000) AND "REF_SID"='ESG')
31 - filter("EMAIL_OID"="PEMAIL"."EMAIL_OID")
32 - access("EMAIL_REF_OID"="$nso_col_1")
33 - filter(LOWER("MD"."CHANNEL")='[email protected]' OR
LOWER("MD"."CHANNEL")='[email protected]')
34 - access("MD"."MESSAGE_DATA_OID"="PEMAIL"."MESSAGE_DATA_OID")
36 - access("PEMAIL"."EMAIL_FOLDER_OID"="EF"."EMAIL_FOLDER_OID"(+))
38 - access("EF"."EMAIL_ACCOUNT_OID"="EA"."EMAIL_ACCOUNT_OID"(+))
42 - filter("PARENT"."PARENT_OID" IS NULL)
43 - access("PARENT"."EMAIL_OID"=:B1)
45 - access("MD"."MESSAGE_DATA_OID"="PARENT"."MESSAGE_DATA_OID")
46 - filter("$nso_col_1"=LOWER("MD"."TO_ADDRESS"))
47 - filter(:B1='O')
51 - access("UP"."USER_OID"=802239)
52 - access("UP"."PERSON_OID"="P"."PERSON_OID")
53 - filter("PC"."CONTACT_TYPE_OID"=6)
54 - access("P"."PERSON_OID"="PC"."PERSON_OID")
57 - filter("CHILD"."VEC_STATUS"<>'G' AND "CHILD"."VEC_STATUS"<>'D' AND
"CHILD"."VEC_STATUS"<>'P' AND ("CHILD"."VEC_STATUS"='N' OR "CHILD"
."VEC_STATUS"='O') AND
"CHILD"."EMAIL_TYPE"='O')
58 - access("CHILD"."PARENT_OID"=:B1)
filter("PARENT_OID" IS NOT NULL)
65 - access("UP"."USER_OID"=802239)
66 - access("UP"."PERSON_OID"="P"."PERSON_OID")
67 - filter("PC"."CONTACT_TYPE_OID"=6)
68 - access("P"."PERSON_OID"="PC"."PERSON_OID")
69 - filter("$nso_col_1"=LOWER("MD"."TO_ADDRESS"))
70 - access("MD"."MESSAGE_DATA_OID"="CHILD"."MESSAGE_DATA_OID")
Note
- cpu costing is off (consider enabling it)
Statistics
3103 recursive calls
0 db block gets
599654 consistent gets
2915 physical reads
0 redo size
1955 bytes sent via SQL*Net to client
3895 bytes received via SQL*Net from client
2 SQL*Net roundtrips to/from client
331 sorts (memory)
0 sorts (disk)
0 rows processed
=====================================

Similar Messages

CAn Someone Please Help me? Turn this program in a algorithm

DECLARE SUB RentCar ()
DECLARE SUB PayBill ()
DECLARE SUB Main ()
DECLARE SUB ReadCarData ()
DECLARE SUB FindCar ()
TYPE Car ' User made Type To hold Car Data
CarNumber AS INTEGER
License AS STRING * 8
Year AS INTEGER
CarMaker AS STRING * 16
CarName AS STRING * 16
Description AS STRING * 20
ColorOfCar AS STRING * 10
NumberOfDoors AS INTEGER
Price AS DOUBLE
Rented AS INTEGER
Customer AS INTEGER
END TYPE
TYPE Customer ' User made Type to hold Customer data
CustomerNumber AS INTEGER
CustName AS STRING * 50
Bill AS DOUBLE
END TYPE
DIM SHARED Cars(1 TO 26) AS Car ' Global Variables
DIM SHARED p(4) AS Customer
DIM CustName AS STRING * 50
p(0).CustName = "Kevin" ' Assign Customers who need to pay bills
p(0).Bill = 0
p(1).CustName = "Eljah"
p(1).Bill = 100
p(2).CustName = "Jared"
p(2).Bill = 55
p(3).CustName = "Claudwin"
p(3).Bill = 60
p(4).CustName = "Isaac"
p(4).Bill = 1500
CALL ReadCarData ' This reads the data statements into the Cars() array.
WIDTH 80, 50 ' Formats screen and call the main part of the program
CALL Main
' CAR DATA STATEMENTS
' LICENSE YEAR MAKER MODEL DESCRIPTION COLOR DOORS PRICE
DATA "X-5687", 2007, "DODGE", "CALIBER", "FAMILY CAR", "DARK RED", 4, 89.99
DATA "X-9681", 2006, "DODGE", "CHARGER", "SPORT", "GREY", 4, 47.99
DATA "X-9684", 2006, "DODGE", "RAM 2500", "PICKUP", "BLACK", 4, 101.99
DATA "X-9437", 2004, "FORD", "MUSTANG", "SPORT", "RED", 2, 45.99
DATA "X-2562", 2002, "FORD", "TAURUS", "SEDAN", "LIGHT GREY", 4, 67.99
DATA "X-3856", 2003, "FORD", "CONTOUR", "SMALL", "LIGHT BLUE", 2, 45.99
DATA "X-2724", 2001, "FORD", "BRONCO", "JEEP", "BLACK", 4, 63.99
DATA "X-2724", 2001, "FORD", "BRONCO", "JEEP", "DARK GREEN", 4, 63.99
DATA "X-8568", 1998, "FORD", "ESCORT", "COMPACT", "BROWN", 2, 35.99
DATA "X-4724", 2004, "FORD", "PROBE", "SPORT", "BLACK", 2, 58.99
DATA "X-4724", 2004, "FORD", "PROBE", "SPORT", "RED", 2, 58.99
DATA "X-4724", 2004, "FORD", "PROBE", "SPORT", "YELLOW", 2, 58.99
DATA "X-4724", 2003, "FORD", "AEROSTAR", "S.U.V.", "DARK GREEN", 4, 87.99
DATA "X-2727", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "BLACK", 2, 45.99
DATA "X-2327", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "RED", 2, 45.99
DATA "X-2767", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "GREY", 2, 45.99
DATA "X-2723", 1999, "PONTIAC", "GRAND AM", "SPORT CAR", "PURPLE", 2, 45.99
DATA "X-8486", 2005, "PONTIAC", "TRANSPORT", "S.U.V.", "WHITE", 2, 96.99
DATA "X-3261", 2005, "PONTIAC", "AZTEC", "S.U.V.", "YELLOW", 4, 93.99
DATA "X-1864", 2006, "PONTIAC", "TORRENT", "S.U.V.", "RED", 4, 98.99
DATA "X-8521", 2006, "MERCURY", "COUGAR", "SPORT", "BLACK", 2, 69.99
DATA "X-8471", 2006, "LINCOLN", "TOWN CAR", "LUXURY", "BLACK", 4, 149.99
DATA "X-8635", 2001, "LINCOLN", "CONTINENTAL", "LUXURY", "GOLD", 4, 139.99
DATA "X-2643", 2006, "CHEVROLET", "F-150", "PICKUP", "GREY", 2, 95.99
DATA "X-7143", 2006, "CHEVROLET", "CORVETTE", "SPORT", "YELLOW", 2, 131.99
DATA "X-7378", 2006, "CHEVROLET", "MALIBU", "SEDAN", "BLACK", 4, 81.99
SUB FindCar ' This sub goes through the data to search for a car
DIM Counter AS INTEGER 'variables need for sub
DIM TempMaker AS STRING
DIM TempModel AS STRING
DIM TempColor AS STRING
DIM TempCarType AS STRING
DIM TempRangeFrom AS DOUBLE
DIM TempRangeTo AS DOUBLE
DIM TempMax AS DOUBLE
DIM TempMin AS DOUBLE
DIM LeaveFindCar AS INTEGER
DIM MoreCar AS STRING
DIM CanDisplay AS INTEGER
DO WHILE LeaveFindCar = 0 ' Main loop to find type of car
     ' Initialize the variables
Counter = 0
TempMaker = ""
TempModel = ""
TempColor = ""
TempRangeFrom = 0
TempRangeTo = 0
CLS ' Draw the screen with the search fields"
COLOR 15
PRINT "FIND IDEAL CAR: (Enter one or more of these items)"
     PRINT STRING$(80, CHR$(196))
     COLOR 11
     PRINT "Car Builder:"
     PRINT "Car Model:"
     PRINT "Car Color:"
     PRINT "Price Range: From: To:"
     COLOR 10 ' GetsUser can enter any search fields he wants
     LOCATE 3, 19
     INPUT TempMaker
     LOCATE 4, 19
     INPUT TempModel
     LOCATE 5, 19
     INPUT TempColor
     LOCATE 6, 19
     INPUT TempRangeFrom
     LOCATE 6, 36
     INPUT TempRangeTo
     COLOR 15
     PRINT STRING$(80, CHR$(196))
     CanDisplay = 0
     FOR Counter = 1 TO 26 '' This loop does the actual search of the matching cars
     'We compare all string type variables as an
     'uppercase (UCASE$) and Right Trimmed (RTRIM$)
     'to avoid having to compare upper and lower case
     'Values, this makes the condtions here twice
     'as short to perform.
     IF RTRIM$(TempMaker) <> "" THEN
     IF UCASE$(RTRIM$(Cars(Counter).CarMaker)) = UCASE$(RTRIM$(TempMaker)) THEN
     IF RTRIM$(TempModel) <> "" THEN
     IF UCASE$(RTRIM$(Cars(Counter).CarName)) = UCASE$(RTRIM$(TempModel)) THEN
     IF RTRIM$(TempColor) <> "" THEN
     IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
' If Price of car is in between Mininum and Maximum Price
'Allows to display the record.
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
END IF
ELSE
CanDisplay = 0
END IF
ELSE
' The IF is to set Min to the smallest of
' the range vales and TempMax to the biggest.
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
END IF
END IF
ELSE
CanDisplay = 0
END IF
ELSE
IF RTRIM$(TempColor) <> "" THEN
IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
' This IF is to set Min to the smallest of
' the range values and Max to the biggest.
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
END IF
ELSE
CanDisplay = 0
END IF
ELSE
' The IF is to set Min to the smallest of
' the range vales and Max to the biggest.
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
ELSEIF TempRangeFrom = 0 AND TempRangeTo > 0 THEN ' The IF one of the range to be 0
TempMin = TempRangeFrom
TempMax = TempRangeTo
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
ELSEIF TempRangeFrom > 0 AND TempRangeTo = 0 THEN ' This IF one of the range to be 0
TempMin = TempRangeTo
TempMax = TempRangeFrom
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
ELSE
CanDisplay = 1
END IF
END IF
END IF
END IF
ELSE
'Same as previously, all string variables are UCASEd and
'RTRIMmed to shorten the comparison lenghts.
IF RTRIM$(TempModel) <> "" THEN
IF UCASE$(RTRIM$(Cars(Counter).CarName)) = UCASE$(RTRIM$(TempModel)) THEN
IF RTRIM$(TempColor) <> "" THEN
IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
' This IF is to setMin to the smallest of
' the range vales and Max to the biggest
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
END IF
ELSE
CanDisplay = 0
END IF
ELSE
' This IF is to setMin to the smallest of
' the range vales and Max to the biggest
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
END IF
END IF
ELSE
CanDisplay = 0
END IF
ELSE
IF RTRIM$(TempColor) <> "" THEN
IF UCASE$(RTRIM$(Cars(Counter).ColorOfCar)) = UCASE$(RTRIM$(TempColor)) THEN
' This IF is to setMin to the smallest of
' the range vales and Max to the biggest
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
ELSE
CanDisplay = 1
END IF
ELSE
CanDisplay = 0
END IF
ELSE
' This IF is to setMin to the smallest of
' the range vales and Max to the biggest
IF TempRangeFrom > 0 AND TempRangeTo > 0 THEN
IF TempRangeFrom > TempRangeTo THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
ELSE
TempMin = TempRangeFrom
TempMax = TempRangeTo
END IF
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
ELSEIF TempRangeFrom = 0 AND TempRangeTo > 0 THEN
TempMin = TempRangeFrom
TempMax = TempRangeTo
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
ELSEIF TempRangeFrom > 0 AND TempRangeTo = 0 THEN
TempMin = TempRangeTo
TempMax = TempRangeFrom
IF Cars(Counter).Price >= TempMin AND Cars(Counter).Price <= TempMax THEN
CanDisplay = 1
ELSE
CanDisplay = 0
END IF
ELSE
CanDisplay = 1
END IF
END IF
END IF
END IF
IF CanDisplay = 1 THEN ' If car match fields entered it is displayed
          COLOR 11
PRINT Cars(Counter).CarNumber;
PRINT " " + RTRIM$(Cars(Counter).License);
PRINT " - " + RTRIM$(Cars(Counter).CarMaker);
PRINT " " + RTRIM$(Cars(Counter).CarName);
PRINT " " + RTRIM$(Cars(Counter).Description);
PRINT " " + RTRIM$(Cars(Counter).ColorOfCar);
PRINT TAB(60); USING " $###.##"; Cars(Counter).Price
CanDisplay = 0
END IF
NEXT Counter ' displays line after listing cars
COLOR 15
PRINT STRING$(80, CHR$(196))
DO WHILE UCASE$(MoreCar) <> "Y" AND UCASE$(MoreCar) <> "N"
LOCATE CSRLIN, 1 ' This loop ask useers if they want another car search
PRINT "Find Another Car (Y/N)"
INPUT MoreCar
LOOP
IF UCASE$(MoreCar) = "N" THEN ' If user entered "n" the loop is exited
LeaveFindCar = 1
END IF
MoreCar = ""
LOOP
END SUB
SUB Main
' This SUB is the main part of the program. It displays
' the menu and accepts the choices from the user, when the
' user picks a valid value, it executes the proper choice
DO
CLS
COLOR 15
'print the menu on the screen
LOCATE 1, 33
PRINT "RENT CARS PLUS"
LOCATE 2, 1
PRINT STRING$(80, CHR$(196))
COLOR 11
PRINT " 1 - Pay Bill"
PRINT " 2 - Rent Car"
PRINT " 3 - Find Ideal Car"
PRINT " 999 - Exit"
COLOR 15
PRINT STRING$(80, CHR$(196))
INPUT "Choice: ", Choice ' The user enters his/her choice
IF Choice = 999 THEN END
IF Choice <> 999 AND Choice <> 1 AND Choice <> 2 AND Choice <> 3 THEN
PRINT " Error Please Enter Correct Choice! " ' If not valid answer user is asked to enter correct choice
END IF
SELECT CASE Choice ' This Select Case executes the subprograms options
CASE 1
CALL PayBill
CASE 2
CALL RentCar
CASE 3
CALL FindCar
CASE 5
END SELECT
LOOP UNTIL Choice = 999
END SUB
SUB PayBill' This sub does the bill paying process.
' it asks a few question to the user to get the right
' information and be able to pay the given bill.
DIM CustName AS STRING
DIM MoreBill AS INTEGER
DIM Answer AS STRING
DIM Flag AS INTEGER
COLOR 15
MoreBill = 0 ' To start loop variable
DO WHILE MoreBill = 0 ' Loop to start the Bill Paying Process
StartBill:
     ' Displays screen to user
CLS
COLOR 15
PRINT "PAY A BILL"
PRINT STRING$(80, CHR$(196))
INPUT "Customer Name: ", CustName ' user enters customer name
Flag = 0
FOR Q = 0 TO 4 ' Loops to search for customer name in array
IF UCASE$(RTRIM$(p(Q).CustName)) = UCASE$(RTRIM$(CustName)) THEN
Flag = 1
PRINT p(Q).CustName; p(Q).Bill
EXIT FOR
END IF
NEXT Q
'' If customer name invalid error message displayed
IF Flag = 0 THEN
PRINT "Invalid name. Press a key to try again."
DO WHILE INKEY$ <> "": LOOP
GOTO StartBill
END IF
MethodInput:
DO
LOCATE 4, 1     ' Display Payment methods and wait for user to pick one
COLOR 11
PRINT "We only use Visa or American Express. How do you wish to pay?"
PRINT "1 - Visa"
PRINT "2 - American Express"
PRINT "3 - Check"
PRINT "4 - Cash"
INPUT "Select 1, 2, 3, or 4: ", howtopay$ ' User enters way to pay
IF howtopay$ = "1" OR howtopay$ = "2" THEN ' CArd number asked for If american or visa
INPUT "Enter account number: ", cardnum$
ELSEIF howtopay$ <> "3" AND howtopay$ <> "4" THEN
PRINT "You must select method of payment."
END IF
LOOP WHILE howtopay$ < "1" OR howtopay$ > "4"
PaymentInput:
'' users enters payment amount
INPUT "Payment Amount (0 to cancel the transaction): ", PayAmount
IF PayAmount <> 0 THEN
IF PayAmount > p(Q).Bill THEN
'' If payment bigger than amount owed message displayed
PRINT "Payment is bigger than amount due. Press key to enter payment."
DO WHILE INKEY$ = "": LOOP
GOTO PaymentInput
ELSE
' If amount valid , payment subtracted from amount owed
p(Q).Bill = p(Q).Bill - PayAmount
PRINT "New balance is "; USING "$#####.##"; p(Q).Bill
END IF
END IF
     '' Loop ask if user wishes to pay another bill
DO WHILE UCASE$(RTRIM$(Answer)) <> "Y" AND UCASE$(RTRIM$(Answer)) <> "N"
COLOR 15
LOCATE 48, 1
PRINT "Pay Another Bill (Y/N) ";
INPUT Answer
LOOP
IF UCASE$(RTRIM$(Answer)) = "N" THEN ' If answer is "N" then loop exited
MoreBill = 1
END IF
LOOP
END SUB
SUB ReadCarData
' This sub reads all data from the DATA statements
' And puts them in the Cars array
DIM Counter AS INTEGER
FOR Counter = 1 TO 26
Cars(Counter).CarNumber = Counter
READ Cars(Counter).License
READ Cars(Counter).Year
READ Cars(Counter).CarMaker
READ Cars(Counter).CarName
READ Cars(Counter).Description
READ Cars(Counter).ColorOfCar
READ Cars(Counter).NumberOfDoors
READ Cars(Counter).Price
NEXT Counter
END SUB
SUB RentCar
' This sub does the renting of a car
' to a customer. This ask several questions
' in order to get the right customer and the right
' car to rent then it rents it.
DIM MoreRent AS INTEGER
DIM TempCustomer AS INTEGER
DIM TempBill AS DOUBLE
DIM Answer AS STRING
DIM TempPrice AS DOUBLE
DIM TempInsurance AS DOUBLE
DIM CustName AS STRING
DIM Number AS STRING
DIM CarNumber AS INTEGER
DIM Days AS INTEGER
DIM Q AS INTEGER
MoreRent = 0 ' Loop for rental process
DO WHILE MoreRent = 0
InputName:
CLS ' Display screen to user
COLOR 15
PRINT "RENT A CAR"
PRINT STRING$(80, CHR$(196))
COLOR 11
LOCATE 3, 1
INPUT " Full Name: ", CustName ' user enters his name
IF RTRIM$(CustName) = "" THEN
PRINT "You Must Enter Your Name. Press a key to retry." ' User is told he must enter a name
DO WHILE INKEY$ = "": LOOP
GOTO InputName
ELSE
FOR Q = 0 TO 4
IF UCASE$(RTRIM$(p(Q).CustName)) = UCASE$(RTRIM$(CustName)) THEN
Flag = 1
PRINT p(Q).CustName; p(Q).Bill
TempCustomer = Q
EXIT FOR
END IF
NEXT Q
END IF
InputNumber:
LOCATE 5, 1
INPUT " Phone Number: ", Number ' User enters phone number
IF RTRIM$(Number) = "" THEN
PRINT "You Must a phone number. Press a key to retry." ' User is warned he must enter a number
DO WHILE INKEY$ = "": LOOP
GOTO InputNumber
END IF
CarInput:
LOCATE 7, 2
COLOR 11
INPUT "Car Number: ", CarNumber
' This awaits a car number from the user.
IF CarNumber < 1 AND CarNumber > 26 THEN ' If the car number is out of range, we warn and start again
PRINT "Car Number must be between 1 and 26. Press a key to retry."
DO WHILE INKEY$ = "": LOOP
GOTO CarInput
ELSE
' No need to search, we just display the car information
COLOR 14
PRINT RTRIM$(Cars(CarNumber).License) + " - ";
PRINT Cars(CarNumber).Year;
PRINT RTRIM$(Cars(CarNumber).CarMaker) + " " + RTRIM$(Cars(CarNumber).CarName) + " ";
PRINT RTRIM$(Cars(CarNumber).ColorOfCar)
PRINT "PRICE: "; USING "$####.##"; Cars(CarNumber).Price
END IF
DaysInput:
LOCATE 10, 1
COLOR 11
INPUT " Number of Days to rent: ", Days
' This awaits for a number of days to rent the car for.
IF Days < 1 AND Days > 31 THEN
PRINT "Days are 1 to 31. Press a key to retry."
' Can't have less than 1 day or more than a month or we warn.
DO WHILE INKEY$ = "": LOOP
GOTO DaysInput
END IF
TempPrice = Days * Cars(CarNumber).Price
' Calculate the Price of the rental
InsuranceInput:
LOCATE 13, 1
COLOR 11
DO WHILE UCASE$(RTRIM$(Answer)) <> "Y" AND UCASE$(RTRIM$(Answer)) <> "N"
COLOR 11
LOCATE 13, 1
PRINT "Add Insurance (Y/N)";
' the customer has the option to purchase insurance here.
INPUT Answer
LOOP
IF UCASE$(Answer) = "Y" THEN
COLOR 11
DO WHILE UCASE$(RTRIM$(Answer)) <> "F" AND UCASE$(RTRIM$(Answer)) <> "D"
'we loop until the users enters y or n
COLOR 11
LOCATE 14, 1
PRINT "(F)ixed Or (D)aily Amount";
' If the user selected yes, we ask for fixed or daily insurance amount.
INPUT Answer
LOOP
' if Fixed amount was picked we ask for that amount
IF UCASE$(RTRIM$(Answer)) = "F" THEN
INPUT "Fixed Insurance: ", TempInsurance
ELSE
TempInsurance = 15 * Days ' If Daily was picked we multiply 15 by the number of days rented
END IF
END IF
DO     ' this loop asks for a payment method.
LOCATE 17, 1
PRINT "We only use Visa or American Express. How do you wish to pay?"
PRINT "1 - Visa"
PRINT "2 - American Express"
PRINT "3 - Check"
PRINT "4 - Cash"
INPUT "Select 1, 2, 3, or 4: ", howtopay$
IF howtopay$ = "1" OR howtopay$ = "2" THEN
INPUT "Enter account number: ", cardnum$
ELSEIF howtopay$ <> "3" AND howtopay$ <> "4" THEN
PRINT "You must select method of payment."
END IF
LOOP WHILE howtopay$ < "1" OR howtopay$ > "4"
COLOR 14
PRINT
' This part displays some totals to the user.
PRINT "Rental Price = "; USING "$##,###.##"; TempPrice
PRINT "Insurance Amount = "; USING "$##,###.##"; TempInsurance
PRINT "Total Price = "; USING "$##,###.##"; TempPrice + TempInsurance
PRINT " ----------"
TempBill = p(TempCustomer).Bill
TempBill = TempBill + (TempPrice + TempInsurance)
p(TempCustomer).Bill = TempBill
PRINT "New Balance = "; USING "$##,###.##"; TempBill
PRINT " =========="
Answer = ""
' This loop asks if the user wants to rent another car.
DO WHILE UCASE$(RTRIM$(Answer)) <> "Y" AND UCASE$(RTRIM$(Answer)) <> "N"
COLOR 15
LOCATE 48, 1
PRINT "Rent Another Car (Y/N) ";
INPUT Answer
LOOP
IF UCASE$(RTRIM$(Answer)) = "N" THEN
' If user selected N, we assign value to exit the loop
MoreRent = 1
END IF
LOOP
END SUB
Im really good at programming but really suck at algorithms can someone please please write in a algorithm form for me , i need it by friday i would greatly be thankful for u

Im really good at programming but really suck at algorithms
>If your are 'really good' at programming, you will be able to solve this problem. Because, it has nothing to do with algorithm.
>>can someone please please write in a algorithm form for me , i need it by friday i would greatly be thankful for u
>Wrong person, in the wrong place.

Can someone please suggest some good projects for learning about usrp and labview for beginners???

Can some1 please me suggest some good things to work out on USRP using labview..

https://decibel.ni.com/content/groups/ni-usrp-example-labview-vis?view=documents
Omar

No Luck in Solving this - Can someone PLEASE suggest something!

Ive had this problem for a while now and thus far, no-one has been able to suggest a fix for it.
I had podcasts loaded to my me.com site and they worked perfectly, now for some reason they wont download into iTunes - it gives a variety of error messages.
I've changed absolutely nothing about it, so i cant understand why it no longer works.

no-one has been able to suggest a fix for it.
I suggested a fix in [a previous post|http://discussions.apple.com/message.jspa?messageID=8061407&tstart=0].
I've changed absolutely nothing about it, so i cant understand why it no longer works.
No you didn't . The link to your rss feed on your page is still wrong.
And the links IN the rss feed are wrong too.
DON'T use your domainname.

Can someone please have the answer to this question!!!?!?!?

i had my ipod for 2 years and its a 2nd generation and i was useing my old computer for itunes..but then i got a new laptop so i downloaded itunes again.i bought songs from itunes for my ipod...and i connected up to my laptop and everything was working but i notices that none of the new songs were on my ipod.i really need help on this question,idk if its the old email address i used or its the laptop itself.but i really hope that someone can help!

See your other post.
http://discussions.apple.com/messageview.jspa?messageID=9394213&stqc=true
(and if you work for apple.com why can't you ask someone at Apple yourself )

Can someone please help!!! this is really buggin me!!

i dont know if any of you can help, but my iPod nano doesnt want to add anymore songs on there. i only have about 143 and ever since about a month ago iTunes started acting strange. i tried everything. i re-installed iTunes a countless number of times. i re-installed the iPod program countless number of times. i tried installing it on multiple computers. today i just updated my iPod and still it does not work!! does anyone have this similar problem or know what i can do?? its driving me insane!!!

Have you simply tried Restoring the iPod?
5Rs
5Rs Tutorials
Restoring iPod to Factory Settings
I hope this helps!

Can someone please take a look at this Unix question?

https://discussions.apple.com/thread/3600775?tstart=0

That thread has been noticed before. It all started with a bad suggestion that no one noticed and corrected. Then the post got slightly scrambled in the new forums. Finally, the original poster added some special root powers and a mess ensued.

Hi can some one please help my screen size has changed its self and is now larger than the screen can someone please let me know if this is a bug? if so how do i fix this? or am i just a nonce? if so how do i resolve this thanks in advance.

sorry Q is in the tittle having big issues with my screen so its hard to use

Apple menu -> System Preferences -> Displays
Apple menu -> System Preferences -> Universal Access
are both places where screen size may change inadvertantly. Use higher resolutions, but lower screen zoom.

Can someone please help me with a sub query question?

I need to list a 3rd party contract and then a list of students who belong to that contract.
On the students segment of the listing I need to show students with student id, name, total credit hours,
total amount spent on tuition, total amount spent on books and total amount spent on misc.
This code has a query for the contract information and I get that just fine.
Then it has a query that gives me total credit hours and that works fine
then it has a query that gives me total amount spent on tuition and that works fine
but
when I add the next query to get total amount spent on books I get only the information for the contract, I don't get student stuff anymore.
I would really appreciate any guidance that you could give.
Thanks in advance, Bob Hohulski
DECLARE
l_conn utl_TCP.connection;
v_filehandle utl_file.file_type;
v_output varchar2(1000);
v_contract_id varchar2(9);
v_contract_addr1 varchar2(30);
v_contract_addr2 varchar2(30);
v_contract_city varchar2(20);
v_contract_stat varchar2(03);
v_contract_zip varchar2(10);
v_contract_name varchar2(60);
v_student_id varchar2(09);
v_student_first_name varchar2(15);
v_student_mid_name varchar2(15);
v_student_last_name varchar2(60);
v_last_out varchar2(20);
v_student_detail_code varchar2(04);
v_student_amount number(12,2);
v_student_ref_number varchar2(09);
v_credit_hrs number(7,2);
v_tuition_amount number(12,2);
v_books_amount number(12,2);
v_misc_amount number(12,2);
v_total_for_student number(12,2);
v_current_student varchar2(09);
v_sftregs_pidm varchar2(09);
v_tbraccd_pidm varchar2(09);
CURSOR c_sel_contract IS
SELECT DISTINCT spriden_id, spriden_last_name,
spraddr_street_line1, spraddr_street_line2,
spraddr_city, spraddr_stat_code, spraddr_zip
FROM spriden, spraddr
-- WHERE spriden_id = '&Enter_Id'
where spriden_id = 'T10474666'
AND spriden_pidm = spraddr_pidm
AND SPRIDEN_CHANGE_IND IS NULL;
CURSOR c_sel_student IS
SELECT DISTINCT spriden_id, spriden_first_name, spriden_mi, spriden_last_name,
sftregs_credit_hr,
tbraccd_amount,
sftregs_pidm,
tbraccd_pidm
FROM spriden, tbraccd, tbbcstu, sftregs
WHERE 559220 = tbbcstu_contract_pidm
AND spriden_pidm = tbraccd_pidm
AND spriden_pidm = tbbcstu_stu_pidm
AND spriden_pidm = sftregs_pidm
AND (sftregs_pidm, sftregs_credit_hr) IN
(SELECT DISTINCT sftregs_pidm, SUM(sftregs_credit_hr)
FROM sftregs, tbbcstu, spriden
WHERE sftregs_term_code = '201010'
AND sftregs_pidm = tbbcstu_stu_pidm
AND sftregs_pidm = spriden_pidm
GROUP BY sftregs_pidm)
AND (tbraccd_pidm, tbraccd_amount) IN
(SELECT DISTINCT tbraccd_pidm, SUM(tbraccd_amount)
-- tuition
FROM tbraccd, tbbcstu, spriden
WHERE tbraccd_term_code = '201010'
AND (tbraccd_detail_code = 'TU01' OR
tbraccd_detail_code = 'TU02' OR
tbraccd_detail_code = 'TU03' OR
tbraccd_detail_code = 'TU04')
AND tbraccd_pidm = tbbcstu_stu_pidm
AND tbraccd_pidm = spriden_pidm
GROUP BY tbraccd_pidm)
--this code works up to this point
--when I add the next query I get nothing
AND (tbraccd_pidm, tbraccd_amount) IN
(SELECT tbraccd_pidm, SUM(tbraccd_amount)
books
FROM tbraccd, tbbcstu
WHERE tbraccd_term_code = '201010'
AND (tbraccd_detail_code = 'BKSU' OR
tbraccd_detail_code = 'BKCH')
AND tbraccd_pidm = tbbcstu_stu_pidm
GROUP BY tbraccd_pidm, tbraccd_amount)
--AND (tbraccd_pidm, tbraccd_amount) IN
-- (SELECT tbraccd_pidm, SUM(tbraccd_amount)
-- misc
-- FROM tbraccd, tbbcstu
-- WHERE tbraccd_term_code = '201010'
-- AND tbraccd_pidm = tbbcstu_stu_pidm
-- AND (tbraccd_detail_code = 'AUNA' OR
-- tbraccd_detail_code = 'OTPB')
-- GROUP BY tbraccd_pidm, tbraccd_amount)
--ORDER BY tbraccd_pidm, spriden_first_name, spriden_mi, spriden_last_name,
-- tbbcstu_sponsor_ref_number, sftregs_credit_hr;
ORDER BY tbraccd_pidm;
BEGIN
v_filehandle := utl_file.fopen(location => 'UTLFILE_MISAP9',
filename => 'ban_matrix.dat',
open_mode => 'w',
max_linesize => 32767);
OPEN c_sel_contract;
LOOP
DBMS_OUTPUT.PUT_LINE('looping');
FETCH c_sel_contract INTO v_contract_id, v_contract_name,
v_contract_addr1, v_contract_addr2,
v_contract_city, v_contract_stat,
v_contract_zip;
EXIT WHEN c_sel_contract%NOTFOUND;
v_output :=
nvl(rpad(v_contract_id,9),rpad(' ',9)) ||
' ' ||
nvl(rpad(v_contract_name,60),rpad(' ',60));
utl_file.put_line(v_filehandle,v_output);
v_output :=
nvl(rpad(v_contract_addr1, 30),rpad(' ',30)) ||
' ' ||
nvl(rpad(v_contract_addr2, 30),rpad(' ',30));
utl_file.put_line(v_filehandle,v_output);
v_output :=
nvl(rpad(v_contract_city, 20), rpad(' ',20)) ||
' ' ||
nvl(rpad(v_contract_stat, 3), rpad(' ',3)) ||
' ' ||
nvl(rpad(v_contract_zip, 10), rpad(' ',10));
utl_file.put_line(v_filehandle,v_output);
utl_file.new_line(v_filehandle);
OPEN c_sel_student;
LOOP
FETCH c_sel_student into v_student_id, v_student_first_name, v_student_mid_name,
v_student_last_name,
v_credit_hrs,
v_tuition_amount,
v_sftregs_pidm,
v_tbraccd_pidm;
-- v_books_amount, v_misc_amount;
EXIT WHEN c_sel_student%NOTFOUND;
v_last_out := substr(v_student_last_name, 1, 20);
v_output :=
nvl(rpad(v_student_id, 09),rpad(' ',09)) ||
' ' ||
nvl(rpad(v_student_first_name, 15),rpad(' ',15)) ||
nvl(rpad(v_student_mid_name, 15),rpad(' ',15)) ||
nvl(rpad(v_last_out, 20),rpad(' ',20)) ||
' ' ||
nvl(rpad(v_student_ref_number, 09),rpad(' ',09)) ||
' ' ||
v_credit_hrs ||
' ' ||
v_tuition_amount ||
-- v_books_amount ||
-- ' ' ||
-- v_misc_amount;
utl_file.put_line(v_filehandle,v_output);
END LOOP;
END LOOP;
--EXCEPTION
--WHEN OTHERS THEN
-- DECLARE
-- err_msg VARCHAR2(100);
-- BEGIN
-- err_msg := 'ERR- '||SUBSTR(SQLERRM, 1,100);
-- - utl_file.put_line(v_filehandle,err_msg);
--END;
utl_file.fclose(v_filehandle);
CLOSE c_sel_contract;
CLOSE c_sel_student;
--END AR_MATRIX_PROC;
END;

run this original query
SELECT DISTINCT spriden_id,
        spriden_first_name,
        spriden_mi,
        spriden_last_name,
        sftregs_credit_hr,
        tbraccd_amount,
        sftregs_pidm,
        tbraccd_pidm
   FROM spriden, tbraccd, tbbcstu, sftregs
WHERE 559220 = tbbcstu_contract_pidm
   AND spriden_pidm = tbraccd_pidm
   AND spriden_pidm = tbbcstu_stu_pidm
   AND spriden_pidm = sftregs_pidm
   AND (sftregs_pidm, sftregs_credit_hr) IN (SELECT DISTINCT sftregs_pidm, SUM(sftregs_credit_hr)
                                               FROM sftregs, tbbcstu, spriden
                                              WHERE sftregs_term_code = '201010'
                                                AND sftregs_pidm = tbbcstu_stu_pidm
                                                AND sftregs_pidm = spriden_pidm
                                             GROUP BY sftregs_pidm)
   AND (tbraccd_pidm, tbraccd_amount) IN (SELECT DISTINCT tbraccd_pidm, SUM(tbraccd_amount)
                                          -- tuition
                                            FROM tbraccd, tbbcstu, spriden
                                           WHERE tbraccd_term_code = '201010'
                                             AND (tbraccd_detail_code = 'TU01' OR
                                                  tbraccd_detail_code = 'TU02' OR
                                                  tbraccd_detail_code = 'TU03' OR
                                                  tbraccd_detail_code = 'TU04')
                                             AND tbraccd_pidm = tbbcstu_stu_pidm
                                             AND tbraccd_pidm = spriden_pidm
                                           GROUP BY tbraccd_pidm)
   AND (tbraccd_pidm, tbraccd_amount) IN (SELECT tbraccd_pidm, SUM(tbraccd_amount) books
                                            FROM tbraccd, tbbcstu
                                           WHERE tbraccd_term_code = '201010'
                                             AND (tbraccd_detail_code = 'BKSU' OR
                                                  tbraccd_detail_code = 'BKCH')
                                             AND tbraccd_pidm = tbbcstu_stu_pidm
                                          GROUP BY tbraccd_pidm, tbraccd_amount)
ORDER BY tbraccd_pidm;then run this sub-query:
SELECT tbraccd_pidm, SUM(tbraccd_amount) books
   FROM tbraccd, tbbcstu
WHERE tbraccd_term_code = '201010'
    AND (tbraccd_detail_code = 'BKSU' OR
         tbraccd_detail_code = 'BKCH')
   AND tbraccd_pidm = tbbcstu_stu_pidm
GROUP BY tbraccd_pidm, tbraccd_amount)see if you have a matching tbraccd_pidm and tbraccd_amount between the two results.

Tuning this query

Hi,
Can anybody please help me in tuning this query?
update tablec c set c.col1 = (select b.col1 from tableb b where c.col2 = b.col2 ) where
c.col2 in (select distinct a.col1 from tablec a, tableb b where a.col2 = b.col2 and a.col1 != b.col1 )
When i use "alter session force parallel DML" before running this query it takes only seconds, but when i use parallel hint or run it without hint, its running for hours.
Thanks for your Help

Hi itssan,
You could try EXISTS.
I think this is the same:
update tablec c
   set c.col1 =
          (select b.col1
             from tableb b
            where b.col2 = c.col2)
where exists (select null
                 from tablec a, tableb b
                where a.col2 = b.col2
                  and a.col1 != b.col1
                  and a.col1 = c.col2);Regards
Peter

After downloading ios 7.2 my iPad mini seems to have a mind of its own. I'm not sure what to do to fix this problem. Can someone please help me.

I updated my iPad mini to ios 7.0.2 couple days ago. Everything was fine until yesterday. I noticed that it seemed to have a mind of its own. It kept opening and closing app. I'm not sure what to don to fix this problem. I've tried restoring my iPad mini but that didn't help. Can someone please help me?

Try This...
Close All Open Apps... Sign Out of your Account... Perform a Reset... Try again...
Reset ( No Data will be Lost )
Press and Hold the Sleep/Wake Button and the Home Button at the Same Time...
Wait for the Apple logo to Appear...
Usually takes about 15 - 20 Seconds... ( But can take Longer...)
Release the Buttons...
If no joy...
Reset all settings
Settings > General > Reset > Reset all Settings.
This will return all iDevice settings to factory defaults... you will not lose any data.... But you will have to re-enter all of the device settings.
If the issue persists...
Connect to iTunes on the computer you usually Sync with and Restore
http://support.apple.com/kb/HT1414
Make sure you have the Latest Version of iTunes (v11) Installed on your computer
iTunes free download from www.itunes.com/download

My Iphone 5 has gone blank, I can not see anything. Restore with itunes has not worked either. Can someone please help?

Hi I recently upgraed to iOS 6.1 on my Iphone 5. After the upgrade, it was all good. Over the weekend I went Austria for Ski. While taking the photos, I simply locked the phone and kept it my pocket as I had to go. After sometime when I opened my phone, I could hardly see anything. I tried to unlock with pin and tried restarting with great difficulty. But nothing worked. Coming back home today, I have tried restore the software and still no luck. I have tried restore almost 5 to 6 times, but the screen is still blank. I dont know if what state it is in and I can not do anything to fix it. I am very annoyed with the support service as they can not be reached on Sunday evening.
I could manage to book a call tomorrow but I have lot of work over next few days at work. Can someone please help how to fix this issue now? Any suggestions will be much apperciated.
Thanks,
Srini

srinifromlondon wrote:
... Any suggestions will be much apperciated...
Try this Discussion
https://discussions.apple.com/message/19521062

I have deleted my sons apple id and data from his old phone by accident as i thought i was resetting it for me to use and now he has lost everything on his new phone and his id etc does not work. Can someone please explain how i am able to retrieve

Can someone please shed some light on this???
I thought i was resetting my son's iphone 4 so that I could use it. But I seem to have erased his icloud/apple id and all of his data from his new phone too. His Apple ID doesnt work and cant be accessed as it now says it is disabled. I have tried the iforgot.apple.com website without success and have no idea how to rectify. I have requested a password change to his email address but that is not working either.
Please help?

That sounds confusing. First off, don't be too worried. There's practically no way to actually delete an Apple ID or it's purchase history. You should be able to get to it back somehow. Secondly, that's likely something that you'll need to talk to a real person on the phone for since it likely requires you to explain that you need access on behalf of your son, (who probably just set some security questions or an email address that you didn't know he put in.) Just call the appropriate AppleCare phone line (800-APL-CARE in the USA, or see the link below for other countries) and tell them you want to talk about an iCloud account security question.
Phone Support: Contact Apple for support and service - Apple Support

Please can you help me in Tuning this query..?

Hi ,
Please can you help me in re-structuring this query? .Details are given below.
I have 2 tables as shown below and data is like this.
Position
COD IND
AAA N
BBB N
CCC N
DDD Y
Distance
orig dest
AAA BBB
BBB CCC
AAA CCC
I need to create the records like this
start end
DDD AAA
DDD BBB
DDD CCC
The query which i am using now for this is
select p.code AS start,
P1.CODE AS end
from position p, position p1
where
P.CODE != P1.CODE
AND (P.ind = 'Y' or P1.IND = 'Y')
AND not exists
(select 1
from distance d
where (d.orig = p.code or d.dest = p.code)
and (d.orig = p1.code or d.dest = p1.code))
table is having above a crore record. so its taking a lot of time.
Please someone please help in tuning this query?
Thanks and regards,
Shabir

Looks like you want this
select a.strt, b.ends from
(select p.code strt from position p where p.ind='Y') a,
(select p.code ends from position p where p.ind='N') b
where not exists (select 1 from distance d where d.orig=a.strt or d.dest=a.strt);
DDD     AAA
DDD     BBB
DDD     CCCYour query result is:
AAA     DDD
BBB     DDD
CCC     DDD
DDD     AAA
DDD     BBB
DDD     CCCYou should be more descriptive about what kind of result you want, so that people can get more interested in helping you.

Can someone please Interpret this EtreCheck for me? Macbook Pro Boot Time Really Slow.

Can someone please give me detailed instruction on what to do no next. I've read several forum discussion on this subject and seen various examples. i would like help with mine. Reason being is because my MBP boot up time is almost around 2-3mins long sometimes it can even be upto 5mins. reason i ask is because i know this is not normal. compared to my macbook (mid-2010) this is REALLY slow. And all the specs of my MBP should in theory make my MB a thing of the past. (Why i bought the MBP in the first place). i've done PRAM reset and booted in Safe Mode. i've removed several applications using the correct uninstalls where required.
i have ran a terminal commands to clear the kernal caches and got these results (not sure if it will help). And neither have made a difference.
Password:
macs-imac:~ SantiagoXG$ sudo kextcache -system-prelinked-kernel
kext com.paceap.kext.pacesupport.snowleopard 507029000 is in exception list, allowing to load
kext com.jmicron.JMicronATA 101069000 is in exception list, allowing to load
kext com.ATTO.driver.ATTOExpressSASRAID 307029000 is in exception list, allowing to load
kext com.ATTO.driver.ATTOExpressSASHBA3 100059000 is in exception list, allowing to load
kext com.ATTO.driver.ATTOExpressSASHBA 200009000 is in exception list, allowing to load
kext com.ATTO.driver.ATTOExpressPCIUl4 404029000 is in exception list, allowing to load
kext com.ATTO.driver.ATTOCelerityFC 304089000 is in exception list, allowing to load
kext com.Accusys.driver.Acxxx 300029000 is in exception list, allowing to load
macs-imac:~ SantiagoXG$ sudo kextcache -system-caches
Password:
macs-imac:~ SantiagoXG$
Below is the EtreCheck:
Hardware Information:
          MacBook Pro (Retina, 15-inch, Early 2013)
          MacBook Pro - model: MacBookPro10,1
          1 2.7 GHz Intel Core i7 CPU: 4 cores
          16 GB RAM
Video Information:
          Intel HD Graphics 4000 - VRAM: 1024 MB
          NVIDIA GeForce GT 650M - VRAM: 1024 MB
System Software:
          OS X 10.9.1 (13B42) - Uptime: 0 days 0:13:15
Disk Information:
          APPLE SSD SD256E disk0 : (251 GB)
                    EFI (disk0s1) <not mounted>: 209.7 MB
                    Macintosh HD (disk0s2) / [Startup]: 250.01 GB (135.34 GB free)
                    Recovery HD (disk0s3) <not mounted>: 650 MB
USB Information:
          Apple Inc. FaceTime HD Camera (Built-in)
          Apple Inc. Apple Internal Keyboard / Trackpad
          Apple Inc. BRCM20702 Hub
                    Apple Inc. Bluetooth USB Host Controller
FireWire Information:
Thunderbolt Information:
          Apple Inc. thunderbolt_bus
Configuration files:
          /etc/hosts - Count: 44
Kernel Extensions:
          com.paceap.kext.pacesupport.snowleopard          (5.7.2)
Launch Daemons:
          [System] com.adobe.fpsaud.plist 3rd-Party support link
          [System] com.adobe.SwitchBoard.plist 3rd-Party support link
          [System] com.google.keystone.daemon.plist 3rd-Party support link
          [System] com.maintain.AutoLoginUserScreenLocked.plist 3rd-Party support link
          [System] com.maintain.CocktailScheduler.plist 3rd-Party support link
          [System] com.oracle.java.Helper-Tool.plist 3rd-Party support link
          [System] com.soma-zone.LaunchControl.Helper.plist 3rd-Party support link
          [System] PACESupport.plist 3rd-Party support link
Launch Agents:
          [System] com.google.keystone.agent.plist 3rd-Party support link
          [System] com.maintain.LogOut.plist 3rd-Party support link
          [System] com.maintain.Restart.plist 3rd-Party support link
          [System] com.maintain.ShutDown.plist 3rd-Party support link
          [System] com.maintain.Sleep.plist 3rd-Party support link
          [System] com.maintain.SystemEvents.plist 3rd-Party support link
          [System] com.oracle.java.Java-Updater.plist 3rd-Party support link
User Launch Agents:
          [not loaded] com.adobe.ARM.[...].plist 3rd-Party support link
          [not loaded] com.facebook.videochat.[redacted].plist 3rd-Party support link
          [not loaded] com.nero.HSMMonitor.plist 3rd-Party support link
User Login Items:
          WDDriveUtilityHelper
          WDSecurityHelper
Internet Plug-ins:
          DirectorShockwave: Version: 11.5.8r612 3rd-Party support link
          Google Earth Web Plug-in: Version: 7.1 3rd-Party support link
          Default Browser: Version: 537 - SDK 10.9
          AdobeExManDetect: Version: AdobeExManDetect 1.1.0.0 - SDK 10.7 3rd-Party support link
          Flip4Mac WMV Plugin: Version: 2.3.5.4 3rd-Party support link
          OfficeLiveBrowserPlugin: Version: 12.3.6 3rd-Party support link
          AdobePDFViewerNPAPI: Version: 10.1.9 3rd-Party support link
          FlashPlayer-10.6: Version: 12.0.0.70 - SDK 10.6 3rd-Party support link
          DivX Web Player: Version: 3.1.0.13 - SDK 10.5 3rd-Party support link
          OVSHelper: Version: 1.1 3rd-Party support link
          Flash Player: Version: 12.0.0.70 - SDK 10.6 3rd-Party support link
          iPhotoPhotocast: Version: 7.0 - SDK 10.8
          QuickTime Plugin: Version: 7.7.3
          RealPlayer Plugin: Version: (null) 3rd-Party support link
          AdobePDFViewer: Version: 10.1.9 3rd-Party support link
          Silverlight: Version: 5.1.20913.0 - SDK 10.6 3rd-Party support link
          JavaAppletPlugin: Version: Java 7 Update 51 3rd-Party support link
Safari Extensions:
          Slick Savings: Version: 1.0
          Searchme: Version: 1.2
          Ebay Shopping Assistant: Version: 1.1
          Amazon Shopping Assistant: Version: 1.1
Audio Plug-ins:
          BluetoothAudioPlugIn: Version: 1.0 - SDK 10.9
          AirPlay: Version: 1.9 - SDK 10.9
          AppleAVBAudio: Version: 2.0.0 - SDK 10.9
          iSightAudio: Version: 7.7.3 - SDK 10.9
iTunes Plug-ins:
          Quartz Composer Visualizer: Version: 1.4 - SDK 10.9
3rd Party Preference Panes:
          Flash Player 3rd-Party support link
          Flip4Mac WMV 3rd-Party support link
          FUSE for OS X (OSXFUSE) 3rd-Party support link
          Java 3rd-Party support link
          M-AudioFastTrack 3rd-Party support link
          MacFUSE 3rd-Party support link
          NTFS-3G 3rd-Party support link
          Perian 3rd-Party support link
          Tuxera NTFS 3rd-Party support link
Old Applications:
          SLLauncher:          Version: 1.0 - SDK 10.5 3rd-Party support link
                    /Library/Application Support/Microsoft/Silverlight/OutOfBrowser/SLLauncher.app
          /Library/Application Support/DivX
                    DivXUpdate:          Version: 1.0 - SDK 10.5 3rd-Party support link
                    DivXMediaServer:          Version: 10.1 - SDK 10.5 3rd-Party support link
                    DivXTransferWizard:          Version: 10.1.0 (Build 10.1.0.102) - SDK 10.5 3rd-Party support link
                    DMSLaunch:          Version: 1.0 - SDK 10.5 3rd-Party support link
          Wondershare Helper Compact:          Version: 2.2.6.0 - SDK 10.5 3rd-Party support link
                    /Applications/Wondershare Helper compact/Wondershare Helper Compact.app
          SA Color Finesse 3 UI:          Version: 3.0.6(275) - SDK 10.5 3rd-Party support link
                    /Applications/Adobe After Effects CS6/Plug-ins/Effects/Synthetic Aperture/(CF3 Support)/SA Color Finesse 3 UI.app
          dynamiclinkmanager:          Version: 6.0.0 - SDK 10.5 3rd-Party support link
                    /Library/Application Support/Adobe/Common/dynamiclink/CS6/dynamiclinkmanager.app
          Microsoft AutoUpdate:          Version: 2.3.6 - SDK 10.4 3rd-Party support link
                    /Library/Application Support/Microsoft/MAU2.0/Microsoft AutoUpdate.app
          dynamiclinkmediaserver:          Version: 6.0.1 - SDK 10.5 3rd-Party support link
                    /Library/Application Support/Adobe/Common/dynamiclinkmediaserver/1.0/dynamiclinkmediaserver.app
          DivX Player:          Version: 10.1.0 (Build 11.3.0.40) - SDK 10.5 3rd-Party support link
          DeTune:          Version: 1.0.6 - SDK 10.5 3rd-Party support link
          DivX Converter:          Version: 10.1.0 (Build 10.1.0.166) - SDK 10.5 3rd-Party support link
Time Machine:
          Mobile backups: OFF
          Auto backup: NO - Auto backup turned off
          Volumes being backed up:
          Destinations:
                    SantiagoXG [Local] (Last used)
                    Total size: 0 B
                    Total number of backups: (null)
                    Size of backup disk: Excellent
                              Backup size 0 B > (Disk size 0 B X 3)
          Time Machine details may not be accurate.
          All volumes being backed up may not be listed.
Top Processes by CPU:
               3%          WindowServer
               2%          EtreCheck
               0%          WDDriveUtilityHelper
               0%          configd
               0%          imagent
Top Processes by Memory:
          213 MB          Dock
          147 MB          mds_stores
          147 MB          Google Chrome
          147 MB          com.apple.IconServicesAgent
          131 MB          Google Chrome Helper
Virtual Memory Information:
          11.91 GB          Free RAM
          2.40 GB          Active RAM
          385 MB          Inactive RAM
          1.31 GB          Wired RAM
          405 MB          Page-ins
          0 B          Page-outs

If you have more than one user account, these instructions must be carried out as an administrator.
Launch the Console application in any of the following ways:
☞ Enter the first few letters of its name into a Spotlight search. Select it in the results (it should be at the top.)
☞ In the Finder, select Go ▹ Utilities from the menu bar, or press the key combination shift-command-U. The application is in the folder that opens.
☞ Open LaunchPad. Click Utilities, then Console in the icon grid.
Step 1
Make sure the title of the Console window is All Messages. If it isn't, select All Messages from the SYSTEM LOG QUERIES menu on the left. If you don't see that menu, select
View ▹ Show Log List
from the menu bar.
Enter "BOOT_TIME" (without the quotes) in the search box. Note the timestamps of those log messages, which refer to the times when the system was booted. Now clear the search box and scroll back in the log to the last boot time when you had the problem. Select the messages logged after the boot, during the time something abnormal was happening. Copy them to the Clipboard by pressing the key combination command-C. Paste into a reply to this message (command-V).
For example, if the problem is a slow startup taking three minutes, post the messages timestamped within three minutesafter the boot time, not before. Please include the BOOT_TIME message at the beginning of the log extract.
If there are runs of repeated messages, post only one example of each. Don’t post many repetitions of the same message.
When posting a log extract, be selective. In most cases, a few dozen lines are more than enough.
Please do not indiscriminately dump thousands of lines from the log into this discussion.
Important: Some private information, such as your name, may appear in the log. Anonymize before posting.
Step 2
Still in Console, look under System Diagnostic Reports for crash or panic logs, and post the entire contents of the most recent one, if any. In the interest of privacy, I suggest you edit out the “Anonymous UUID,” a long string of letters, numbers, and dashes in the header of the report, if present (it may not be.) Please don’t post any other kind of diagnostic report, such as hang logs — they're very long and not helpful.

Can someone please suggest me in tuning this query?

Similar Messages

Maybe you are looking for