Saturday, June 20, 2009

How to Add Tiac to LogSheet

Step 1.

To add-up the TIAC value to the TXT_TOTAL

1.Drag and place text box belonging to the HR block on the form

2. Name the box as TXT_TIAC.

Step 2

Make the following changes in the Program Unit : Get_Data procedure defined in the Form Builder (from Object Navigator)

FOR R IN CHR LOOP

:HR.DATE:=R.HR_DATE;

:HR.TIME:=R.TIME;

:HR.EAST_TRANS:=nvl(R.EAST_TRANSFER,0);

:HR.EAST_TARGET:=NVL(R.EAST_TRGT,0);

:HR.TOT_TRANS:=NVL(R.TOTAL_TRANSFER,0);

:HR.TXT_LSH := NVL(R.LSH,0);

:HR.TX_TIAC := NVL(R.TIAC,0); ( Please note that TIAC will show value for UNVL column)

:HR.TXT_CONSGEN2 := NVL(R.CONS_GEN2,0);

EAST_TRANS:=NVL(:HR.EAST_TRANS,0);

 

Step 3.

Drag and place another text_box which will hold the summation value of TX_TIAC and TXT_UNVL

Set the following in the Property Palette of the text box.

name = txt_sum_tiac_unvl

formula = :TXT_UNVL + :TX_TIAC

caculation mode = formula

Step 4

Make the following changes in the KEY-COMMIT code.

UPDATE hourly_records SET

EAST_TRGT = :HR.EAST_TARGET,

EXP_DEMAND = :HR.EXPECTED_DEMAND,

EAST_TRANSFER =:HR.EAST_TRANS,

SYSTEM_LOAD = :HR.SYS_LOAD,

IMPORT_PERC = :HR.IMPORT_PER,

CONS_GEN = :HR.CONS_GEN,

TOTAL_TRANSFER = :HR.TOT_TRANS,

LSH = :HR.TXT_LSH,

CONS_GEN2 = :HR.TXT_CONSGEN2,

TIAC = :HR.TX_TIAC,

TOTAL_UNVL = :HR.TXT_SUM_TIAC_UNVL

WHERE HR_DATE=:DATE AND TIME=:TIME;

...

insert INTO hourly_records

(HR_DATE, TIME,EAST_TRGT, EXP_DEMAND, EAST_TRANSFER, SYSTEM_LOAD, IMPORT_PERC, CONS_GEN, TOTAL_TRANSFER,LSH,CONS_GEN2,TIAC,TOTAL_UNVL)

VALUES

(:HR.DATE, :HR.TIME,:HR.EAST_TARGET, :HR.EXPECTED_DEMAND, :HR.EAST_TRANS, :HR.SYS_LOAD, :HR.IMPORT_PER, :HR.CONS_GEN, :HR.TOT_TRANS,:HR.TXT_LSH,:HR.TXT_CONSGEN2,:HR.TX_TIAC

,:HR.TXT_SUM_TIAC_UNVL);

That's all...

No comments: