Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • MDTR4651- Impressão Atestado ASO -- 10408
  • Criado por Usuário desconhecido (sueli.gomides), última alteração por admin em 25 jun, 2012

Ponto-de-Entrada: MDTR4651- Impressão Atestado ASO
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil) , Espanhol , Inglês
Descrição: 
Na rotina de Atestado de Saúde Ocupacional (MDTA200), após selecionar a opção Imprimir e posteriormente indicar os parâmetros necessários, o ponto de entrada será chamado.
Programa Fonte 
MDTA200.PRX
Sintaxe

MDTR4651- Impressão Atestado ASO ( [ lAso ], [ nPages ], [ cTermoResp ], [ nModeloImp ] )

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
lAso Array of Record Parâmetro Reservado.
nPages Array of Record Número de Asos por Página.
cTermoResp Array of Record Termo de Responsabilidade.
nModeloImp Array of Record Tipo de Impressão (1 - Tela ou 2 - Impressora).
Retorno
    ()
Exemplos 
User Function MDTR4651(lAso,nPages,cTermoResp,nModeloImp)If lAso	oPrint := TMSPrinter():New( OemToAnsi("ATESTADO DE SAÚDE OCUPACIONAL") )	        oPrint:Setup()		cTermoResp := If(cTermoResp != nil,cTermoResp,””)	fASOIMP(oPrint,cTermoResp)	If nModeloImp == 2    	 	oPrint:Print()	Else	                		oPrint:Preview()	EndifEndif	Return nil