Tipo: Processamento
Retorna o tamanho de um campo no SX3 (dicionário de dados).
Sintaxe
TamSx3(cCampo)
Parâmetros
cCampo – Nome do campo.
Retorna
aTam – Array com o tamanho e decimais do campo.
Exemplo
// Exemplo de uso da funcao TAMSX3
// Array auxiliar:
aCampos := { {“B1_COD” ,”C”},;
{“B1_DESC”,”C”},;
{“B1_QE” ,”N”},;
{“B1_PRV1”,”N”} }
// Cria arquivo de trabalho com o tamanho dos campos
// exatamente como na base de dados, evitando erros de ]
// “Data Width Error”:
i := 0
aStru := {}
For i:=1 To Len(aCampos)
cCpo := aCampos[i,1]
cTp := aCampos[i,2]
aTam := TamSx3(cCpo)
aAdd(aStru,{cCpo,cTp,aTam[1],aTam[2])
Next i
cArq := CriaTrab(aStru,.T.)
// O programa continua. . .
Return
Estude para provas de certificações em TI com os simulados Bynem