Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

PONTO DE ENTRADA PARA ATRIBUIÇÃO DE VALORES NO ARQUIVO .HTM DE WORKFLOW DE TRANSFERÊNCIA DE BENS (MNTA693)

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

Manufatura.

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas.

Rotina:

Rotina

Nome Técnico

MNTA693

Transferência de Bens

Rotina(s) envolvida(s)

Nome Técnico

MNTA6931

Ponto de Entrada

País(es):

Todos.

Banco(s) de Dados:

Todos.

Sistema(s) Operacional(is):

Todos.

Observação

É necessário ter o arquivo MNTW693.htm no diretório de WorkFlow no servidor e ter editado esse arquivo de forma que as variáveis sejam posicionada nas estruturas desejadas.

Para variáveis fora de tabelas não se utiliza '.' em seu nome.

Para variáveis dentro de tabelas se referencia a linha em que se encontra, se adiciona '.' e se referencia o campo (favor verificar exemplo).

Ponto de Entrada

Descrição:

Ponto de Entrada chamado na rotina de Transferência de Bens(MNTA693), para atribuir valores em variáveis do arquivo .htm de WorkFlow.

Localização:

SIGAMNT: Atualizações/Construção Civil/Transferência/Transferência de Bens.

Programa Fonte:

MNTA693.prx

Função:

MNTA6931()

Parâmetros:

NomeTipoPode AlterarDescrição
oProcessObjeto TWFProcessSim

Objeto para manipular o WorkFlow.

Retorno:
NomeTipoDescriçãoObrigatório
oProcessObjeto TWFProcessRetorna o Objeto alterado para utilização no envio de WorkFlowSim
Bloco de código
languagexml
titleArquivo mntw693.htm
<html>

	<head>
		<title>%strTitulo%</title>
	</head>

	<body bgcolor="#FFFFFF">

		<p><b><font face="Arial">%strTitulo%</font></b></p>
		</u>
		<p><b><font face="Arial">%strEX1%</font></b></p>
		</u>

		<table border=0 WIDTH=655 cellpadding="1">

			<tr>
				<td bgcolor="#FFFFFF" align="left" width="157"><font face="Arial" size="2">%t1l1.strSubTitulo%</font></td>
			</tr>

		</table>

		<br>
		<b><font face="Arial" size="2">Origem</font></b>
		<br><br>

		<table border=0 WIDTH=655 cellpadding="1">

			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Num. ME.</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l1.strNUMME%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Empresa</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l2.strEMPORI%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Filial</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l3.strFILORI%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Equipamento</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l4.strCODBEM%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Nº Série</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l5.strSERIE%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Data</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l6.strDATATR%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Hora</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l7.strHORATR%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Teste</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t2l8.strEX2%</font></td>
			</tr>

		</table>

		<br>
		<b><font face="Arial" size="2">Destino</font></b>
		<br><br>

		<table border=0 WIDTH=655 cellpadding="1">

			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Empresa</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t3l1.strEMPDES%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Filial</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t3l2.strFILDES%</font></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157"><b><font face="Arial" size="2">Observação</font></b></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t3l3.strMOTTRA%</font></td>
			</tr>

		</table>

		<table border=0 WIDTH=655 cellpadding="1">

			<tr>
				<td bgcolor="#EEEEEE" align="left" width="157" colspan="4"><b><font face="Arial" size="2">Exemplo campos inserdos em tabela</font></b></td>
			</tr>
			<tr>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t4l1.1%</font></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t4l1.2%</font></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t4l1.3%</font></td>
				<td bgcolor="#EEEEEE" align="left" width="420"><font face="Arial" size="1">%t4l1.4%</font></td>
			</tr>

		</table>

	</body>

</html>
Bloco de código
titleExemplo do Ponto de Entrada MNT6931
User Function MNTA6931()

	Local oProcess := ParamIXB[1] // objeto oProcess
	Local nI

	// inserindo o valor 'Campo fora de tabela' na variavel strEX1
	oProcess:oHTML:ValByName( 'strEX1', 'Campo fora de tabela' )

	// inserindo o valor 'Campo dentro de tabela' na variavel t2l8.strEX2 ( deve sempre estar referenciada a tabela se for campo em tabela )
	aAdd( oProcess:oHTML:ValByName( 't2l8.strEX2' ), 'Campo dentro de tabela' )

	// inserindo valores de modo dinâmico em tabela que contem apenas uma linha, baseia-se nos campos dessa linha para inserir outras novas linhas.
	// no exempo se inserem 10 linhas com quatro campos.
	For nI := 1 To 10

		aAdd( (oProcess:oHTML:ValByName( 't4l1.1') ), cValToChar( nI ) + '. Geração de campo em tabela 1' )
		aAdd( (oProcess:oHTML:ValByName( 't4l1.2') ), cValToChar( nI ) + '. Geração de campo em tabela 2' )
		aAdd( (oProcess:oHTML:ValByName( 't4l1.3') ), cValToChar( nI ) + '. Geração de campo em tabela 3' )
		aAdd( (oProcess:oHTML:ValByName( 't4l1.4') ), cValToChar( nI ) + '. Geração de campo em tabela 4' )

	Next

Return oProcess