Frameworksp

Atalhos

Páginas filhas
  • CriaTrab - Retorna arquivo de trabalho

Versões comparadas

Versão antiga 3

changes.mady.by.user Usuário desconhecido (felipe.valcanaia)

Gravado em

comparado com

Nova versão 4

changes.mady.by.user Daniel Mendes De Melo Sousa

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Idiomas:


Descrição:
Esta função retorna o nome de um arquivo de trabalho que ainda não existe e dependendo dos parâmetros passados, pode criar um novo arquivo de trabalho.
Programa Fonte:
CRIATRAB
.
PRG


Sintaxe:

Criatrab- CriaTrab → Retorna arquivo de trabalho ( [ aCampos ] [ lCria ] ) --> → cNomeArq


Retorno:
cNomeArq
    (caracter)
  • Nome do arquivo gerado pela função.
Observações:

Se o parâmetro lCria for .T. é obrigatório a passagem do parâmetro aCampos.


Retorno:

Caso lCria for .T., a função criará um arquivo com a estrutura definida no parâmetro aCampos. Caso lCria for .F., a função não criará arquivo de nenhum tipo, apenas fornecerá um nome válido.


Exemplos:
Portuguese

Pagetitle
Criatrab- Retorna arquivo de trabalho
Criatrab- Retorna arquivo de trabalho

Função:Criatrab CriaTrab - Retorna arquivo de trabalho
Abrangências: Microsiga Protheus 8.11 , Microsiga Protheus 11 , Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Nível de Acesso: Nível 1 (Acesso Clientes)
Português (Brasil) , Português (Portugal) , Espanhol , Inglês
Bloco de código
languagejs
themeMidnight
local cArq as character
local cIndice as character
local aStru as array
local cArqTrab as character

//Exemplo com lCria  = .F.

cArq := CriaTrab(NIL, .F.)

cIndice := "C9_AGREG+"+IndexKey()

Index on &cIndice To &cArq


//Exemplo com lCria = .T.

aStru := {}

AADD(aStru,{ "MARK"   , "C",  1, 0})
AADD(aStru,{ "AGLUT"  , "C", 10, 0})
AADD(aStru,{ "NUMOP"  , "C", 10, 0})
AADD(aStru,{ "PRODUTO", "C", 15, 0})
AADD(aStru,{ "QUANT"  , "N", 16, 4})
AADD(aStru,{ "ENTREGA", "D",  8, 0})
AADD(aStru,{ "ENTRAJU", "D",  8, 0})
AADD(aStru,{ "ORDEM"  , "N",  4, 0})
AADD(aStru,{ "GERADO" , "C",  1, 0})

cArqTrab := CriaTrab(aStru, .T.)

USE &cArqTrab ALIAS TRB NEW



Parâmetros:
NomeTipoDescriçãoDefault
ObrigatórioReferência
aCampos
Vetor
ArrayArray multidimensional contendo os campos a criar. {Nome, Tipo, Tamanho, Decimal}
lCriaLógicoDetermina se o arquivo de trabalho deve ser criado ( .T.) ou não (.F. ).T.