Histórico da Página

#Include 'PROTHEUS.CH'

User Function NGTWFPro()

    Local oProcess := ParamIXB[1] // objeto oProcess
	Local cOrigin  := ParamIXB[2]
    Local nI      nIndex := 0
	
	If cOrigin == 'MNTA693'
   		
		//Valor 'WorkFlow Transferência de Veículos via Construção Civil' na variável strEX1
	    oProcess:oHTML:ValByName( 'strEX1', 'WorkFlow Transferência de Veículos via Construção Civil' )

    	//Inserido campo centro de custo do registro posicionado da TQ2 na variavel t2l8.strEX2
	    aAdd( oProcess:oHTML:ValByName( 't2l8.strEX2strCCusto' ), TQ2->TQ2_CCUSTO )

// titulo inserido antes da montagem da tabela.
oProcess:oHTML:ValByName(  	'strEX2', 'Exemplo campos inserdos em tabela' )

//Inseridos valores de modo dinâmico em tabela html que contém apenas uma linha, baseia-se nos campos dessa linha para inserir outras novas linhas.
	    //Abaixo inserem-se 10 linhas com quatro campos.
    	For nInIndex := 1 To 10

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

	    NextNext nIndex

	EndIf

Return oProcess