Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Cassio Silveira Dias

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Ana Paula Nascimento Silva

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Financeiro

02. DESCRIÇÃO

Ponto O ponto de entrada F550REPOS permite criar uma validação durante o procedimento será executado ao ser acionado a opção de reposição manual do Caixinhacaixinha, ele irá permitir validar se o processo de reposição poderá ou não ser executado.


Tabela posicionada

  • SET - Caixinhas             


03. PARÂMETROS

Nome

Tipo

Descrição

cCaixa

Caracter

Código do caixinha que esta posicionado para realizar a reposição de saldo

04. RETORNO

Nome

Tipo

Descrição

lRet

Lógico

Retorne .T. para continuar o processo de reposição ou  .F. para não permitir a reposição.

03. EXEMPLO DE UTILIZAÇÃO


Bloco de código
languagejava
themeMidnight
title F550REPOS()
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc}   
User Function  F550REPOS 
    (Ponto de entrada executado antes exclusao de Caixinhas e apos() as validacoes
Logical    Tabela posicionada 
    "SET"Local -lRet Caixinhas   )
    @type  logical
    @author Cassio S. Dias:= .T.
    @since 09/11/2023
    @version 12.1.2310
    @return lRet, logicalLocal cCxRep := PARAMIXB[1]
  	
    @seelRet:= (links_or_references)
    /*/
 
User Function  F550REPOS() as Logical     
	Local lRet := .T.
 
    //Valida o id do usuárioMsgYesNo("Foi solicitado a reposição manual do caixinha: " + cCxRep + CRLF + CRLF + ;
    IF __cUserId $ ('000002','000013')
        MSGALERT( "Usuário não autorizado para esta operação", "Sem Permissão" )
        lRet := .F.
    ENDIF 

Return lRet
 "Deseja seguir com o processo de reprosição?"  ,"PE: F550REPOS")

 
Return lRet

04. DEMAIS INFORMAÇÕES

Não há

...