Cria arquivo de dados.
Sintaxe
MsCreate( cArquivo, aEstrut ,[ cDriver ] ) -> lógico
| Argumento | Obrigat. | Tipo | Descrição |
| cArquivo | Não | C | Nome do arquivo. |
| aEstrut | Sim | A | Estrutura do arquivo. |
| cDriver | Não | C | RDD do arquivo. |
Descrição
A função MsCreate() cria um arquivo (tabela) de acordo com a estrutura informada no parâmetro aStrut (*). Se o parâmetro cDriver não for informado o RDD corrente será assumido como padrão. Para criação de tabelas no TopConnect é necessário estar conectado ao banco e o environment do Protheus ser TOP.
Se o arquivo for criado com sucesso a função retornará verdadeiro (.T.).
(*) vetor contendo a estrutura da tabela: 1º – caracter, nome do campo; 2º – caracter, tipo do campo; 3º – numérico, tamanho do campo; 4º – numérico, decimais.
Exemplo
Local cTarget := ‘sigaadv’
Local aStrut
aStrut := { { ‘Campo’, ‘C’, 40, 0 } }
If MsCreate( cTarget+’ARQ1001′, aStrut )
APMsgInfo(‘Criado com sucesso!’)
Else
APMsgInfo(‘Problemas ao criar o arquivo!’)
EndIf