!Local Program
  MAP (SJK) MSG$ = 32%
  OPEN 'WESTON"DAVIS PSWRD"::"TASK = MARG"' &
              FOR OUTPUT AS FILE #1%, SEQUENTIAL, MAP SJK
  LINPUT "WHAT IS THE CUSTOMER NAME"; MSG$
  PUT #1%
  GET #1%
  PRINT MSG$
  CLOSE #1%
  END