*:*********************************************************************
*:
*:        Program: DXCC5BGN.PRG
*:
*:         System: PC-HAM Logbook
*:         Author: Joe Kasser G3ZCZ
*:      Copyright (c) 1990, Joe Kasser
*:  Last modified: 12/11/87      1:59
*:
*:      Called by: DXCC.PRG                      
*:               : DXCC5B.PRG                    
*:
*:           Uses: DXCC.DBF       
*:               : &DXCC.DBF      
*:               : &DXCC          
*:
*:      Documented 05/04/90 at 13:50                SNAP!  version 3.12f
*:*********************************************************************
*5BGEN GENERATES A NEW DXCC FILE
IF FILE(dxcc+'.DBF')
   * FILE EXISTS
ELSE
   USE dxcc
   ? 'CREATING NEW FILE AND COPYING DATA'
   COPY TO &dxcc
   USE &dxcc
   DO WHILE .not. EOF()
      ? px,px1,Country
      REPLACE dcall WITH BLANK
      REPLACE ddate WITH BLANK
      REPLACE dtime WITH BLANK
      REPLACE dband WITH BLANK
      REPLACE dmode WITH BLANK
      REPLACE dstate WITH BLANK
      SKIP
   ENDDO
   ?
   ? 'NEW BLANK DXCC FILE CREATED'
   USE
ENDIF
RETURN
*: EOF: DXCC5BGN.PRG