R18

I've been at it for weeks testing these computed columns. Today I'm working on ones that 4 out 5 times the field worked. Scary we have been only testing 1 or 2 records. I found that if on DVF I put all the demand fields first then use the @ variables in the logic part it works best. This is the one I worked on today.

R17

SUBR("S.MIO.TRANS","SA.2005",APPL.APPLICANT,'SA.AWARD','X');
SUBR("S.MIO.TRANS","SA.2005",APPL.APPLICANT,'SA.ACTION','X');
SUBR("S.MIO.TRANS","SA.2005",APPL.APPLICANT,'SA.AMOUNT','X');
SUM(SUBR("X.S.FA.GET.AWD.CAT",@1,@2,@3,"C","SWJSC","MA"));
SUM(SUBR("X.S.FA.GET.AWD.CAT",@1,@2,@3,"C","GWJGR","MA"));
SUM(SUBR("X.S.FA.GET.AWD.CAT",@1,@2,@3,"C","SENDW","MA"));
@4+@5+@6;
IF @7 THEN @7 ELSE IF W29.APPL.SCHOLAR.AMT THEN W29.APPL.SCHOLAR.AMT * 100
. ELSE ''

R18 New

TRANS("SA.2005",APPL.APPLICANT,"SA.AWARD","X");
TRANS("SA.2005",APPL.APPLICANT,"SA.ACTION","X");
TRANS("SA.2005",APPL.APPLICANT,"SA.AMOUNT","X");
SUBR("X.S.FA.GET.AWD.CAT",@1,@2,@3,"C","SWJSC","MA");
SUBR("X.S.FA.GET.AWD.CAT",@1,@2,@3,"C","GWJGR","MA");
SUBR("X.S.FA.GET.AWD.CAT",@1,@2,@3,"C","SENDW","MA");
TRANS("APPLICANTS",APPL.APPLICANT,"APP.MISC3","X");
EXTRACT(@7,1,2,0);
SUM(@4);
SUM(@5);
SUM(@6);
(((@9) + (@10)) + (@11));
IF @12 THEN (@12) ELSE (IF @8 AND @8 NE "0" THEN (((@8) *
(100.))) ELSE (""))

I am sitting here and do DVF,DCC,MGCC and BNGN on hundreds of fields. I'm definitely only fixing them in R18 and then moving them to the LPR because when we first tried to fix some in R17 we would break R17. Then to keep them in sync is crazy. So I fix them in test account and load them to the LPR to bring down to the next environment.