Query find Implementation

Query find LOV Implementation

EMPNO PRIMARY KEY

At Block levl(Pre-Query) trigger

If :PARAMETER.G_QUERY_FIND='TRUE' then

:EMP.EMPNO=:PARAMETER.P_EMPNO;

:PARAMETER.G_QUERY_FIND='FALSE';

END IF;

In block level query_find trigger

APP_FIND.QUERY_FIND('LOV106');

Query find WINDOW LEVEL Implementation

Open Template.fmb

Create query block

Open Appstand.fmb

Copy QUERY_FIND Object group to TEMPLATE.fmb at Object Group

Automatically 03 objects created in the template.fmb

WindowàQUERY_FIND

CanvasàQUERY_FIND

BlockàQUERY_FIND

Buttons New,Cancel,Find

Close the Appstand.fmb

Rename the default objects created by QUERY_FIND object group

WIN_QUERYFIND, CANVAS_QUERYFIND, BLOCK_QUERYFIND

Create one text_item for query criteria on BLOCK_QUERYFIND

Modification of code at button level(New/Find) at

(Trigger Name : KEY-NXTBLK)

New Button : app_find.new('EMP_BLK') --Query Block name

Find Button : :parameter.G_QUERY_FIND:='TRUE';

app_find.find('EMP_BLK');

:parameter.G_query_find:='FALSE'

BLOCK_QUERYFIND(Trigger Name : KEY-NXTBLK)

:parameter.G_query_find:='TRUE'

app_find.find('EMP_BLK');

:parameter.G_query_find:='FALSE'

PRE-QUERY TRIGGER-BLOCK LEVEL(Query Block )

If :PARAMETER.G_QUERY_FIND='TRUE' then

:EMP.EMPNO=:PARAMETER.P_EMPNO;

:PARAMETER.G_QUERY_FIND='FALSE';

END IF;

QUERY_FIND TRIGGER AT BLCOK LEVEL(Query Block )

APP_FIND.QUERY_FIND('EMP_BLK','WIN_QUERYFIND',BLCOKNAME_QUREYFIND);

--
Thanks,
Shashidhar