| Produto: |
TOTVS Backoffice
|
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | Serviços |
| Módulo: | TOTVS Backoffice (Linha Protheus) - Planejamento e Controle Orçamentário (SIGAPCO)
|
| Função: | PCOA210 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46030 |
O ponto de entrada PCOA2103 é invocado na tela de configuração dos lançamentos e possibilita a inclusão de campos personalizados no cabeçalho da tela. A função retorna um array com os campos que devem ser adicionados ao cabeçalho, permitindo que o sistema exiba informações adicionais além das configuradas originalmente.
Essa flexibilidade é útil em cenários onde há necessidade de ajustes específicos na interface da tela de lançamentos, sem alterar a estrutura base do sistema.
If ExistBlock( "PCOA2103" )
//P_EÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//P_E³ Ponto de entrada utilizado para adicionar campos no cabecalho ³
//P_E³ Parametros : Nenhum ³
//P_E³ Retorno : Array contendo as os campos a serem adicionados ³
//P_E³ Ex. : User Function PCOA2103 ³
//P_E³ Return {"AL6_FIELD1","AL6_FIELD2"} ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ValType( aUsField := ExecBlock( "PCOA2103", .F., .F. ) ) == "A"
AEval( aUsField, { |x| AAdd( aCposEnch, x ) } )
EndIf
EndIf
User Function PCOA2103()
Local aCampos := {}
// Adiciona campos personalizados ao cabeçalho
AAdd(aCampos, "AL6_FIELD1")
AAdd(aCampos, "AL6_FIELD2")
AAdd(aCampos, "AL6_FIELD3")
Return aCampos
Importante !!