Pular para o conteúdo
Início » Advpl SetPrint

Advpl SetPrint

    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