Tipo: Impressão
Altera os padrões de impressão.
Sintaxe
SetPrint(cAlias, cNomeRel, cPerg, cDesc1, cDesc2, cDesc3, cDesc4, lDic, aOrdem, lComp, cClass)
Parâmetros
cAlias – Alias do Arquivo Principal (se existir)
cNomeRel – Nome padrão do relatório
cPerg – Nome do grupo de perguntas
cDesc1 ..cDesc4 – Descrição do Relatório
lDic – Habilita o Dicionário de Dados
.T. – Habilita (só utilizar em conjunto com a função ImpCadast)
.F. – Desabilita
aOrdem – Array contendo as ordens de indexação do arquivo principal.
lComp – Habilita a alteração da compressão do relatório
.T. – Habilita
.F. – Desabilita
cClass – Classificação do Relatório por Tamanho ( “G”, “M” ou “P” )
P – 80 colunas
M – 132 colunas
G – 220 colunas
Retorna
ExpC – Nome do arquivo com o relatório impresso em disco opcionalmente alterado pelo usuário
Comentários
Esta função possibilita a alteração de determinados padrões dos relatórios. Ela funciona em conjunto com a
função SetDefault.
Exemplo
// Define Variáveis
cString:= “SB1”
NomeRel:= “MATR290”
cPerg := “MTR290”
titulo := “RELAÇÃO PARA ANÁLISE DOS ESTOQUES”
cDesc1 := “Este relatório demonstra a situação de cada item em “
cDesc2 := “relação ao seu saldo , seu empenho , suas entradas previstas”
cDesc3 := “e sua classe ABC.”
aOrd := {“ Por Codigo “,” Por Tipo “}
Tamanho:= “G”
// Envia controle para a função SETPRINT
NomeRel := SetPrint( cString, NomeRel, cPerg, @titulo, cDesc1,;
cDesc2, cDesc3, .F., aOrd, .F., Tamanho )
If LastKey() = 27 .or. nLastKey = 27
RestScreen(3,0,24,79,cSavScr1)
Return
Endif
SetDefault(aReturn,cAlias)
If LastKey() = 27 .OR. nLastKey = 27
RestScreen(3,0,24,79,cSavScr1)
Return
Endif
Estude para provas de certificações em TI com os simulados Bynem