Perguntas Fechar Janela aRotina após confirmação

Mais
2 anos 11 meses atrás #33224 por GUI_DONEL
Boa noite.

Poderiam dar um help, estou com o fonte a seguir, após confirmar o msexecauto retorna para a tela da função UNI110, preciso que após confirmar a SC, finalize a janela UNI110.

User Function MT110ROT()

Local aRotina := PARAMIXB

ADD OPTION aRotina TITLE "Solicitar de Outra Filial" ACTION "U_UNI110()" OPERATION 3 ACCESS 0

Return aRotina

User Function UNI110()

Local aRet := {}
Local aPergs := {}
Local cFilBkp := Space(TamSx3("C1_FILIAL")[1])

Public cFilAtu := ''
Public cBkpFil

aAdd( aPergs ,{1,"Filial:" ,cFilBkp,,'.T.',"SM0",'.T.',50,.T.})
If ParamBox(aPergs ,"Selecione",aRet)

If cFilAnt <> aRet[1]
cBkpFil := cFilAnt
cFilAtu := aRet[1]

MSExecAuto({|x,y,z| MATA110(x,y,z)},,,3,1)

Else
MsgStop("Obrigatório selecionar filial diferente da filial atual.","Selecione outra filial - "+ProcName())
EndIf
EndIf

Return

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.096 segundos
Joomla templates by a4joomla