01. DADOS GERAIS
| Produto: | |
|---|
| Linha de Produto: | | Linhas_totvs |
|---|
| Segmento | Distribuição |
|---|
| Region | Construção Projetos |
|---|
| Linha | Linha Protheus |
|---|
|
|
|---|
| Segmento: | |
|---|
| Módulo: | SIGAGPE |
|---|
| Função: | CSAA100.PRW |
|---|
| Ticket: | 8997835 |
|---|
| Requisito/Story/Issue (informe o requisito relacionado) : | DRHGCH-19365 |
|---|
02. SITUAÇÃO/REQUISITO
Utilizando o ExecAuto da rotina CSAA100 com a opção “4-alteração” para alteração da descrição do departamento, é sempre apresentada a mensagem que não encontrou o registro, mesmo estando posicionado.
03. SOLUÇÃO
O erro ocorre pois a descrição faz parte da chave primária da tabela. Sendo assim, foi alterada a rotina de forma que o registro é posicionado através da Filial e Código do Departamento para assim realizar o processamento da alteração da descrição ou qualquer outro campo.
| Totvs custom tabs box |
|---|
|
| Totvs custom tabs box items |
|---|
| default | yes |
|---|
| referencia | passo1 |
|---|
| Exemplo de chamada da execauto:
#Include "TOTVS.ch"
#Include "TBICONN.ch" User Function TSTCSAA100()
Local nOpr := 4
Local aHeader := {}
Local aArea := {}
Private lMsErroAuto := .F.
Private lMsHelpAuto := .T.
aArea := GetArea()
AAdd(aHeader, {"QB_FILIAL" , "D MG " , NIL})
AAdd(aHeader, {"QB_DEPTO" , "000000003", NIL})
AAdd(aHeader, {"QB_DESCRIC", "DESCRIÇÃO ALTERADA COM SUCESSO" , NIL})
MsExecAuto({|w, x, y, z| CSAA100(w, x, y, z)}, NIL, NIL, aHeader, nOpr)
If (lMsErroAuto == .T.)
MostraErro()
ConOut(Repl("-", 80))
ConOut(PadC("CSAA100 - Execauto finalizada com erros", 80))
ConOut(PadC("Termino: " + Time(), 80))
ConOut(Repl("-", 80))
Else
ConOut(Repl("-", 80))
ConOut(PadC("CSAA100 - Execauto finalizada com sucesso", 80))
ConOut(PadC("Termino: " + Time(), 80))
ConOut(Repl("-", 80))
EndIf
RestArea(aArea)
Return |
| Totvs custom tabs box items |
|---|
| default | no |
|---|
| referencia | passo2 |
|---|
| |
|
N/A
05. ASSUNTOS RELACIONADOS
| HTML |
|---|
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after {
background: #FF9900; !important
}
.menu-item.active-tab {
border-bottom: none !important;
}
</style>
|
