Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • PLSVLRPA - Alteração de Valor

Versões comparadas

Versão antiga 2

changes.mady.by.user admin

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user admin

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
PLSVLRPA - Alteração de Valor
PLSVLRPA - Alteração de Valor

Ponto-de-Entrada: PLSVLRPA - Alteração de Valor
Versões: Advanced Protheus 7.10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Ponto de entrada usado para alterar o valor de CH para o PA (Porte anestésico).
Programa Fonte 
PLSVLRPRO
Sintaxe

PLSVLRPA - Alteração de Valor ( [ nVlrPAAcu ], [ nBanda ], [ cConsBd ], [ cAno ], [ cMes ], [ lCobCoPart ], [ dDatAnalise ], [ cCodPro ], [ cCodPad ], [ cEspec ], [ cCodUnd ], [ cCdProduto ], [ cCodRDA ], [ cCodLoc ], [ cCodTab ], [ cCodInt ], [ nRef ], [ aRetPA ], [ cOpeOri ], [ cConsFt ], [ cCodInt ], [ aRet ], [ cCodEmp ], [ cVrProduto ], [ aVlBloq ], [ nFatMul ], [ nQtd ], [ lOK ], [ cAlias ], [ cMsg ] ) --> aRetPto

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
nVlrPAAcuNuméricoValor do porte anestésico acumulado.
nBandaArray of RecordBanda de calculo para a CBHPM
cConsBdArray of RecordConsidera banda.
cAnoArray of RecordAno.
cMesArray of RecordMês
lCobCoPartArray of RecordCobra Participação?
dDatAnaliseArray of RecordData da análise.
cCodProArray of RecordCódigo do Produto de saúde.
cCodPadArray of RecordCódigo do tipo da tabela.
cEspecArray of RecordCódigo da especialidade
cCodUndArray of RecordCódigo da unidade.
cCdProdutoArray of RecordCódigo do Produto.
cCodRDAArray of RecordCódigo da RDA.
cCodLocArray of RecordCódigo do local.
cCodTabArray of RecordCódigo da tabela.
cCodIntArray of RecordCódigo da operadora.
nRefArray of RecordSeq.Porte.
aRetPAArray of RecordRetorno no porte anestésico.
cOpeOriArray of RecordOperadora de origem.
cConsFtArray of RecordConsidera fator mult.
cCodIntArray of RecordCódigo da operadora.
aRetArray of RecordArray com dados genéricos.
cCodEmpArray of RecordCod. Grupo.
cVrProdutoArray of RecordVersão.
aVlBloqArray of RecordArray com dados de bloqueio.
nFatMulArray of RecordFator de multa.
nQtdArray of RecordQuantidade.
lOKArray of RecordSempre verdadeiro.
cAliasArray of RecordAlias em uso.
cMsgArray of RecordMensagem.
Retorno
    aRetPto(array_of_record)
  • aRetPto[1]- Indica sucesso no processamento.aRetPto[2]- Valor baseaRetPto[3][1] = Status do processamento.aRetPto[3][2] = Alias.aRetPto[3][3] = Mensagem de processamento.aRetPto[3][4] = Array aRetpa.
Exemplos 
User Function PLSVLRPA()	Local nBanda 	:= paramixb[2]	Local aRet	 	:= paramixb[18]	Local aAtendAp	:= {0,0,{.F.,"","",Nil}} 	If nBanda == 1		aAtendAp[1] := 50		aAtendAp[2] := 10		aAtendAp[3][1] := .T.		aAtendAp[3][2] := "BD6"		aAtendAp[3][3] := "Vlr PA"		aAtendAp[3][4] :=  aClone(aRet)	EndIf	Return aAtendAp
Variáveis
NomeTipoEscopoPode Alterardescrição
Array of RecordGlobalNão