| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesflags.F |
231 |
COST_AVERAGESFLAGS |
targetdate1 = (mydate(1)/100)*100+1 |
|
./pkg/ecco/cost_averagesflags.F |
233 |
COST_AVERAGESFLAGS |
call CAL_FULLDATE( targetdate1, targetdate2, targetdate, |
|
./pkg/ecco/cost_averagesflags.F |
288 |
COST_AVERAGESFLAGS |
targetdate1 = int(mydate(1)/10000)*10000+101 |
|
./pkg/ecco/cost_averagesflags.F |
290 |
COST_AVERAGESFLAGS |
call CAL_FULLDATE( targetdate1, targetdate2, targetdate, |
|
./pkg/ecco/cost_averagesflags.F |
87 |
COST_AVERAGESFLAGS |
integer targetdate1 |