...
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 (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.
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 modelo {CODPAD,CODIGO,DESCRIÇÃO} |
Totvs custom tabs box |
---|
tabs | PLPTUBTU,PLSVATBI |
---|
ids | PLPTUBTU,PLSVATBI |
---|
|
Totvs custom tabs box items |
---|
default | yes |
---|
referencia | PLPTUBTU |
---|
| #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 |
---|
default | yesno |
---|
referencia | PLSVATBI |
---|
| #include "PROTHEUS.CH" User Function PLSVATBI() Local cTpTab := PARAMIXB[1] Local lTbTISS := PARAMIXB[2] Local lRfTISS := PARAMIXB[3] // Tratamento Return cTpTab |
|
...