Histórico da Página
PONTO DE ENTRADA QUE PERMITE INIBIR CAMPOS DA TABELA STL NA GETDADOS.
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Manufatura | ||||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||||
Rotina: |
| ||||||||
Chamados Relacionados | V11: TRYIXJ | ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de Entrada que possibilita inibir campos da STL na GetDados. | ||||||||
Localização: | SIGAMNT: Atualizações/Controle de Oficina/Retorno de O.S./Retorno Mod.2 | ||||||||
Eventos: | Retorno de O.S. Mod. 2 (MNTA435) | ||||||||
Programa Fonte: | MNTA435.PRX | ||||||||
Função: | MNTA435E() | ||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function MNTA435E()
Local aArray := ParamIXB
If AllTrim(cUserName) <> "JOAO"
aArray := {"TL_CUSTO"}
EndIf
Local aArea := GetArea()
Local aAreaSX3 := SX3->(GetArea())
dbSelectArea("SX3")
dbSetOrder(2)
If dbSeek("TL_CUSTO")
If ( X3Uso(SX3->X3_USADO) .And. cNivel < SX3->X3_NIVEL )
aAdd( aArray, SX3->X3_CAMPO )
EndIf
End
RestArea(aAreaSX3)
RestArea(aArea)
Return aArray