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>
|