Árvore de páginas

Versões comparadas

Chave

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

...

Bloco de código
languagesql
titleExemplo do Ponto de Entrada MNT6931
linenumberstrue
User Function MNTA6931()

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

    //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.strEX2' ), TQ2->TQ2_CCUSTO )

    //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 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