@ 1,1  SAY '    1 = "Mr."'
@ 2,1  SAY '    2 = "Mrs."'
@ 3,1  SAY '    3 = "Ms."'
@ 4,1  SAY '    4 = "Dr."'
@ 5,1  SAY ' BLANK to exit entry program'
@ 6,1  SAY ' After BLANK, enter carriage return for entries'
@ 7,1  SAY 'Enter title code     ' GET MTTL
@ 8,1  SAY 'Enter Surname        ' GET MSNAM
@ 9,1  SAY 'Enter other names    ' GET MGNAME
@ 10,1 SAY 'Enter Co. name       ' GET MOF
@ 11,1 SAY 'Enter Address        ' GET MADDR
@ 12,1 SAY 'Enter City           ' GET MCITY
@ 13,1 SAY 'Enter State          ' GET MSTATE
@ 14,1 SAY 'Enter ZIP code       ' GET MZIP