NEWLINE 24
  INDENT  5
  TEXT  "---------------------------------------------------------------"
  TEXT  "             **** QExchange Bulletin Board ****"
  TEXT  "---------------------------------------------------------------"
  NEWLINE 2
  TEXT  "You are in the new caller login section. After completing"
  TEXT  "the questions below, you will be returned to the main bulletin"
  TEXT  "board."
  TEXT  ""
  TEXT  "This is a one-time procedure. Estimated time to complete this"
  TEXT  "questionnaire is 2 to 4 minutes."
  TEXT  ""
  TEXT  "                  Date: " @sysdate@
  TEXT  "                  Time: " @systime@
  TEXT  "           Caller Name: " @user@
  TEXT  "           City, State: " @city@
  TEXT  "        Security Level: " @security@
  TEXT  "             Baud Rate: " @bps@
  TEXT  "                  Node: " @node@
  TEXT  ""
  TEXT  "---------------------------------------------------------------"
  TEXT  ""
  INDENT  0

  DISPLAY_FILE J:\PCB\SS\NEWCALL.MSG

  ;
  ; Field definitions
  ;
  FIELDS
    Name    .........................     C     @user@
    Company ___......................     C
    Addr1   _____....................     C
    Addr2   .........................     C
    CitySt  _____....................     C     @city@
    Zip     _____                         N
    Country ___......................     C     "USA"
    Phone   _                             P
    Fax     _                             P
  FIELDS
  ;
  ; Field entry
  ;
  PROMPT "            Name: " Name
  PROMPT "         Company: " Company
  PROMPT "  Address line 1: " Addr1
  PROMPT "  Address line 2: " Addr2
  PROMPT "     City, State: " CitySt
  PROMPT "             Zip: " Zip
  PROMPT "         Country: " Country
  PROMPT "    Phone Number: " Phone
  PROMPT "      Fax Number: " Fax
  ;
  ; append data to log file
  ;
  TEXT   "Logging data. Please wait..."
  LOG_DATA J:\PCB\SS\NEWCALL.LOG        ;ÄÄ edit accordingly
    "            Name: " Name
    "         Company: " Company
    "  Address line 1: " Addr1
    "  Address line 2: " Addr2
    "     City, State: " CitySt
    "             Zip: " Zip
    "         Country: " Country
    "    Phone Number: " Phone
    "      Fax Number: " Fax
    "       Date/Time: " @sysdate@  @systime@
    "  Node/Port/Baud: " @node@  @port@  @bps@
  LOG_DATA
  ;
  ; all done...
  ;
  EXIT