Estou com problema na MSExecAuto( {|X,Y,Z| CTBA102(X,Y,Z)} ,aCab ,aItens, 3) onde ocorre erro e a função Mostraerro() retorna uma string em branco, aí não consigo saber que erro ocorre.
Estou com problema na MSExecAuto( {|X,Y,Z| CTBA102(X,Y,Z)} ,aCab ,aItens, 3) onde ocorre erro e a função Mostraerro() retorna uma string em branco, aí não consigo saber que erro ocorre.
Teste ver o erro usando GetAutoGRLog().
Exemplo de um trecho:
IF lMsErroAuto RecLock('SZ2',.F.) aErro := GetAutoGRLog() FOR nX := 1 to Len(aErro) cRet += aErro[nX]+CHR(13)+CHR(10) NEXT nX SZ2->Z2_LOG := cRet SZ2->Z2_IMPORT := 'E' AADD(aError,{SZ2->Z2_OPMES, SZ2->Z2_PRODUTO, SZ2->Z2_ATIVID, cRet}) //CONOUT('Erro 2') MsUnlock() Else RecLock('SZ2',.F.) SZ2->Z2_IMPORT :='S' //CONOUT('Funcionou 2') MsUnlock() ENDIF
Muito obrigado! Nunca ia imaginar que a MostraErro() não funcionava para alguns casos.
— Marcos Bispo Abrahão 29 de Apr de 2022