Showing posts with label TAJSEC. Show all posts
Showing posts with label TAJSEC. Show all posts

Saturday, June 20, 2009

How to manipulate the Logsheet for Forecast

 

You can manipulate the Hourly_Log_areas table to include the LSH in the RUH Area load, by modifying the key-commit code of the Logsheet form OPR0370.fmb

Note : The lines in bold below the new additions to add LSH to the Area Load of RUH

UPDATE HOURLY_LOG_AREAS SET IMPORT_VALUE=:HR.KHUFF_LOAD WHERE HR_HR_DATE=:DATE AND HR_TIME=:TIME AND FAULT_AREA_AREA_ID='KUF';

--added one line below for adjusting forecast 17JUN09:TAJ

UPDATE HOURLY_LOG_AREAS SET IMPORT_VALUE= NVL(:HR.TXT_LSH,0)+IMPORT_VALUE WHERE HR_HR_DATE=:DATE AND HR_TIME=:TIME AND FAULT_AREA_AREA_ID='RUH';

ELSE

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);

INSERT INTO HOURLY_LOG_AREAS (HR_HR_DATE,HR_TIME,FAULT_AREA_AREA_ID,IMPORT_VALUE) VALUES (:DATE,:TIME,'KUF',:HR.KHUFF_LOAD);

END IF;

GO_BLOCK('HLA');

FIRST_RECORD;

WHILE :HLA.AREA IS NOT NULL LOOP

SELECT COUNT(*) INTO CHLA FROM HOURLY_LOG_AREAS WHERE HR_HR_DATE=:DATE AND HR_TIME=:TIME AND FAULT_AREA_AREA_ID=:HLA.AREA;

IF CHLA>0 THEN

UPDATE HOURLY_LOG_AREAS SET

TIME_EXCEED_BK1 = :HLA.PLAN_EX,

NORMAL_BK = :HLA.BREAK_DOWN,

PLANNED_MAINTENANCE = :HLA.PLAN,

POB = :HLA.POB,

RUNNING = :HLA.RUN,

GENERATED = :HLA.GEN,

RES_MW = :HLA.RES_MW,

SPIN = :HLA.SPIN,

TEMPERTURE = :HLA.TEMP,

IMPORT_VALUE = :HLA.SYS_LOAD,

IMPORT_PER = :HLA.IMPORT_PER,

EXPECTED = :HLA.EXPECTED,

STAND_BY = :HLA.SBY,

TRANSFER_VALUE=:HLA.NET_TRANS

WHERE HR_HR_DATE=:DATE AND HR_TIME=:TIME AND FAULT_AREA_AREA_ID=:HLA.AREA;

ELSE

insert INTO HOURLY_LOG_AREAS

(HR_HR_DATE, HR_TIME, FAULT_AREA_AREA_ID, TIME_EXCEED_BK1, NORMAL_BK, PLANNED_MAINTENANCE, POB, RUNNING, GENERATED, RES_MW, SPIN, TEMPERTURE, IMPORT_VALUE, IMPORT_PER, EXPECTED, STAND_BY,TRANSFER_VALUE)

VALUES

(:HR.DATE, :HR.TIME,:HLA.AREA, :HLA.PLAN_EX, :HLA.BREAK_DOWN, :HLA.PLAN, :HLA.POB, :HLA.RUN, :HLA.GEN, :HLA.RES_MW, :HLA.SPIN, :HLA.TEMP, :HLA.SYS_LOAD,:HLA.IMPORT_PER, :HLA.EXPECTED, :HLA.SBY,:HLA.NET_TRANS);

END IF;

NEXT_RECORD;

END LOOP;

--added one line below for adjusting forecast 17JUN09:TAJ

UPDATE HOURLY_LOG_AREAS SET IMPORT_VALUE=NVL(:HR.TXT_LSH,0)+IMPORT_VALUE WHERE HR_HR_DATE=:DATE AND HR_TIME=:TIME AND FAULT_AREA_AREA_ID='RUH';

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...