Histórico da Página

O ponto de entrada PL770REL foi criado para que o usuário possa implementar um relatório específico do usuários e motivos de bloqueios considerados pela rotina Bloqueio Automático ( PLSA770 ).Se o ponto de entrada estiver implementado o relatório padrão do sistema não será impresso, apenas o específico.

PLSA770.PRW

PL770REL - Emissão de Relatório Específico de Bloqueio ( [ aLog ] ) --> Nil

Nil()

#Include "Protheus.ch"User Function PL770REL(aLog)Local nLog	  := 0Local aRpt	  := {}For nLog := 1 To Len(aLog)	//{alias,recno,motivo de bloqueio,data de bloqueio,bloqueia faturamento?}	aAdd(aRpt,{aLog[nLog,1],aLog[nLog,2],aLog[nLog,3],aLog[nLog,4],aLog[nLog,5]})Next//Customização específica do usuário para gerar o relatório de bloqueioReturn Nil