Histórico da Página

...

IF !Empty(cMsgPedi) .AND. !IsBlind()
        If APMSGYESNO("Existe(m) pedido(s) com divergência de Filial. Deseja continuar gerando a carga("+Alltrim(cCodViag)+")?"+ENTER+cMsgPedi)
                 lRet := .T.
        Else
        cErro += "PE OMSCPL7D: Problema na geração da carga."
        lRet := .F.
        EndIF

        EndIF RestArea(aAreaDK0)

return {lRet, cErro}

------

...