TMCPOEDI - Adiciona Campos na Tela Mark Browse

Este Ponto de Entrada, localizado no TMSA050 (Entrada de Notas Fiscais do Cliente ), permite ao usuário adicionar campos para serem exibidos na tela de Mark Browse, quando informado um remetente que existam notas fiscais desse remetente recebidas via EDI.

TMSA050.PRW

TMCPOEDI - Adiciona Campos na Tela Mark Browse ( ) --> aCampos

aCampos(vetor)
• Retorna um array com duas dimensões, sendo que a primeira dimensão representa o Título dos campos e a segunda dimensão representa os dados referentes aos títulos informados.

O ponto de entrada deverá  retornar um array com duas dimensões, sendo que a primeira dimensão representa o Título dos campos e a segunda dimensão representa os dados referentes aos títulos informados.

User Function TMCPOEDI()Local aCampos := {}//Nesta primeira linha do vetor deverão ser informados os Título dos Campos.AAdd( aCampos, { 'DE5_CGCREM',;       'DE5_NOMREM',;       'DE5_NOMDES',;       'DE5_TIPFRE',;       'DE5_TIPTRA',;       'DE5_STATUS'} ) //Nesta segunda linha do vetor deverão ser informados os Campos ou funcões para retornar um dado.AAdd( aCampos, { DE5->DE5_CGCREM,;                              Posicione('SA1',3,xFilial('SA1')+DE5->DE5_CGCREM,'A1_NREDUZ'),;Posicione('SA1',3,xFilial('SA1')+DE5->DE5_CGCDES,'A1_NREDUZ'),;                              DE5->DE5_TIPFRE,;                              DE5->DE5_TIPTRA,;                              DE5->DE5_STATUS} )Return aCampos