Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 3

changes.mady.by.user Marco Nakahara Nakazawa

Gravado em

comparado com

Nova versão 4

changes.mady.by.user Marco Nakahara Nakazawa

Gravado em

Chave

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


CONTEÚDO

  1. Visão Geral
  2. Exemplo de utilização
  3. Informações Técnicas
  4. Exemplo


01. VISÃO GERAL

Função utilizada para inclusão, alteração ou exclusão de um feriado via rotina automática (ExecAuto).

02

...

. INFORMAÇÕES TÉCNICAS

nOpcAuto3 - Inclusão
4 - Alteração
5 - Exclusão
aFeriadoaFeriado[1] Filial
aFeriado[2] Data do Feriado
aFeriado[3] Descrição
aFeriado[4] Feriado é Fixo?
aFeriado[5] Tipo de Hora extra para o Feriado
aFeriado[6] Tipo de Hora extra Noturna para o Feriado

03. EXEMPLO

ExecAuto - PONA020

#INCLUDE "PROTHEUS.CH"
#INCLUDE "TBICONN.CH"

User Function ExPna020()
    Local aFeriado := {}
    Local nOpcAuto := 0

    Private lMsErroAuto := .F.

    PREPARE ENVIRONMENT EMPRESA "T1" FILIAL "D MG 01" MODULO "GPE"

    ConOut("Inicio: "+Time())
    ConOut(PadC("Rotina Automatica Cadastro de Feriados",80))

    aAdd(aFeriado, {"P3_FILIAL" , xFilial("SP3","D MG 01") , Nil})  // Filial
    aAdd(aFeriado, {"P3_DATA" , sToD("20200101") , Nil})  // Data do Feriado
    aAdd(aFeriado, {"P3_DESC" , "Ano Novo" , Nil})  // Descrição
    aAdd(aFeriado, {"P3_FIXO" , "S" , Nil})  // Feriado Fixo
    aAdd(aFeriado, {"P3_TPEXT" , "4" , Nil})  // Tipo de Hora extra para o Feriado
    aAdd(aFeriado, {"P3_TPEXTN" , "8" , Nil})  // Tipo de Hora extra Noturna para o Feriado

    // nOpcAuto
    //3 Inclusão
    //4 Alteração
    //5 Exclusão

    nOpcAuto := 3

    //Chamada do ExecAuto
    MSExecAuto( {|x,y| PONA020(x,y)}, aFeriado, nOpcAuto )

    If !lMsErroAuto
        ConOut(PadC("Transferencia efetuada!",80))
    Else
        ConOut(PadC("Erro no cadastro!",80))
    EndIf

    ConOut("Fim : "+Time())

    RESET ENVIRONMENT
Return NIL

...

HTML
<!-- esconder o menu --> 


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