Histórico da Página
...
02. DESCRIÇÃO
Criado ponto de entrada MDTA210A1 na rotina de Laudos (MDTA210) para que seja possível incluir novas opções de atalhos.
03. SOLUÇÃO
| Ponto de Entrada | MDTA210A1() |
|---|---|
Chamada | Ao acessar a aba de Conteúdo na rotina de Laudos (MDTA210). |
| Pré-Requisito | Cadastrar um Laudo. |
| Evento | Inclusão de novas opções de atalhos no conteúdo do Laudo. |
| Retorno | Não há. |
...
| Função | MDTA210A1() |
|---|---|
| Parâmetros | nTipoLaudo, contador, número do laudo correspondente. |
| Retorno | Não há. |
Descrição da variável:
nTipoLaudo: Número do laudo correspondente.
- Número dos laudos: 1. PPRA / 2. PCMSO / 3. L.T. Pericial / 4. LTCAT / 5. DIRBEN 8030 / 6. PGR / 7. PCMAT / 8. PPR / 8. B. Resíduos de Serviço de Saúde e Resíduos / 10. PAE / 12. Ergonomia
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE#include "Protheus.ch" #INCLUDE "SGAA530protheus.ch" User Function SGAA5301(aCabPE, aItensPE, nOpcaoPE) MDTA210A1 Local Local aParam nTipoLaudo := PARAMIXB Local aCabPE :={} Local aItensPE :={} Local nOpcaoPE :={} If !Empty(aParam) aCabPE := aParam[1] aItensPE := aParam[2] MsgInfo('Variável que apresenta o número correspondente ao nOpcaoPEtipo do := aParam[3] //Adiciona campos na SC5 aAdd( aCabPE , {"C5_VEND1" , '000001' , NIL} ) //Adiciona campos na SC6 aAdd( aItensPE[1] , {"C6_COMIS2" , 1 , NIL} ) EndIf Return {aCabPE, aItensPE}laudo:'+'' + nTipoLaudo, 'Ponto de Entrada MDTA210A1') Return nil |
04. ASSUNTOS RELACIONADOS
| Templatedocumentos |
|---|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas