Histórico da Página
| Composition Setup |
|---|
import.css=/download/attachments/327912/newLayout.css |
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: FT400VCP - Tela do contrato de parceria
Descrição: O ponto de entrada FT400VCP será executado antes da abertura da tela do contrato de parceria e tem como finalidade permitir ao usuário manipular os valores do cabeçalho (ADA) e itens (ADB) através das rotinas de Alteração, Exclusão, Cópia e Encerramento. Programa Fonte FATA400.PRW Sintaxe FT400VCP - Tela do contrato de parceria ( [ nRotMnu ], [ lNewCP ] ) --> Nil Parâmetros:
Retorno
Exemplos User Function FT400VCP()Local _nRotMnu := ParamIxb[1] //Rotina do menuLocal _lNewCP := ParamIxb[2] //Se irá gerar novo contrato no encerramentoLocal _nPosQtd := aScan(aHeader,{|x| AllTrim(x[2])=="ADB_QUANT"})If _nRotMnu == 7 .And. _lNewCP Alert("Passou pelo PE: FT400VCP") M->ADA_MOEDA := 2 aCols[1][_nPosQtd] := 100EndIfReturn Variáveis
|
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas