Árvore de páginas

Ao incluir uma doença pela rotina da Ficha Médica ocorre erro.

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços.

Módulo:

Medicina e Segurança do Trabalho.

Função:

MDTA110.

Situação/Requisito:

Ao entrar pela rotina da ficha médica, seleciona a opções de Diagnóstico, em seguida Ocorrências da Ficha e por fim Doenças. Tentar incluir uma doença ocorre erro:
THREAD ERROR (roberta.borchardt, NG022-PC) 13/10/2016 16:45:07
variable does not exist ASIZE on INDOE110(MDTA110.PRX) 08/07/2016 15:30:30 line : 1075
[TOTVS build: 7.00.131227A-20160331]
Called from FWMBROWSE:EXECUTE(FWFORMBROWSE.PRW) 31/05/2016 18:21:06 line : 1063
Called from { || OSELF:EXECUTE("INDOE110", 3, 0,"INCLUIR", 3,"","INCLUIR","", 3) } line : 578
Called from ::MSDIALOG:ACTIVATE
Called from FWMBROWSE:ACTIVATE(FWMBROWSE.PRW) 11/08/2016 16:09:38 line : 669
Called from FWMBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 12664
Called from MBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 170
Called from DOENCAS(MDTA110.PRX) 08/07/2016 15:30:30 line : 994
Called from FWMBROWSE:EXECUTE(FWFORMBROWSE.PRW) 31/05/2016 18:21:06 line : 1063
Called from { || OSELF:EXECUTE("DOENCAS", 4, 0,"DOENCAS", 5,"","DOENCAS","", 5) } line : 578
Called from ::MSDIALOG:ACTIVATE
Called from FWMBROWSE:ACTIVATE(FWMBROWSE.PRW) 11/08/2016 16:09:38 line : 669
Called from FWMBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 12664
Called from MBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 170
Called from MDTA110P(MDTA110.PRX) 08/07/2016 15:30:30 line : 121
Called from {|| MDTA110P('MDTA155')} line : 12052
Called from eval line : 1613
Called from {|X|X:=FWBARRETSELF(1),X:OBTNFOCUS:CLICK(),EVAL(ABTNTMPITEM[2],X:OBTNRELACIONAL ),X:OBTNFOCUS2:CLICK() } line : 1613
Called from ::MSDIALOG:ACTIVATE
Called from MDT155DIA(MDTA155.PRX) 19/01/2016 17:52:05 line : 2196
Called from NG155CHKD(MDTA155.PRX) 19/01/2016 17:52:05 line : 261
Called from FWMBROWSE:EXECUTE(FWFORMBROWSE.PRW) 31/05/2016 18:21:06 line : 1063
Called from { || OSELF:EXECUTE("NG155CHKD", 3, 0,"INCLUIR", 3,"","INCLUIR","", 3) } line : 578
Called from ::MSDIALOG:ACTIVATE
Called from FWMBROWSE:ACTIVATE(FWMBROWSE.PRW) 11/08/2016 16:09:38 line : 669
Called from FWMBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 12664
Called from MBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 170
Called from MDT155BRW(MDTA155.PRX) 19/01/2016 17:52:05 line : 191
Called from MDTA155A(MDTA155.PRX) 19/01/2016 17:52:05 line : 113
Called from NG005DIA(MDTA005.PRX) 29/06/2016 14:39:46 line : 187
Called from FWMBROWSE:EXECUTE(FWFORMBROWSE.PRW) 31/05/2016 18:21:06 line : 1063
Called from { || OSELF:EXECUTE("NG005DIA", 6, 3,"DIAGNOSTICO", 6,"","DIAGNOSTICO","", 6) } line : 578
Called from ::MSDIALOG:ACTIVATE
Called from FWMBROWSE:ACTIVATE(FWMBROWSE.PRW) 11/08/2016 16:09:38 line : 669
Called from FWMBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 12664
Called from MBROWSE(MSLIB.PRW) 30/09/2016 13:19:22 line : 170
Called from MDTA005(MDTA005.PRX) 29/06/2016 14:39:46 line : 145
Called from __EXECUTE(APLIB090.PRW) 14/07/2016 09:52:18 line : 581
Called from MDIEXECUTE(APLIB260.PRW) 06/06/2016 16:11:42 line : 806

Solução/Implementação:

Alterado validação para não ocorrer erro ao incluir doenças.