...

Permitir a criação de movimentos para bens patrimoniais sem a obrigação de fazê-los diretamente pelo módulo Ativo Fixo. Os movimentos poderão ser por Valor, Percentual ou Quantidade. Quando o movimento for de transferência, o tipo de movimento deve ser percentual e o % deve ser zero. Cada registro da temp-table de movimentos (tt_movto_bem_pat_api_b), possui um status e uma mensagem de erro, quando ocorrer.

Funcionamento

Na forma padrão, realiza-se a chamada através de um comando RUN normal, passando-se os parâmetros com as informações necessárias.

A sintaxe para a chamada da API é:

def new shared var v_ind_message_output
        as character
        format "X(10)":U
        initial "Na Tela"
        view-as radio-set Horizontal
        radio-buttons "Na Tela", "Na Tela", "Em Arquivo", "Em Arquivo"
        bgcolor 8
        no-undo.

define variable v_hdl_api_bem_pat_bxa_transf as handle      nohandle      no-undo.

define new shared stream s_1.

assign v_ind_message_output = "Em Arquivo".if  v

if  v_ind_message_output = "Em Arquivo" then
        output stream s_1 to "c:\tmp\fas737zb.log".

run prgfin/fas/fas737zb.py persistent set v_hdl_api_bem_pat_bxa_transf (Input 01).

run pi_api_criacao_movto_bem_pat in v_hdl_api_bem_pat_bxa_transf
                                                                                                          (input "",
                                                      input                                                      input-output table tt_movto_bem_pat_api_b).

if  validif  valid-handle( v_hdl_api_bem_pat_bxa_transf ) then do:
        delete procedure v_hdl_api_bem_pat_bxa_transf.
        assign v_hdl_api_bem_pat_bxa_transf = ?.
end.

output stream s_1 close.

    Observação: A inicialização da variável v_ind_message_output e a abertura da stream s_1 se faz necessário para que as inconsistências sejam aprensentadas em arquivo e não sejam apresentadas em tela.

...

...

Retorno

A API retornará na tabela temporária tt_movto_bem_pat_api_b através do atributo “ttv_des_erro_api_movto_bem_pat” a inconsistência encontrada durante o processo de validação do Bem Patrimonial.

A validação das inconsistências das informações da tabela temporária será feita por registro e caso seja encontrado alguma será verificado o próximo registro da tabela temporária (caso o mesmo exista). 

Obs.: Quando a API for executado por um programa externo, logo após a chamada da API, deverá ser criado um tratamento para impressão dos erros conforme segue exemplo.

...