Árvore de páginas

Versões comparadas

Chave

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



Tempo aproximado para leitura: 02 min


01. DADOS GERAIS

Linha de Produto:Microsiga Protheus
Segmento:RH
Módulo:SIGAGPE
Função:

GPEA010

Issue:DRHGCH-12068
Pacote:



02. SITUAÇÃO/REQUISITO

Quando o cadastro não foi efetivado devido a queda inesperada do serviço appserver, rotina de Cadastro de Funcionário sugere matrícula incorreta; 

03. SOLUÇÃO

Após queda inesperada do serviço appserver, na camada advpl não será possível fazer  uma nova execução, um novo comando. Ao cair o serviço, o sistema não faz novas transações. 
Para solucionar lacunas que venha acontecer devido esse situação, é recomendado a utilização através da rotina APCCFG110 - Atualizar SXE / SXF, consequentemente a sequencia da numeração automática, ficará correta.
Foi implementada  o ponto de entrada, CRIASXE() . Este por sua vez, não realiza a contagem e não altera a SXE/SXF, ele permite que o usuário insira o valor da próxima matricula; caso não informado, o sistema prossegue com a contagem existente.

04. DEMAIS INFORMAÇÕES

Numeração automática  : http://tdn.totvs.com/pages/releaseview.action?pageId=30941114
Criar Ponto de Entrada:  CRIASXE(): http://tdn.totvs.com/pages/releaseview.action?pageId=6815179 
Adicionar submenu : Personalização de menus


Bloco de código
languagec#
titleExemplo de utilização:
linenumberstrue
#include 'protheus.ch'

user function CRIASXE()


Local paramixb := {"SRA", "RA_MAT", "00057", 1}


Local cNum := ""


Local aArea := getarea()


Local aArea2 := {}


Local cAlias := paramixb[1]


Local cCpoSx8 := paramixb[2]


Local cAliasSx8 := paramixb[3]


Local nOrdSX8 := paramixb[4]


Local cUsa := "SRA"


if cAlias $ cUsa .and. ! ( Empty(cAlias) .and. empty(cCpoSx8) .and. empty(cAliasSx8) )


dbselectarea(cAlias)

 
aArea2 := getarea()

 

dbsetorder(nOrdSX8)

 
dbseek(xfilial()+"Z")

 
dbskip(-1)

 
cNum := &(cCpoSx8)

 

cnum := "00054" // fazer o tratamento aqui para a numeracao

 
MsgGet2( "Indique o numero correto para a tabela:" + calias, "Campo: "+ "Matrícula", @cNum, , , )



restarea(aArea2)

 
restarea(aArea)


endif



return cNum


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;
}
</style>