Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Vinicius Queiros Teixeira

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Vinicius Queiros Teixeira

Gravado em

Chave

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

...

Incluído novos parâmetros nos pontos de entrada já existente para adequar ao PTU Online:

PLSVATBI: Tipo de Tabela do Procedimento:

Ponto de Entrada PLSVATBI
Parâmetros

...

1 -

...

 cTpTab = Tipo de Tabela Padrão (Tabela vinculada com a terminologia TISS – BTU)
2

...

- lTbTISS = Lógico se será retornado o tipo de tabela 18/19/20/22/98/00.
3

...

- lRfTISS = Lógico se será retornado a tabela de referência quando o tipo de tabela for 00 (Tabela

...

Própria das Operadoras).

Retorno

...

Tipo de Tabela

...

PLPTUBTU: De-para do código do Procedimento

Novos Parâmetros incluídos:

...

(Caractere)

Observação sobre o PLSVATBI: 
Quando o lTbTISS for .T. e o lRfTISS for .F. deverá retornar a tabela TISS do PTU: 18,19,20,22,98 e 00.
Quando o lTbTISS for .T. e o lRfTISS for .T., deverá retornar a tabela de referencia (18,19,20,22) quando o tipo de tabela for 00 (Tabela Própria das Operadoras), caso contrario deverá retornar em branco.

A tabela BR8 do Procedimento está posicionada nesse momento.


Ponto de Entrada PLPTUBTU
Parâmetros

8 = Tabela de Referência quando o Tipo de tabela for 00 (Tabela

...

Própria das Operadoras)
9

...

= Se é uma

...

De-para de PTU Online

Retorno

...

Array de dados no

...

aRet [1] - codPad

aRet [2] - codPro

...

modelo {CODPAD,CODIGO,DESCRIÇÃO}

Documentação completa do PLPTUBTU no link em Assuntos Relacionados


Exemplo da utilização:

Totvs custom tabs box
tabsPLPTUBTU,PLSVATBI
idsPLPTUBTU,PLSVATBI
Totvs custom tabs box items
defaultyes
referenciaPLPTUBTU

#include "PROTHEUS.CH"

User Function PLPTUBTU()

Local lReceb := PARAMIXB[1]
Local lEnvio := PARAMIXB[2]
Local cTipTab := PARAMIXB[3]
Local cCodPad := PARAMIXB[4]
Local cCodPro := PARAMIXB[5]
Local aRet := PARAMIXB[6]
Local nRecno := PARAMIXB[7]
Local cTabRef := PARAMIXB[8]
Local lRegraPTU := PARAMIXB[9]

// Tratamento

Return aRet

Totvs custom tabs box items
defaultno
referenciaPLSVATBI

#include "PROTHEUS.CH"

User Function PLSVATBI()

Local cTpTab := PARAMIXB[1]
Local lTbTISS := PARAMIXB[2]
Local lRfTISS := PARAMIXB[3]

// Tratamento

Return cTpTab

04. DEMAIS INFORMAÇÕES

Não se aplica

05. ASSUNTOS RELACIONADOS

        Não se aplica  DSAUATE-3785 DT Criado Ponto de Entrada "PLPTUBTU"



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>