Linha Datasul

Árvore de páginas

Documento de BO

Produto:

Datasul

Ocorrência:

Documentação de BO

Nome Físicofibo/bofi170.p

 

Os métodos de negócio e básico não padrão estão definidos abaixo:

 

Métodos

Quando a API/BO for executada em modo persistente, os seguintes métodos estarão disponíveis para execução:


Método Básico

openQueryCodDescricao

Requisito

setConstraintCodDescricao

Sintaxe

openQueryStatic in h-handle (input “CodDescricao”)

Descrição

Abre a query de acordo com os parâmetros passados no setConstraint

Retorno

Nenhum

openQueryCodRelacionamento

Requisito

setConstraintCodRelacionamento

Sintaxe

openQueryStatic in h-handle (input “CodRelacionamento”)

Descrição

Abre a query de acordo com os parâmetros passados no setConstraint

Retorno

Nenhum

openQueryRelacionamento

Requisito

setConstraintRelacionamento

Sintaxe

openQueryStatic in h-handle (input “Relacionamento”)

Descrição

Abre a query de acordo com os parâmetros passados no setConstraint

Retorno

Nenhum

setConstraintRelacionamento

Requisito

Nenhum

Sintaxe

setConstraintRelacionamento (input bco_orig_ini,

                             input bco_orig_fim,

                             input tab_orig_ini,

                             input tab_orig_fim,

                             input bco_dest_ini,

                             input bco_dest_fim,

                             input tab_dest_ini,

                             input tab_dest_fim).

Descrição

Posiciona os parâmetros para abertura da Query

Parâmetros      Descrição

Bco_orig_ini     Banco Original Inicial (character)

Bco_orig_fim    Banco Original Final (character)

Tab_orig_ini      Tabela Origem Inicial (character)

Tab_orig_fim     Tabela Origem Final (character)

Bco_dest_ini     Banco Destino Inicial (character)

Bco_dest_fim    Banco Destino Final (character)

Tab_dest_ini      Tabela Origem Inicial (character)

Tab_dest_fim     Tabela Destino Final (character)

Retorno

OK.

setConstraintCodRelacionamento

Requisito

Nenhum

Sintaxe

setConstraintCodRelacionamento (input cdn_relacto_ini,

                             input cdn_relacto_fim).

Descrição

Posiciona os parâmetros para abertura da Query

Parâmetros      Descrição

Cdn_relacto_ini     Código Relacionamento Inicial (integer)

Cdn_relacto_fim    Código Relacionamento Final (integer)

 

Retorno

OK.

setConstraintCodDescricao

Requisito

Nenhum

Sintaxe

setConstraintCodDescricao (input des_relacto_ini,

                           input des_relacto_fim).

Descrição

Posiciona os parâmetros para abertura da Query

Parâmetros      Descrição

Des_relacto_ini     Descrição Relacionamento Inicial (character)

Des_relacto_fim    Descrição Relacionamento Final (character)

 

Retorno

OK.


Método Negócio:

retornaProximoRelacto

Requisito

Nenhum

Sintaxe

RetornaProximoRelacto (output p-relacto).

Descrição

Retorna o próximo número de relacionamento possível.

Parâmetros      Descrição

p-relacto           Número do relacionamento disponível (integer)

 

Retorno

OK.

carregaBancos

Requisito

Nenhum

Sintaxe

carregaBancos (output c-aux,

               output table tt-tabela,

               output table tt-browse-orig,

               output table tt-browse-dest,

               output c-primeiro)

Descrição

Método que carrega os bancos parametrizados na clf-param-gerador-arq-fisc

 

 

Parâmetros

Descrição

 

c-aux

tt-tabela

tt-browse-orig

tt-browse-dest

c-primeiro

Campo com os bancos parametrizados

Temp-table de tabelas parametrizadas

Temp-table de campos parametrizados

Temp-table de campos parametrizados

Nome do primeiro banco parametrizado.

Retorno

A BO irá retornar nas tabelas temporárias todas as tabelas e campos utilizados nos bancos selecionados nos parâmetros de Layout Fiscal. Sempre serão considerados os bancos “mgfis” e “movfis”, ou seja, estes dois bancos não precisam estar cadastrados no programa de parâmetros.


Definição das tabelas temporárias utilizadas neste método:

define temp-table tt-browse-orig no-undo

    field c-nome-banco   as char format "X(30)"

    field c-nome-tabela  as char format "X(30)"

    field c-campo-origem as char format "x(10)"

    field c-desc-origem  as char format "x(30)"

    field c-format-orig  as char format "x(20)"

    field c-index-orig   as char format "x(20)"

    field i-ordem        as int  format ">>>9"

    field l-index-uniq   as logical

    field l-selecionado  as LOGICAL INIT NO

    INDEX ordem IS PRIMARY c-nome-banco c-nome-tabela i-ordem

    INDEX chave   c-nome-banco c-nome-tabela c-campo-origem

    INDEX selecao l-selecionado.

 

define temp-table tt-browse-dest no-undo

    field c-nome-banco   as char format "X(30)"

    field c-nome-tabela  as char format "X(30)"

    field c-campo-dest   as char format "x(10)"

    field c-desc-dest    as char format "x(30)"

    field c-format-dest  as char format "x(20)"

    field c-index-dest   as char format "x(20)"

    field i-ordem        as int  format ">>>9"

    field l-index-uniq   as logical

    field l-selecionado  as LOGICAL INIT NO

    INDEX ordem IS PRIMARY c-nome-banco c-nome-tabela i-ordem

    INDEX chave   c-nome-banco c-nome-tabela c-campo-dest

    INDEX selecao l-selecionado.

DEFINE TEMP-TABLE tt-tabela NO-UNDO

    field c-nome-banco  as character format "X(30)"

    field c-nome-tabela as character format "X(30)"

    field c-prime-index as char      format "x(20)"

    field c-campos      as char      format "x(40)"

    INDEX banco IS PRIMARY c-nome-banco c-nome-tabela.