Árvore de páginas

Descrição

Ponto de Entrada para gravação de campos customizados durante a Geração da Carga Inteira e Incremental.

O valor do campo customizado será gravado no arquivo CSV no momento da geração da Carga.
E no momento da baixa da Carga será gravado na tabela da Central de PDV ou do Totvs PDV.

Como montar o conteúdo

ParamIxb[1]: Array com todos os campos da tabela, inclusive os customizados;
ParamIxb[2]: Prefixo da tabela, ex.: B1, A1, MBV, etc ;

Para localizar se o campo sutomizado existe no 


Parâmetros

ParamIxb[1]  - Array com todos os campos da tabela, inclusive os customizados;

ParamIxb[2]  - Prefixo da tabela, ex.: B1, A1, MBV, etc .

Retorno

aRet - Array multidimensional com nome do campo na primeira posição e o seu valor na segunda posição.

eRet[1][1] = "B1_XCOMPL" 
eRet[1][2] = "CAMPO CUSTOMIZADO"

Exemplo

#INCLUDE "PROTHEUS.CH"

User Function LJ1146GRVC()
Local   aStruct        := ParamIxb[1] // - Estrutura da tabela
Local   cTablePrefix:= ParamIxb[2] // - Prefixo da tabela
Local   nCount       := 0
Local   aRet            := {}                 // Retorno- Campo e Valor

For nCount := 1 To Len(aStruct)
    If aStruct[nCount][1] == cTablePrefix + "_XCOMPL"
        aadd(aRet, {aStruct[nCount][1], "campo customizado"})
    ElseIf aStruct[nCount][1] == cTablePrefix + "_XCOMPL1"
        aadd(aRet, {aStruct[nCount][1], "campo customizado 1"})
    Endif
Next

RETURN aRet

Programa Fonte

LOJA1146.PRW

Versão

P12 ou Superior