Ponto-de-Entrada: A690TITREC - Altera Recursos
| Versões: | Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Idiomas: | Espanhol , Inglês |
Descrição:
LOCALIZAÇÃO : Function A690ScrCol() - Scroll horizontal da tela de alocação.
DESCRIÇÃO : O ponto de entrada 'A690TITREC', permite que o título dos recursos apresentados na rotina de carga máquina sejam alterados. O ponto de entrada recebe como parâmetro o título atual.
Eventos
Programa Fonte
MATA690A.PRX
Sintaxe
A690TITREC - Altera Recursos ( < PARAMIXB[1]> ) --> cRetTitulo
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| PARAMIXB[1] | Caracter | variável caracterer contendo o código e a descrição do recurso que será apresentado carga máquina | X |
Retorno
-
cRetTitulo(caracter)
- Variável caracter que retorna o novo título do recurso a ser apresentado no carga máquina.
Observações
Exemplos
User Function A690TITRECLocal cRetTitRec := PARAMIXB[1]Local cCodRec := SubStr(cRetTitRec,1,TamSx3('H1_CODIGO')[1])If Val(cCodRec) < 100 cRetTitRec := ALLTRIM(cRetTitRec)+' - Antigos'EndIfRETURN cRetTitRec