//Created by HMG Data Base Assistant v.5.4.17 (17.04.2010-14:00:33)
//Under structure of Agenda.dbf

Function _Create_()
     Local aStructure := {;
                         { "CODIGO"     ,  "C"  ,   4    ,   0    },;
                         { "NOME"       ,  "C"  ,   40   ,   0    },;
                         { "ENDERECO"   ,  "C"  ,   40   ,   0    },;
                         { "BAIRRO"     ,  "C"  ,   25   ,   0    },;
                         { "CEP"        ,  "C"  ,   8    ,   0    },;
                         { "CIDADE"     ,  "C"  ,   25   ,   0    },;
                         { "ESTADO"     ,  "C"  ,   2    ,   0    },;
                         { "NASCTO"     ,  "D"  ,   8    ,   0    },;
                         { "FONE1"      ,  "C"  ,   10   ,   0    },;
                         { "FONE2"      ,  "C"  ,   10   ,   0    },;
                         { "TIPO"       ,  "C"  ,   4    ,   0    },;
                         { "EMAIL"      ,  "C"  ,   40   ,   0    };
                         }
     DBCreate( "Agenda.dbf" , aStructure )

Return Nil