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';
No comments:
Post a Comment