| 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: | PCOA462 |
| País: | Brasil |
| Ticket: | Interno |
| Requisito/Story/Issue | DSERCTR1-46030 |
O ponto de entrada PCOA4623 permite a inclusão de campos personalizados no cabeçalho da tela de Relacionamento entre Grupos de Verbas. Esse ponto de entrada é utilizado para estender a funcionalidade da tela, permitindo a adição de campos além dos que já estão previamente configurados.
If ExistBlock( "PCOA4623" )
//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 PCOA4623 ³
//P_E³ Return {"AM6_FIELD1","AM6_FIELD2"} ³
//P_EÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
If ValType( aUsField := ExecBlock( "PCOA4623", .F., .F. ) ) == "A"
AEval( aUsField, { |x| AAdd( aCposEnch, x ) } )
EndIf
EndIf
User Function PCOA4623()
Local aCampos := {}
// Adicionando campos personalizados ao cabeçalho da tela
AAdd(aCampos, "AM6_DESPAI") // Campo "Descrição Pai"
AAdd(aCampos, "AM6_PERC") // Campo "Percentual"
// Retornando o array de campos
Return aCampos
Importante !!