Perguntas Função PutMv / GetMv

Bom Dia Caros!

Gostaria de um exemplo em advpl que faça uma pergunta ao usuario e grave a resposta.

Ex.:

Digite o nome ou parte do nome da transportadora:

A resposta do usuário, grave em um parâmetro (MV_DTRANS)

Grato,
Felipe

Felipe,

A sintaxe seria : PUTMV("MV_DTRANS", conteúdo que vc quer gravar no parâmetro )

Veja exemplo do tdn --> http://tdn.totvs.com.br/pages/viewpage.action?pageId=24347029

At.

Marcelo,

Esta parte eu entendi, porém o conteúdo deve ser informado pelo usuário.

Gostaria de um exemplo advpl com as funções para fazer a pergunta ao usuário.

desde já, grato,
Felipe

Felipe,

Monte uma tela mais ou menos assim....

/ 1 2 3 4
If MsgNoYes("Deseja utilizar um novo TES para o novo pedido ?")
DEFINE MSDIALOG oDlg TITLE "Troca TES" FROM 000, 000 TO 250, 400 COLORS 0, 16777215 PIXEL

@ 030, 019 SAY oSay1 PROMPT "Informe o novo TES" SIZE 053, 010 OF oDlg COLORS 0, 16777215 PIXEL
@ 040, 019 MSGET _cTes SIZE 020, 010 OF oDlg COLORS 0, 16777215 PIXEL
@ 055, 019 SAY oSay2 PROMPT "Observação" SIZE 044, 010 OF oDlg COLORS 0, 16777215 PIXEL
@ 065, 019 MSGET _cObs SIZE 145, 010 OF oDlg COLORS 0, 16777215 PIXEL

DEFINE SBUTTON oSButton1 FROM 095,160 TYPE 01 OF oDlg ENABLE ACTION Processa( {|| PROC_COPY(_cTES,_cObs) })
DEFINE SBUTTON oSButton2 FROM 095,117 TYPE 02 OF oDlg ENABLE ACTION Close(oDlg)

ACTIVATE MSDIALOG oDlg CENTERED

Isso mesmo que eu precisava!

Muito obrigado Luiz Alberto