LOL - sorry about that, didn't catch them at first....here are all of the relevant formulas (I think)
//@REPAIRSTATUS
IF {REP1.RepairStatus}="100" THEN
"*** UNISSUED ***"
ELSE IF {REP1.RepairStatus}="200" THEN
"OUT TO VENDOR"
ELSE IF {REP1.RepairStatus}="300" THEN
if {@OneYear} then
if not {@archived} then
"NEED TO BE ARCHIVED"
else
"ARCHIVED REPAIRS"
else
"READY FOR CUSTOMER PICKUP"
//@OneYear
if datediff("d",{@FixReturned},currentdate)>365 then
true
else
false
//@Archived
if instr(lcase({@DisplayComments}),"archive")>0 then
TRUE
else
FALSE
//@FixReturned
if {REP1.DateReturnFromVend}>0 then
if len(totext({REP1.DateReturnFromVend},0,""))=5 then
date(2000+val(mid(totext({REP1.DateReturnFromVend},0,""),4,2)),
val(mid(totext({REP1.DateReturnFromVend},0,""),1,1)),
val(mid(totext({REP1.DateReturnFromVend},0,""),2,2)))
else
date(val(mid(totext({REP1.DateReturnFromVend},0,""),5,2)),
val(mid(totext({REP1.DateReturnFromVend},0,""),1,2)),
val(mid(totext({REP1.DateReturnFromVend},0,""),3,2)))
//@DisplayComments
//{@display} to be placed in the group footer:
whileprintingrecords;
stringvar x;
trim(x);
//@Comments
propercase({REP1C.CommentLine1}&" "&{REP1C.CommentLine2}&" "&{REP1C.CommentLine3}&" "&{REP1C.CommentLine4}&" "&{REP1C.CommentLine5})
//@ConcatComments
//{@accum} to be placed in the detail section:
whileprintingrecords;
stringvar x := x + {@Comments}+" ";
//@ResetComments
//{@reset} for the group header:
whileprintingrecords;
stringvar x;
if not inrepeatedgroupheader then
x := "";