Siemens MD-P1 - Page 62

Appendices
Appendix F - Measuring Consumption (kWh), Demand, and Other Applications
62
Siemens Industry, Inc.
125-201
09/30/2019
03000
IF (MONTH .NE. 1) THEN GOTO 3020
03010
SAMPLE(60) “%X%JAN” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03020
IF (MONTH .NE. 2) THEN GOTO 3040
03030
SAMPLE(60) “%X%FEB” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03040
IF (MONTH .NE. 3) THEN GOTO 3060
03050
SAMPLE(60) “%X%MAR” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03060
IF (MONTH .NE. 4) THEN GOTO 3080
03070
SAMPLE(60) “%X%APR” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03080
IF (MONTH .NE. 5) THEN GOTO 3100
03090
SAMPLE(60) “%X%MAY” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03100
IF (MONTH .NE. 6) THEN GOTO 3120
03110
SAMPLE(60) “%X%JUN” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03120
IF (MONTH .NE. 7) THEN GOTO 3140
03130
SAMPLE(60) “%X%JUL” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03140
IF (MONTH .NE. 8) THEN GOTO 3160
03150
SAMPLE(60) “%X%AUG” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03160
IF (MONTH .NE. 9) THEN GOTO 3180
03170
SAMPLE(60) “%X%SEP” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03180
IF (MONTH .NE. 10) THEN GOTO 3200
03190
SAMPLE(60) “%X%OCT” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03200
IF (MONTH .NE. 11) THEN GOTO 3220
03210
SAMPLE(60) “%X%NOV” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03220
IF (MONTH .NE. 12) THEN GOTO 4000
03230
SAMPLE(60) “%X%DEC” = (“%Y%” – “%X%CMH”) + (“%Z%” – “%X%CML”)
03988
C
03990
C ------- DAY OF WEEK CONSUMPTION -------
03992
C IF IT IS 12:00 AM, THEN SET THE VIRTUAL METER CONSUMPTIION
03994
C POINTS EQUAL TO THE ACTUAL DEM VALUES. OTHERWISE, SKIP AND
03996
C CALCULATE THE DAILY VALUE.
03998
C
04000
IF (CRTIME .EQ. 0.0) THEN GOTO 4010 ELSE GOTO 5000
04010
“%X%CDH” = “%Y%”