Histórico da Página

...

Campo Protheus	Regra
BX6_SEQPTU	seq_item
BX6_IDUNIC	id_itemUnico
BD6_CODPAD	De-para BTU tp_Tabela
BD6_CODPRO	De-para BTU cd_Servico
BD6_DES500	ds_Servico
BD6_VALORI	vl_ServCobrado + vl_CO_Cobrado + vl_FilmeCobrado
BD6_QTDPRO	qt_Cobrada
BD6_VLRAPR	BD6_VALORI dividido por BD6_QTDPRO
BD6_VLTXAP	tx_AdmServico + tx_AdmCO + tx_AdmFilme
BD6_DATPRO	dt_Execucao
BD6_HORPRO	hr_Inicial
BD6_HORFIM	hr_Final
BD6_VIA	via_Acesso → BGR_CODVIA
BD6_PERVIA	via_Acesso → BGR_PERVIA
BD6_TECUTI	tc_Utilizada
BD6_CODATO	cd_Ato
BD6_FATMUL	ft_MultiplicadorServico
BX6_CODUNM	un_Medida
BX6_NOMFOR	nm_FornecedorMaterial
BX6_CNPJFO	CNPJ_Fornecedor
BX6_NNFFOR	nr_NotaFiscalFornecedor
BX6_DREANV	det_RegistroAnvisa
BX6_REGANV	nr_RegistroAnvisa
BD6_REFFED	cd_ReferenciaMat_Fab

05. PARAMETROS

CONFIGURAÇÃO DE PARÂMETROS

No Configurador (SIGACFG), acesse Ambiente/Cadastros/Parâmetros. Crie o(s) parâmetro(s) a seguir:

Nome:	MV_PLPRZAI
Tipo:	Numérico
Cont.Port:	30
Descrição:	Define a quantidade de dias de validade de uma autorização de internação GIH

Nome:	MV_PLPACPT
Tipo:	Caractere
Cont.Port:	99999998
Descrição:	Pacote genérico criado na importação do PTU A500.

Nome:	MV_PLCDPXM
Tipo:	Caractere
Cont.Port:	01
Descrição:	Tipo de tabela dos procedimentos genérico que possam ser criados pelo importador XML

Nome:	MV_PLPSPXM
Tipo:	Caractere
Cont.Port:	99999994
Descrição:	Código dos procedimentos genéricos que possam ser criados pelo importador XML

Nome:	MV_PLSPTUL
Tipo:	Caractere
Cont.Port:	0002
Descrição:	Parâmetro utilizado para definir o código do local de digitação da guia incluída no PTU A500

06. PONTO DE ENTRADA

Ponto de Entrada

PLS500UNM

Descrição

O Ponto de Entrada (P.E.) PLS500UNM está localizado no fonte PLSP500X e PLSUA500X, ele é acionado uma única vez quando a tela inicial da rotina é aberta.

Ele permite a manipulação das variáveis que indicam o tipo de unidade (BD7_CODUNM) a serem exportados e importados de acordo com a regra do PTU A500.(vl_ServCobrado, vl_CO_Cobrado ,vl_FilmeCobrado)

Fonte

PLSP500X,PLSUA500X

Parâmetros

O P.E. recebe os seguintes parâmetros:

Parâmetro	Tipo	Default	Descrição
cServ	Caractere	PPM,HM,HMR	Unidades de honorário médico
cAux	Caractere	AUX,AUR	Unidades de auxiliar
cAnest	Caractere	PAP,PA,PAR	Unidades de porta anestesico
cCusOpe	Caractere	UCO,COR,VMT,VMD,REA,COP,VTX,VDI	Unidades de custo operacional
cFilm	Caractere	FIL	Unidades de filme

Retorno

O P.E. deve retornar uma string, contendo os códigos de unidade.

Parâmetro	Variável	Descrição	Obrigatório
cServ	Caractere	Unidades de honorário médico	Sim
cAux	Caractere	Unidades de auxiliar	Sim
cAnest	Caractere	Unidades de porta anestésico	Sim
cCusOpe	Caractere	Unidades de custo operacional	Sim
cFilm	Caractere	Unidades de filme	Sim

Exemplo

#INCLUDE "PROTHEUS.CH"

USER FUNCTION PLS500UNM()
local aParam := paramixb
local cServ := aParam[1]
local cAux := aParam[2]
local cAnest := aParam[3]
local cCusOpe := aParam[4]
local cFilm := aParam[5]

cAnest += "XPA"

Return {cServ,cAux,cAnest,cCusOpe,cFilm}

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>

Árvore de páginas

Versões comparadas

Versão antiga 6

Nova versão 7

Chave

05. PARAMETROS

06. PONTO DE ENTRADA