Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Renata Aparecida Teodoro de Santana

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Renata Aparecida Teodoro de Santana

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

01. DADOS GERAIS

Produto:

Solucoes_totvs
SolucaoTOTVS Prestadores de Serviços Terceirização

Linha de Produto:

Linhas_totvs
SegmentoDistribuição
RegionConstrução Projetos
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoServiços

Módulo:Gestão de Serviços
Função:TECA894 – Controle de Uniformes
Ticket:Não há.
Requisito/Story/Issue (informe o requisito relacionado) :DSERSGS-9616


02. SITUAÇÃO/REQUISITO

Necessidade de implementar manutenções específicas no processamento de uniformes após a exclusão da requisição de uniformes.

03. SOLUÇÃO

Implementado o ponto de entrada Ex894Rec que é acionado ao final da função padrão At894Excl, após a operação de exclusão da requisição de uniformes.


Este ponto de entrada recebe os seguintes parâmetros:

Parâmetro

Descrição

NTXCRec

Variável numérica com o RECNO do registro processado, da tabela TXC – Cabeçalho Gestão de Uniformes.

NTXDRec

Variável numérica com o RECNO do registro processado, da tabela TXD – Itens Gestão de Uniformes.

NTXERec

Variável numérica com o RECNO do registro processado, da tabela TXD – Itens Troca Gestão de Uniformes. (quando houver).


Este ponto de entrada não possui retorno.


Os números dos registros (RECNOS) estarão disponíveis no PARAMIXB, na ordem descrita no quadro acima.


Bloco de código
#include 'protheus.ch'
#include 'totvs.ch'

#Define CRLF CHR(13)+CHR(10)

User Function Ex894Req()

Local   cMsg := 'Os registros (RECNOS) manipulados no processo de exclusao foram: '+CRLF
        cMsg += CRLF
        cMsg += 'TXC (Cabecalho Gestao de Uniformes): '+Str(PARAMIXB[1])+' '+CRLF
        cMsg += 'TXD (Itens Gestao de Uniformes): '+Str(PARAMIXB[2])+' '+CRLF
        cMsg += 'TXE (Itens Troca Gestao de Uniforme): '+Str(PARAMIXB[3])+' '+CRLF

Aviso('Exclusao de Requisicao de Uniformes', cMsg,{'OK'},2)
    
Return



04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

  • Não há.



Templatedocumentos


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>