Histórico da Página
AT740INITD - Carga de dados no orçamento de serviços.
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviços | ||||
Módulo: | Gestão de Serviços | ||||
Rotina: |
| ||||
Ponto de Entrada: | AT740INITD |
...
Exemplo:
#Include 'Protheus.ch'
User
...
Function AT740INITD(
...
)
Local oMdlTeste := Paramixb[1]:GetModel("TXX_TESTE") //Carrega o
...
MsgAlert(/*Mensagem*/, /*Titulo*/)
...
submodelo
Local nw
If !oMdlTeste:isEmpty() //Verifica se há dados no modelo
For nw := 1 to oMdlTeste:Length() //Percorre todas as linhas da grid
oMdlTeste:GoLine(nw) //Posiciona na linha
oMdlTeste:LoadValue("TXX_NOME", "TESTE") //Carrega o valor
//...
Next nw
EndIf
Return
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas