Linha Microsiga Protheus

Árvore de páginas

 Tempo aproximado para leitura: 05 min

1. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Jurídico
Módulo:Pré-faturamento de Serviços - SIGAPFS
Função:Cadastro de Caso - JURA070


02. PONTO DE ENTRADA

Descrição:

Ponto de entrada para criar uma aba no cadastro de casos.

Localização:

Atualizações - Cadastros - Casos

Programa Fonte:

JURA070

Função:

VIEWDEF

Parâmetros:

Não há

Retorno:

Nome

Tipo

Descrição

Obrigatório

aSheet

Array

Array com 5 posições obrigatórias e 3 opcionais, totalizando 8 posições:

NomeTipoDescriçãoObrigatório
aSheet[1]Caractere

Nome da aba

Sim
aSheet[2]Caractere

Alias que será utilizado na aba

Sim
aSheet[3]Lógico

Verdadeiro se é um grid ou falso para field

Sim
aSheet[4]Array

array simples com nomes dos três campos para relacionamento com NVE_NUMCAS, NVE_CCLIEN e NVE_LCLIEN

Sim
aSheet[5]Numérico

número do índice de ordenação dos dados

Sim
aSheet[6]Arrayarray simples com nome dos campos que não devem ser apresentados na telaNão
aSheet[7]Arrayarray simples com nome dos campos que montam a chave para validação de duplicidade da linha. Deve ser informado somente para grid, caso o parâmetro 3 for falso será desconsideradoNão
aSheet[8]CaractereNome do campo que deve ser incrementado sequencialmente. Deve ser informado somente para grid, caso o parâmetro 3 for falso será desconsideradoNão
Sim




03. EXEMPLO

#INCLUDE "PROTHEUS.CH"

//-------------------------------------------------------------------
/*{Protheus.doc}J070Sheet
Cria uma aba no cadastro de casos

@return aSheet, array, Dados para criação da aba
        aSheet[1] - Nome da aba
        aSheet[2] - Alias de dados que será utilizado
        aSheet[3] - Verdadeiro se é um grid ou falso para field
        aSheet[4] - array com o nome dos campos para relacionamento com NVE_CCLIEN, NVE_LCLIEN e NVE_NUMCAS

        aSheet[5] - numero do índice de ordenação dos dados
        aSheet[6] - Array com nome dos campos que não devem ser apresentados na tela
        aSheet[7] - Array com nome dos campos que montam a chave da linha (Somente para grid)
        aSheet[8] - Nome do campo que deve ser incrementado sequencialmente (Somente para grid)

@author TOTVS
/*/
//-------------------------------------------------------------------
User Function J070Sheet()
    Local aSheet      := {}
    Local cNameSheet  := "ADVOGADOS"
    Local cTable      := "ZAA"
    Local lGrid       := .T.
    Local aRelation   := {"ZAA_CODCLI", "ZAA_LOJA", "ZAA_CCASO"}

    Local nIndexOrder := 3
    Local aRemoveFld  := {"ZAA_DDDTEL"}
    Local aUniqueLin  := {"ZAA_TELCOM"}
    Local cFieldInc   := "ZAA_CODADV"

    aSheet := {cNameSheet, cTable, lGrid, aRelation, nIndexOrder, aRemoveFld, aUniqueLin, cFieldInc}

Return (aSheet)