Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • MDTA1551 - Alteração dados da Ficha Médica -- 90585
  • Criado por Usuário desconhecido (sueli.gomides), última alteração por admin em 25 jun, 2012

Ponto-de-Entrada: MDTA1551 - Alteração dados da Ficha Médica
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Na rotina de Diagnóstico Médico, após confirmar uma inclusão, o ponto de entrada será chamado.
Programa Fonte 
MDTA155.PRX
Sintaxe

MDTA1551 - Alteração dados da Ficha Médica ( [ ] )

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
Array of Record
Retorno
    ()
Exemplos 
#include "Protheus.ch"User Function MDTA1551DbSelectArea("SX3")DbSetorder(2)If DbSeek("TMT_TIPDEF") .AND.;	DbSeek("TMT_CIDDEF")		DbSelectArea("TM0")	DbSetOrder(1)	If Dbseek(xFilial("TM0")+TMT->TMT_NUMFIC)		Reclock("TM0",.F.)		TM0->TM0_TIPDEF := TMT->TMT_TIPDEF		TM0->TM0_CODCID := TMT->TMT_CIDDEF		Msunlock("TM0")	Endif	EndifReturn
Variáveis
Nome Tipo Escopo Pode Alterar descrição
Array of Record Global Não