Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 23

changes.mady.by.user Thiago Rodrigues da Silva

Gravado em

comparado com

Nova versão 24

changes.mady.by.user Thiago Rodrigues da Silva

Gravado em

Chave

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

...

Ponto de Entrada 

PLS500UNM

Descrição

O Ponto de Entrada (P.E.) PLS500UNM está localizado nos fontes 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

DefaultDescrição

cServ

Caractere

PPM,HM,HMR,VMT,VMD,REA,VTX,VDI

Unidades de honorário médico

cAux

Caractere

AUX,AUR

Unidades de auxiliar

cAnest

Caractere

PAP,PA,PAR

Unidades de porta anestésico

cCusOpe

Caractere

COR,COP,UCO

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

CaractereUnidades de honorário médicoSim

cAux

CaractereUnidades de auxiliarSim

cAnest

CaractereUnidades de porta anestésicoSim

cCusOpe

CaractereUnidades de custo operacionalSim

cFilm

CaractereUnidades de filmeSim



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}         

08. ALTERAÇÕES

...

DA VERSÃO 1.1

  • O sistema identificará de forma automática qual versão deve validar através da tag nrVerTra_PTU, se quando estiver lendo o arquivo, identificar que o valor da tag esta como "2" saberá que deve validar nos schemas da versão atual  1.1

    IMPORTANTE

  • Para isso será necessário a criação da subpasta  V1_1 dentro da pasta de Schemas já existente: Protheus_data\plsptu\schemas ,para armazenar os novos Schemas. 
    Portanto  para funcionamento correto da versão 1.1 os novos schemas devem ficar no diretório: Protheus_data\plsptu\schemas\V1_1

...