P144ITM - Manipulação dos dados das grids de resultados e documentos

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):

Nome	Tipo	Descrição	Default
PARAMIXB[1]	Caractere	Grid na qual será adicionado os dados.	"AtuResulta" - Grid de resultados "AtuDocs" - Grid de documentos
PARAMIXB[2]	Caractere	Ticket que está sendo consultado os documentos
PARAMIXB[3]	Caractere	Produto que está carregando os dados
PARAMIXB[4]	Array	Array com os dados que serão adicionados na grid
PARAMIXB[5]	Numérico	Posição do item que está sendo alterado no momento da chamada
PARAMIXB[6]	Numérico	Posição do item que está sendo atualizado no momento da chamada (Usar no lugar do parâmetro PARAMIXB[5] quando for maior que 0)	0
PARAMIXB[7]	Lógico	Indica se usa multi empresa ou não

Idiomas:

Todos

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

O ponto de entrada P144ITM permite o usuário manipular os dados que serão carregados na grid de resultados e documentos.

Localização:

Funções AtuResulta e AtuDocs do fonte PCPA144.prw

Eventos:

Permite manipular os dados da grid, inserido em valores em colunas personalizadas.

Programa Fonte:

PCPA144.prw

Sintaxe:

P144ITM( ) → aResults

Retorno:

Deve retornar um array com os valores que serão inseridos na grid.

Observações:

O array que será retornado para exibir no grid deve seguir a estrutura apresentada a seguir:

Grid Resultados (Sem Multi Empresa)

Grid Resultados (Com Multi Empresa)

Grid Documentos (Sem Multi Empresa)

Grid Documentos (Com Multi Empresa)

Posição	Campo
1	Período
2	Estoque
3	Entradas
4	Saídas
5	Saída Estrut.
6	Saldo Final
7	Necessidade
8 → n-1	Campos Personalizados
n	Cor da Linha na Grid

Considerar n o tamanho do array

Posição	Campo
1	Período
2	Estoque
3	Entradas
4	Saídas
5	Saída Estrut.
6	Transf. Entrada
7	Transf. Saída
8	Saldo Final
9	Necessidade
10 → n-1	Campos Personalizados
n	Cor da Linha na Grid

Considerar n o tamanho do array

Posição	Campo
1	Número
2	Necessidade Original
3	Estoque
4	Baixa
5	Empenho
6	Substituição
7	Quantidade
8	Armazém
9	Entrega
10	Início
11	Tipo Pai
12	Documento Pai
13	Produto Pai
14	TRT
15	Revisão
16	Roteiro
17	Operação
18	Tp. Doc. ERP
19	Documento ERP
20	Versão da Produção
21 → n-5	Campos Personalizados
n-4	Chave
n-3	Chave Subst.
n-2	Seq. Quebra
n-1	Cor da Linha na Grid
n	Nil

Considerar n o tamanho do array

Posição	Campo
1	Filial
2	Número
3	Necessidade Original
4	Estoque
5	Baixa
6	Empenho
7	Substituição
8	Transf. Entrada
9	Transf. Saída
10	Quantidade
11	Armazém
12	Entrega
13	Início
14	Tipo Pai
15	Documento Pai
16	Produto Pai
17	TRT
18	Revisão
19	Roteiro
20	Operação
21	Tp. Doc. ERP
22	Documento ERP
23	Versão da Produção
24 → n-5	Campos Personalizados
n-4	Chave
n-3	Chave Subst.
n-2	Seq. Quebra
n-1	Cor da Linha na Grid
n	Nil

Considerar n o tamanho do array

#INCLUDE "PROTHEUS.CH"  

User Function P144COL()
    Local aCabPers := {}
    Local cGridSel:= PARAMIXB[1]
    Local aHeadSel:= PARAMIXB[2]

    If cGridSel == "gridResult"
        aAdd(aCabPers, {"Novo Campo",;            // [1] Título
                            "Z1_QUANT",;          // [2] Campo
                            "@E 99,999,999.999",; // [3] Picture
                            12,;                  // [4] Tamanho
                            3,;                   // [5] Decimal
                            "",;                  // [6] Validação
                            "û",;                 // [7] Reservado
                            "N",;                 // [8] Tipo
                            ""})                  // [9] Reservado
    ElseIf cGridSel == "gridDocs"
        aAdd(aCabPers, {"Novo Campo",;            // [1] Título
                        	"Z1_QUANT",;          // [2] Campo
                            "@E 99,999,999.999",; // [3] Picture
                            12,;                  // [4] Tamanho
                            3,;                   // [5] Decimal
                            "",;                  // [6] Validação
                            "û",;                 // [7] Reservado
                            "N",;                 // [8] Tipo
                            ""})                  // [9] Reservado
    EndIf

Return aCabPers