Árvore de páginas

FALHA NA GERAÇÃO DE VIAGEM CASO NÃO EXISTA O PARÂMETRO MV_ITMSDMD NO SISTEMA

Linha de Produto:

Microsiga Protheus

Segmento:

Supply Chain - Logística

Módulo:

SIGATMS

Função:

TMSXFUND - Função Genérica

Situação/Requisito:

Ao confirmar o complemento de viagem de entrega, o sistema apresenta falha na gravação quando o parâmetro MV_TMSALOC = T.

Analisando o fonte TMSXFUND observou-se que, quando o parâmetro MV_ITMSDMD não existe no dicionário, o sistema assumia seu conteúdo padrão para verdadeiro (= .T. ). Na gravação, gerava a falha abaixo:

Error : 208 (S0002) (RC=-1) - [Microsoft][ODBC SQL Server Driver][SQL Server]Nome de objeto 'DL9' inválido.
( From tMSSQLConnection::GetQueryFile )
Thread ID [11284] User [Administrador] IO [2586] Tables [75] MaxTables [76] Comment [TMSA144D - TCPIP - ThreadID(11164)] SP [ ] Traced [No] SQLReplay [No] InTran [No] DBEnv [MSSQL/MP12_1_17] DBThread [(SPID 55,56,57,58)] Started [05/11/2018 14:38:47] IP [127.0.0.1:1972] IDLE [ ] InTransact [ ] Memory [853832] Running [ROP_QUERY] RCV [399004] SND [470973] TCBuild [20180606-20180904] TCVersion [18.1.1.3] ARCH [64] OS [WINDOWS] BUILD [RELEASE]
SELECT DL9.DL9_COD,DL9.DL9_DATINI,DL9.DL9_HORINI,DL9.DL9_DATFIM,DL9.DL9_HORFIM FROM DL9 WHERE DL9.DL9_FILIAL = ' ' AND DL9.DL9_CODMOT = 'PAM002' AND DL9.DL9_STATUS <> '4' AND DL9.DL9_STATUS <> '5' AND ((' ' BETWEEN DL9.DL9_DATINI AND DL9.DL9_DATFIM AND ' ' BETWEEN DL9.DL9_HORINI AND DL9.DL9_HORFIM) OR (' ' BETWEEN DL9.DL9_DATINI AND DL9.DL9_DATFIM AND ' ' BETWEEN DL9.DL9_HORINI AND DL9.DL9_HORFIM) OR ((DL9.DL9_DATINI BETWEEN ' ' AND ' ') AND (DL9.DL9_DATFIM BETWEEN ' ' AND ' ') AND (DL9.DL9_HORINI BETWEEN ' ' AND ' ') AND (DL9.DL9_HORFIM BETWEEN ' ' AND ' ') )) AND DL9.DL9_COD NOT IN (SELECT DF8.DF8_PLNDMD FROM DF8010 DF8 WHERE DF8.DF8_FILIAL = ' ' AND DF8.DF8_VIAGEM = '004488' AND DF8.D_E_L_E_T_ = ' ') AND DL9.D_E_L_E_T_ = ' ' on TMSVLDMOTP(TMSXFUND.PRW) 30/10/2018 11:22:03 line : 7319

[build: 7.00.131227A-20180727 NG]
* SVN Revision: 10987 - 19991 - 2049
[platform: x86]
[environment: MP12_1_17]
[thread: 11164]
[dbthread: 11284]
[rpodb: SQL]
[localfiles: CTREE]
[remark: Emp :01/01 Logged :Administrador SIGATMS Obj :TMSA144D - Viagens (modelo 2)]
[threadtype: RmtSockThread]
on TMSVLDMOTP(TMSXFUND.PRW) 30/10/2018 11:22:03 line : 7319
Called from TMSVLDMOTP(TMSXFUND.PRW) 30/10/2018 11:22:03 line : 7319
Called from AMOTPLANEJ(TMSA240.PRW) 30/10/2018 16:32:05 line : 8476
Called from AMOTTUDOK(TMSA240.PRW) 30/10/2018 16:32:05 line : 3706

Solução/Implementação:

 Realizado ajuste na função TMSVldMotP da rotina TMSXFUND definindo o conteúdo default do parâmetro MV_ITMSDMD como Falso para evitar erro caso o parâmetro não exista no sistema.

Requisito:DLOGTMS03-5199