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

Advpl SetDefault

    Tipo: Processamento
    Habilita os padrões definidos pela função SetPrint.
    Sintaxe
    SetDefault (aArray, cAlias)
    Parâmetros
    aArray – Array aReturn, preenchido pelo SetPrint
    [1] Reservado para Formulário
    [2] Reservado para Nº de Vias
    [3] Destinatário
    [4] Formato => 1-Comprimido 2-Normal
    [5] Mídia => 1-Disco 2-Impressora
    [6] Porta ou Arquivo 1-LPT1… 4-COM1…
    [7] Expressão do Filtro
    [8] Ordem a ser selecionada
    [9]..[10]..[n] Campos a Processar (se houver)
    cAlias – Alias do arquivo a ser impresso.
    Retorna
    Nil
    Comentários
    Esta função habilita os padrões de relatório alterados pela função SetPrint.
    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