| Produto: | TOTVS Backoffice |
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | Backoffice |
| Módulo: | Gestão de Contratos |
| Função: | CNTA121 - Medições MATA410 - Pedidos de Venda |
| Ponto de Entrada: | GCTPEDCPO |
| Descrição: | Possibilita ao desenvolvedor determinar quais campos podem ser modificados pelo usuário quando um pedido de venda é oriundo do SIGAGCT | |||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| Eventos: | Executado antes da abertura da tela de alteração dos pedidos de venda | |||||||||||||||
| Programa Fonte: | MATA410.PRW | |||||||||||||||
| Função: | A410Altera | |||||||||||||||
| Parâmetros: | Não há | |||||||||||||||
| Retorno: |
|
#INCLUDE "Protheus.ch"
/*{Protheus.doc} GCTPEDCPO()
Possibilita ao desenvolvedor determinar quais campos podem ser modificados pelo usuário quando um pedido de venda é oriundo do SIGAGCT.
*/
User Function GCTPEDCPO()
Local aResult := Array(2)
If (FindFunction('GCTPVCpos'))
aResult := GCTPVCpos() //Função retorna os campos liberados pelo padrão(incluindo os campos de usuário)
Else
/*Também é possível inicializar o vetor inteiramente:*/
aResult[1] := {"C5_NATUREZ", "C5_CONDPAG"}
aResult[2] := {"C6_ENTREG"}
EndIf
aAdd(aResult[1], "C5_TRANSP")//Adiciona campo a ser liberado no cabeçalho(SC5)
aAdd(aResult[2], "C6_TES")//Adiciona campo a ser liberado nos detalhes(SC6)
Return aResult