
.script

.column z_109r, "1099 Reports"
.entry z_19mr, "1099-MISC report"
.entry z_19dr, "1099-DIV report"
.entry z_19vf, "1099 verification report"
.end

;=============================================================== 
.input ap7051, 1, 30
.placement 1, 1
.title ' 1099 Verification Report ', highlight
.paint _

.field year, d4, pos(1,1), prompt("Year"), fpos(1,20), -
 help(AP1099YEAR), format('XXXX'), copy

.structure rec1, year
.set set1, rec1, year
.button I_OK, text(OK)
.button O_ABANDON, text(Cancel)
.button O_HELP, text(Help)
.button_set bottom(3)
.end
; 
