hi risna , saya pakai 2 cara :
1. tinggal set property block di where clause
Doc_Status = :Doc_Title.Wo_Status
2. set dynamically throgh pl/sql block code,
Set_Block_Property('PRODUCT',DEFAULT_WHERE,'NVL(DOC_STATUS,''X'') =
'||'''' ||:DOC_TITLE.WO_STATUS ||'''');
Go_Block('Product');
Execute_Query;
J
risna septi wrote:
>thanks, its work..
>klu pakai query di block ada juga khan?? tapi blum tahu makainya.... kayaknya
>kita pakai select statement diblock... ada yg tahu??
>
>
>Ujang Jaenudin <[EMAIL PROTECTED]> wrote:
>hi risna, hope this help.
>
>declare
>CURSOR get_locn IS
> SELECT locn_Code,Locn_Name FROM location_storage
> WHERE whs_code = :WAREHOUSE.WHS_CODE
> AND locn_type IN ('N','W','C')
> AND mrp = DECODE(0,10,'Y',mrp);
>BEGIN
> Go_Block('STOCK_ALL_LOC');
> First_Record;
> Loop
> :STOCK_ALL_LOC.LOCN_CODE := null;
> :STOCK_ALL_LOC.OCN_NAME := null;
> :STOCK_ALL_LOC.STK_QTY := null;
> If :system.Last_Record = 'TRUE' then
> exit;
> End If;
> Next_Record;
> End Loop;
>
> first_record;
> FOR I IN get_locn LOOP
> :STOCK_ALL_LOC.LOCN_CODE := I.locn_Code;
> :STOCK_ALL_LOC.OCN_NAME := I.Locn_Name;
> :STOCK_ALL_LOC.STK_QTY :=
>NVL(get_cnf(I.locn_Code,:curr_stock.item_code),0);
> next_record;
> END LOOP;
>END;
>
>
>J
>
>risna septi wrote:
>
>
>
>>hallo all,
>>mo tanya... create cursor n hasilnya bisa dimasukkan ke multiple record form?
>>contoh ada 2 field
>>saya uda coba, tapi yg keluar hny record pertama aja...
>>
>>ada bantuan dr teman2??
>>
>>PROCEDURE pointcalc IS
>>cursor cp is
>>select sum (db) points,pointname
>>
>>
>>from dtl_trackpoint a, mst_points b
>
>
>>where a.point_id=b.row_id and
>>mcc_code=:permanen_code
>>group by pointname;
>>pn varchar2 (60);
>>p number;
>>BEGIN
>>go_block ('points');
>>first_record;
>>loop
>>open cp;
>> fetch cp into :point.point,:point.pointname;
>> next_record;
>> IF :System.Last_Record = 'TRUE' THEN
>> EXIT;
>> END IF;
>>
>> close cp;
>>end loop;
>>
>>
>>END;
>>
>>
Send instant messages to your online friends http://asia.messenger.yahoo.com
------------------------ Yahoo! Groups Sponsor --------------------~-->
<font face=arial size=-1><a
href="http://us.ard.yahoo.com/SIG=12hue39go/M=362131.6882499.7825260.1510227/D=groups/S=1705007183:TM/Y=YAHOO/EXP=1124345356/A=2889191/R=0/SIG=10r90krvo/*http://www.thebeehive.org
">Get Bzzzy! (real tools to help you find a job) Welcome to the Sweet Life
- brought to you by One Economy</a>.</font>
--------------------------------------------------------------------~->
--
-----------I.N.D.O - O.R.A.C.L.E---------------
Keluar: [EMAIL PROTECTED]
Website: http://indo-oracle.lizt.org (NEW)
-----------------------------------------------
Bergabung dengan Indonesia Thin Client User Groups,
Terminal Server, Citrix, New Moon Caneveral, di:
http://indo-thin.vze.com
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indo-oracle/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
