Linha Microsiga Protheus - Inglês

Páginas filhas
  • CTB120OK - External appointments validation -- 115459

Versões comparadas

Versão antiga 1

changes.mady.by.user Jose Moises Vera Concha

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Jose Moises Vera Concha

Gravado em

Chave

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

...

Portuguese

Pagetitle
CTB120OK - Validação Rateios externosExternal appointments validation
CTB120OK - Validação Rateios externosExternal appointments validation

Entry Point

Ponto-de-Entrada

: CTB120OK -

Validação Rateios externos

External appointments validation


AbrangênciasVersõesCompatível PaísesTodosSistemas OperacionaisCompatível às Bases de DadosTodosIdiomasPortuguês Brasil Português Espanhol Inglês

Scope

:

Microsiga Protheus 10, Microsiga Protheus 11

Versions:

Microsiga Protheus 10, Microsiga Protheus 11

Compatible Countries:

All

Operating Systems:

Todos

All

Compatible with the Databases

:

All

Languages:

Portuguese (

Brazil) ,

Portuguese (Portugal) ,

Spanish ,

English


Descrição

Description:

O ponto de entrada CTB120OK permite validação dos dados preenchidos.Executado no momento em que é utilizado a opção ok na tela de gravação/manutenção de rateios externos

The entry point CTB120OK allows for validation of the entered data. It is executed when the 'OK' option is used on the external appointments recording/maintenance screen.

Source Program

Programa Fonte

CTBA120.PRW

Sintaxe

Syntax

CTB120OK -

Validação Rateios externos

External appointments validation ( [ nopc ] ) --> lRet

Parâmetros

Parameters:


NomeTipoDescriçãoObrigatórioReferênciaNumero da opção equivalente a operação que se deseja validar Inclusãonopc Alteraçãonopc Exclusão

Name



Type



Description



Default



Mandatory



Reference



nopc

Numérico

Numeric



The option number equivalent to the operation to be validated nopc 3 =

Add nopc 4 =

Change nopc 5 =

Deletion












Retorno

Return

lRet

(

logico

logical)

Retorno da validação do ponto de entrada
Observações
Utiliza-se da variavel nopc para diferenciar entre as operações : nopc  3 = Inclusão nopc  4 = Alteração nopc  5 = Exclusão  

Return value of the entry point validation

Notes

The variable 'nopc' is used to differentiate between the operations: nopc 3 = Add nopc 4 = Change nopc 5 = Deletion"  

Examples

User Function CTB120OK()Local lRet := .T.      

ExemplosUser Function CTB120OK()Local lRet := .T.

dbSelectArea("TMP")

        dbGotop()While

!Eof()

           if

paramixb[1]

==

3

3           if

TMP->CTJ_DEBITO

==

TMP->CTJ_

CREDIT msgalert("As contas de rateio nao podem ser as mesmas na inclusão") lRet := .F. End if Elseif paramixb[1] == 4 if

CREDIT               msgalert("The apportionments accounts cannot be the same during Add")
lRet := .F.                         End if               Elseif paramixb[1] == 4       if TMP->CTJ_DEBITO

==

TMP->CTJ_

CREDIT msgalert("As contas de rateio nao podem ser as mesmas na alteração") lRet := .F. End if Elseif paramixb[1] == 5 if

CREDIT               msgalert("The allocation accounts cannot be the same during change.")               lRet := .F.                         End if                     Elseif paramixb[1] == 5       if TMP->CTJ_DEBITO

==

TMP->CTJ_

CREDIT msgalert("Não é permitido exclusões com a mesma conta") lRet := .F. End if Endif dbSkip() EndDo Return

CREDIT                 msgalert("Deletions with the same account are not allowed.")              lRet := .F.                         End if                        Endif       dbSkip()                       EndDo Return lRet