Programmer 7500/MAX_PROGRAMMERS.iso/CLIPPER/DATABASE/JOBS20.ZIP/JOBEXPEN.FMT

Text File | 1993-06-01 | 1.3 KB | 34 lines

************************************************************************
*-- Name.......: JOBEXPEN.FMT
*-- Date.......: 4-23-93
*-- Revised....: 6-01-93
*-- Version....: dBASE III & Foxpro
*-- Notes......: Format files use "" as delimiters!
*
************************************************************************
*        Copyright (C) 1993, R.J. Kovach & Assoc.    ALL RIGHTS RESERVED
************************************************************************

@  4,  1  TO 22, 77 DOUBLE
@  5, 30  SAY "Job Hunting Expenses"
@  7,  5  SAY "Date"
@  7, 12  GET  JOBEXPEN->date PICTURE "99/99/99"
@  9, 16  SAY "Codes for the "+CHR(34)+"Type"+CHR(34)+" field:"
@ 10,  5  SAY "Type"
@ 10, 12  GET  JOBEXPEN->type PICTURE "!"
@ 10, 18  SAY "L = Lodging"
@ 11, 18  SAY "M = Meals"
@ 12, 18  SAY "A = Auto expenses (mileage, parking & tolls)"
@ 13, 18  SAY "T = Transportation (Air, train, taxi, limo, etc.)"
@ 14, 18  SAY "P = Postage & Stationery"
@ 15, 18  SAY "O = All other"
@ 17,  5  SAY "Amount"
@ 17, 12  GET  JOBEXPEN->amount PICTURE "99999.99"
@ 17, 40  SAY "Miles"
@ 17, 47  GET  JOBEXPEN->miles PICTURE "99999"
@ 19,  5  SAY "Description"
@ 19, 18  GET  JOBEXPEN->descript PICTURE "!XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"

*-- EOP: JOBEXPEN.FMT