Tenho feito migrações do Protheus 12 e tenho deparado com diversos problemas na versão 12.1.7, a minha maior preocupação eram as customizações, mas para a minha surpresa os maiores problemas foram as próprias rotinas padrão do Protheus, e na minha opinião, mesmo depois de tanto tempo se passado desde o seu surgimento, o ERP Protheus 12 ainda é extremamente instável e cheio de surpresinhas escondidas, erros básicos e bem amadores, depois de tantos anos em desenvolvimento ADVPL (19 anos) nunca fiquei tão desanimado com tantos erros.

Hoje irei compartilhar o seguinte problema (Protheus 12 Topconnect Português mas utilizando Ctree), ao tentar abrir ou importar um arquivo DBF o APSDU dá um erro e fecha o APSDU.

*************************************************************************

TOTVS Build 7.00.131227A-20160510 NG
THREAD ERROR ([5376], Administrador, NTADMP12)   20/06/2016   10:55:31
ADS Error - Could not load ACE32.dll. on SDUFILEINFO(APSDU.PRW) 01/03/2016 13:58:37 line : 5785

[build: 7.00.131227A-20160510 NG]
* SVN Revision: 8595 - 10901 - 1288
[platform: x86]
[environment: TESTE]
[thread: 5376]
[rpodb: TOP]
[localfiles: CTREE]
[remark: Protheus Database Utility (Build 20090420) - Logged :admin                    ]
[threadtype: RmtSockThread]
 on SDUFILEINFO(APSDU.PRW) 01/03/2016 13:58:37 line : 5785
Called from SDUFILEINFO(APSDU.PRW) 01/03/2016 13:58:37 line : 5785
Called from {|| lContinue := SDUFileInfo(aLista,aNewList,@cMsgWarn,@cMsgInfo) }(APSDU.PRW) 01/03/2016 13:58:37 line : 5785
Called from {||Eval(bBlock),oDlg:End()}(PTPEND.PRW) 14/10/2010 10:36:04 line : 5785
Called from ::MSDIALOG:ACTIVATE line : 5785
Called from __PTWAITRUN(PTPEND.PRW) 14/10/2010 10:36:04 line : 275
Called from {|message,caption,block| __PtWaitRun(message,caption,block)}(APSDU.PRW) 01/03/2016 13:58:37 line : 275
Called from SDUMULTIIMPORT(APSDU.PRW) 01/03/2016 13:58:37 line : 5559
Called from SDUIEXECUTE(APSDU.PRW) 01/03/2016 13:58:37 line : 2201
Called from {|lOk|lNext:= .T. ,If("TOPCONN"$cRddTrg,(lOk:=!(AllTrim(cDBaseSrc)==AllTrim(cDBaseTrg) .And. AllTrim(cSrvSrc)==AllTrim(cSrvTrg)),If(lOk,(SduChkConnect(@nConn2,cSrvTrg,cDBaseTrg,nPortTrg,,,,,, .T. ),lOk:=(nConn2>=0)),ApMsgAlert(FWI18NLang("APSDU","STR0264",230)))),(If(lOk:=(!Empty(cDirTrg)),,ApMsgAlert(FWI18NLang("APSDU","STR0263",229))))),If(lOk,(oWizard:oNext:Click(),SduIExecute(aLista,cDirTrg,aRddDriver[oRddTrg:nAt],aRddDriver[oRddSrc:nAt],nConn1,nConn2,{cSrvSrc,cDBaseSrc,nPortSrc,__cUserId},{cSrvTrg,cDBaseTrg,nPortTrg,__cUserId}),SDUUnlink(@nConn1),SDUUnlink(@nConn2),lOk:= .F. ),),lOk}(APSDU.PRW) 01/03/2016 13:58:37 line : 2201
Called from {||  If(Eval(Self:aCbValid[Self:nPanel,3]),Self:Navigator(0),)}(APWIZARD.PRW) 04/03/2015 15:22:31 line : 2201
Called from ::MSDIALOG:ACTIVATE line : 2201
Called from FWDIALOGMODAL:ACTIVATE(FWDIALOGMODAL.PRW) 27/01/2016 17:48:54 line : 458
Called from APWIZARD:ACTIVATE(APWIZARD.PRW) 04/03/2015 15:22:31 line : 326
Called from SDUIMPORT(APSDU.PRW) 01/03/2016 13:58:37 line : 2158
Called from {|| SduDisableKeys(), SduImport(), SduEnableKeys()}(APSDU.PRW) 01/03/2016 13:58:37 line : 2158
Called from ::TWINDOW:ACTIVATE line : 2158
Called from MSAPP:ACTIVATE(FWAPP.PRW) 23/02/2016 11:58:00 line : 647
Called from APSDU(APSDU.PRW) 01/03/2016 13:58:37 line : 111
Called from STATICCALL(APSDU.PRW) 01/03/2016 13:58:37 line : 111

Para corrigir este erro, vá na pasta do appserver e em seguida entre na pasta ace_8.00 (\bin\appserver\ace_8.00) e copie todos os arquivos para a pasta do appserver, feito isso abra novamente o APSDU

apsdu


Equipe Blog Advpl

Amantes da tecnologia

2 comentários

mentor · 1 de julho de 2016 às 10:45

Amigo! Agradeço por ter compartilhado conosco a solução dos problemas encontrados. Porém o ace_8.00 já deveria veria vir nativo na pasta appserver. Mas sem isso a TOTVS não gera.

    Equipe Blog Advpl · 4 de julho de 2016 às 07:34

    Pois é, lançaram uma versão totalmente despreparada para está no mercado, mas temos orientado aos nossos clientes em esperar mais um pouco, o prazo para julho do ano que vem é curto, mas é melhor esperar.

Deixe uma resposta