//This is a comment ABORT "You experienced an abort."; WARN "THIS IS A WARNING"; CALL "RIDER_X"; DONE; FOR EACH X IN CSV_FILE "d:\lodestar\user\d377.lse" LEAVE FOR; END FOR; IF ((BILL_KW = 0) AND (KW > 0)) THEN END IF; INCLUDE "R1"; LEAVE RIDER; SELECT BILL_PERIOD WHEN "WINTER" BLOCK KWH FROM 0 TO 400 CHARGE $0.03709 FROM 400 CHARGE $0.03000 TOTAL $ENERGY_CHARGE_WIN; WHEN "SUMMER" $VOLTAGE_DISCOUNT_SUM = $0.00 OTHERWISE $VOLTAGE_DISCOUNT_SUM = $1.00 END SELECT; /* Report top five peaks */ LABEL PK.NM "Peak Number"; SAVE_UPDATE MV TO TABLE "METERVALUE"; FOR EACH INX IN ARRAYUPPERBOUND(#MYARRAY[]) #MYARRAY[INX].VALUE = 2; CLEAR #MYARRAY[]; END FOR //Interval Data HNDL_1_ADD_EDI = INTDADDATTRIBUTE(HNDL_1, "EDI_TRANSACTION", EDI_ID); HNDL_1_ADD_VAL_MSG = INTDADDVMSG(HNDL_1,"Missing (Status Code 9) values found"); EMPTY_HNDL = INTDCREATEHANDLE('05/03/2006 00:00:00', '05/03/2006 23:59:59', 3600, "Y", "0", " ");