PC Toledo

gerar arquivo txt com 'insert into'

#include "fileio.ch"
#include "dbstruct.ch"
#include "hbclass.ch"

procedure Main()

public banco_a_icmuf
public cont := LASTREC()
public contt
public files
public nomeDoCampoDBD
public i

SET CENTURY on
SET DEVICE TO PRINT
SET PRINT ON
SET DATE FORMAT ...