* SHOWP.CMD
* 2nd Ed. 8/22/87
ERASE
SET FORMAT TO PRINT
SET MARGIN TO 1
@ 1,23 SAY "*******CLAIM FILE EVALUATION******"
@ 2,26 SAY "COPYRIGHT 1987 by David Rice"
@ 4,1 SAY minsd
@ 4,45 SAY mpoln
@ 4,60 SAY mld
@ 5,1 SAY mclmt
@ 5,40 SAY matty
@ 7,1 SAY "MEDICALS:"
@ 7,10 SAY mmeds:k
@ 8,1 SAY "FUTURE MEDICALS:"
@ 8,17 SAY mmeds:e
@ 9,1 SAY "LOST WAGES:"
@ 9,12 SAY mwages
@ 9,25 SAY "EXPENSES/OTHER:"
@ 9,40 SAY mexps
@ 10,1 SAY "Weeks of Disability - TOTAL:"
@ 10,29 SAY mtd
@ 10,40 SAY "PARTIAL:"
@ 10,48 SAY mpd
@ 10,57 SAY "DISCOMFORT:"
@ 10,68 SAY mps
@ 12,1 SAY "AVERAGE SETTLEMENT:"
@ 12,20 SAY int(avg)
@ 14,1 SAY "PARAMETERS:"
@ 14,12 SAY lmin
@ 14,22 SAY lmax
@ 16,1 SAY "COMMENTS:"
@ 17,1 SAY n1
@ 18,1 SAY n2
@ 19,1 SAY n3
@ 20,1 SAY n4
SET FORMAT TO SCREEN
WAIT
RETURN
 lmax
@ 16,1 SAY "COMMENTS:"
@ 17,1 SAY n1
@ 18,1 SAY n2
@ 19,1 SAY 