From ae07380908c1ee9efb41245f2be45124a5978c40 Mon Sep 17 00:00:00 2001 From: Andrew McMillan Date: Tue, 2 Jun 2009 13:05:08 +1200 Subject: [PATCH] Add blank column, rename column. --- process/report/schdtgg2.p | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/process/report/schdtgg2.p b/process/report/schdtgg2.p index f94080d..c26633c 100644 --- a/process/report/schdtgg2.p +++ b/process/report/schdtgg2.p @@ -1360,7 +1360,7 @@ DEF VAR report AS CHAR NO-UNDO INITIAL ''. + td(TRIM(STRING(fyr-frcast-t,money-format)), 'class="money"') + td(TRIM(STRING( (fyr-frcast-t / total-area), money-format)), 'class="money"') + td(TRIM(STRING(((fyr-frcast-t - fyr-budget-t) / fyr-budget-t) * 100,pcnt-format)), 'class="decimal"') - + empty(6) + + empty(1) + empty(5) , ''). mth-actual-g = mth-actual-g + mth-actual-t. @@ -1384,7 +1384,8 @@ DEF VAR report AS CHAR NO-UNDO INITIAL ''. + td("FY Forecast", '') + td("$PSM", '') + td("Variance", '') - + td("Notes", 'colspan="6"') + + td("PCA Rate", '') + + td("Comments", 'colspan="5"') , ''), 'class="colhead"'). END. mth-actual-t = 0.0 . @@ -1425,7 +1426,7 @@ DEF VAR report AS CHAR NO-UNDO INITIAL ''. + td(TRIM(STRING(fyr-frcast-t,money-format)), 'class="money"') + td(TRIM(STRING( (fyr-frcast-t / total-area), money-format)), 'class="money"') + td(TRIM(STRING(((fyr-frcast-t - fyr-budget-t) / fyr-budget-t) * 100,pcnt-format)), 'class="decimal"') - + empty(6) + + empty(1) + empty(5) , ''). mth-actual-g = mth-actual-g + mth-actual-t. @@ -1445,7 +1446,7 @@ DEF VAR report AS CHAR NO-UNDO INITIAL ''. + td(TRIM(STRING(fyr-frcast-g,money-format)), 'class="money"') + td(TRIM(STRING( (fyr-frcast-g / total-area), money-format)), 'class="money"') + td(TRIM(STRING(((fyr-frcast-g - fyr-budget-g) / fyr-budget-g) * 100,pcnt-format)), 'class="decimal"') - + empty(6) + + empty(1) + empty(5) , ''), 'class="totals"'). RETURN report. -- 2.11.4.GIT