Macro - Adjust by % of Selling Price - UA5, UA5FM, NUR 09-19-2011
To install macro:
Select all of the text below, right-click and select 'Copy'. In the appropriate RealEasy Appraisals field - click on the Lightning Text icon (under Orders) and select New. Type in a title (OK). Press Control+V (to paste). Select a Hot Key. Select Macro(vs plain Text), and then select Ok.
; 09/19/2011 10:00
; Adjust by % of selling price - URAR, UAD and RMPF Forms
; Install in all desired Market Approach adjustment fields of Comp 1 of EITHER the UA5, UA5FM or NUR reports which share the same Common Response fields.
; It DOES NOT WORK IN Above Grade, Room Count and Misc lines
adj! = VAL( InputBox$( "Enter +- % Adjustment", "+- % Selling Price",""))
if FormName$()="UA5" or FormName$()="UA5FM" or FormName$()="NUR" then
if activefield(line|2) or activefield(line|3) then
result!=adj! * val(95|2) * Val(".01")
elseif activefield(line|4) or activefield(line|5) then
result!=adj! * val(95|3) * Val(".01")
else
result!=adj! * val(95|4) * Val(".01")
end if
else
if activefield(line|2) or activefield(line|3) then
result!=adj! * val(13|2) * Val(".01")
elseif activefield(line|4) or activefield(line|5) then
result!=adj! * val(13|3) * Val(".01")
else
result!=adj! * val(13|4) * Val(".01")
end if
end if
replace(str$(result!))
return
return
