{$S-,R-,V-,I-,B-,F-}

{ LgNoPop  the non tsr, no popup version of Logger Generic }
{ (information tracker with generic field names and multi-data choose) }
{ ver 1.08,  01/09/92 ...it came from the logger, L3 program }

{ the following keys are added:                                    }
{   RSuser0, 1, 2, 3 => up, dn, home, end arrow key                }
{   RSuser4 => ctrl-enter key  => save/done/exit to main           }
{   RSuser5 => ctrl-R key  => read an ascii file into the memo pad }
{   RSuser6 => ctrl-P key  => jump to memo field, must <esc> to jump back }
{ * copywrited by: Lonnie J. Rolland }

{ 10/23 make ver 1.01 when the menu code was removed, ergo no 'C' choose func }
{ 10/31 make a no pop up version from the tsr }
{ 11/02 added a help key to the main menu, added init to the field names }
{ 11/10 chgd config text file to file of char for file mode share on reset }
{ 11/11 use lgmain2.inc with network locks turned on by a bool switch called }
{       appropriately 'network', defaulted to false, command line turned on.}
{       all refresh happens only if your running on a net. Installed catches }
{       to bounce you out if you're trying to run network when you are not }
{ 11/13 in browse, stopped the flicker of redo of re-gotten first/last rec }
{ 11/21 make ver 1.03 when the menu code/choose func. goes back into the code.}
{       caught print blank memo bug. added bool 'badfileopen' to catch missing}
{       data files from choose menu. Increased verbalage to instruction msgs}
{ 03/13 change the stepping in the upper field area to not loop but step down}
{       into the memo area instead. }
{       Config file is a file of 'char' MUST be read-only in network share }
{ 06/22 remove all timer/time tracking, ergo the .dbf shrinks.  changed color}
{       from red to purple. took out CHOOSE for a lgnp version.  }
{       This made it necessary for a NEW config file, 'loggernc.cfg' }
{       Fixed bug in memo, if you start a new record, go make a memo entry, }
{       escape twice to browse, return to memo, return to pad, it was }
{       in-correctly painting to memo what was browsed to last  }
{ 06/27 Add in the User.sys file read & use, name/city/w.ph/h.ph/password }
{       removed command line parm switches to sit instead as config line #2 }
{       new config file name 'loggerd.cfg', new bool 'usedoorsys'  }
{       two field names changed, also two changes to the database .dbf rec }
{       if 'd' in config line #2, then line #3 will have a path to where }
{       'door.sys' is at. If 'd', all mod rec attempts checked for ownership}
{ 07/05 change config read in got/released heap from filetype 'file of char'}
{       to 'file' for compiler bug. Rmed 2nd reverse color for 'bright2'}
{       fixed a bug with 'origrecnum's original fix to add/esc/bro/resume }
{       added params, force on color, force on mono mode. }
{ 07/08 Change color back. Change 'start' to 'add', made 'find' to 'search'}
{       Add environment variable 'LGKEY' for non door record ownership test}
{ 07/11 changed <F1> for help to <H> for help to pop up.  Reduced memo fld }
{       size by one and shifted bottom stuff up to NOT write to scrn line 25}
{       Find 1/2/3/4 uses FN01/13/03/04, inc s1 to 10, dec s2 to 6 char }
{       Added tpdos's existonpath func to front of config file load }
{       Combine city+state to 'city/state:' loose a field. 'country' grows }
{ 07/14 More work done to browsing amongst lots of deleted records }
{       Added alert for door poeple. If the date on the last rec logged is }
{       newer than the date that this person last called, he is notified! }
{ 07/16 Added database out to text file function by 'T' at main prompt }
{       Save the original text attr before screen paint, restore it on exit }
{ 07/17 From find/brow func, if 'enter' to edit is pressed, it now asks }
{       if you are 'sure' you want to change to edit mode }
{ 07/19 Added placing author's name into the 10th field, (where fax ph is) }
{ 07/22 if door mode, directvideo's writes is false, ergo thru the bios }
{       ran 'opstack'! sez usage for stack=3056, heap=6256, memory=98080 }
{ 07/24 Took the word 'Logger' out of the title that is displayed at the top }
{       Increased the size of 'yourtitle' from 30 to 45 }
{ 07/26 Found bug w 'usedoorsys' reading last rec when initially non exist }
{ 08/02 Added '+' and a '-' key to use in browse mode }

{ 12/12 Made version 1.07 primarily by a request from europe's support group }
{ 12/14 Put back in choose (pick db) & date time stuff, dbf now has 23 fields }
{ 12/20 Put in a pick list as 'search' function. All searches forced to upper }
{       case char. If you choose another dbf area, suspend mode gets negated }
{ 12/28 Chg search to loop within 'findfield' chg 'doorallow' to 'allowchange'}
{       rm'ed code for ctrl-A & abandon & escapebill & suspend }
{       chg edit code so that if escape is pressed, it asked to save before}
{       any chges are thrown away...no more escape! Text file now DATALOG.TXT}
{ 12/30 chg brow so an esc within keeps you within. Added more help mgs lines}
{       now do print by pressing "P" and not an "O". added print and delete}
{       to the search mode pick list. added read rec update to pick select}
{ 01/02 mod to pickdb with time only & shorter desc, re-did the quick help.}
{       wow! found I could rem the getscrapline & paintscrap because no susp}
{ 01/03 added import text file func to edit mode. Rmed the 'ask' from bro sel}

{ 01/06 made ver 1.08 my removing 'choose' func. Made memo pad 8KB vice 4KB }
{       Fixed the search to select with no date/time shown for 2 seconds bug }
{       Shortened command labels. Picking-DB log inited to false. Added date/}
{       time to print and text out. Add block reads to import so it goes fast}
{ 01/07 fixed bug with import (large) to pad with info already. Changed esc }
{       from edit so as you can esc from the esc to go back to edit. If field}
{       label blank (except for 4/5/11/12/15/16) then in edit will skip entry.}
{       Added a 5th search - for all resolved/closed or unresolved/open to}
{       build picklist, ergo press '5' after 'S' }
{ 01/10 put in trick 'case string' function to handle PARAM passed. Added an-}
{       other param, 'O' for 'forceallow' to allow past the lgkey word lock}
{       params possible now 'M C N D O MN CN MD CD ND MO CO NO MND CND MNO CNO'}
{       tsr has no door stuff, ergo less params. Added 6th search - for problem}
{       pick now shows 5 columns of 13 char. vice 4 of 17.}