Linha Microsiga Protheus - Inglês

Páginas filhas
  • TTOYD2_DT_Ponto_de_Entrada_AF030VLBX

Versões comparadas

Versão antiga 1

changes.mady.by.user Thayna de Souza Moreira

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Thayna de Souza Moreira

Gravado em

Chave

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

TTOYD2_DT_Ponto_de_Entrada_AF030VLBX

Product Line:

Microsiga Protheus.

Industry:

Services

Module:

Fixed Asset (SIGAATF)

Routine:

RoutineTechnical Name
Asset PostingATFA030.PRX

Entry Point:

AF030VLBX.

Related Tickets

TTOYD2.

Countries:

All

Database:

All approved for Protheus.

Tables Used:

SN1,SN3.

Operating Systems:

All approved for Protheus.

Description

Entry point AF030VLBX validates the item that will be posted manually or automatically. The user can place the desired validations that are not in the default product. 
The changes and impacts of these changes to the system are the responsibility of the customer who uses this entry point.
 
 

Entry Point

Description:

This entry point was created so that the user does validations that do not exist in the standard product in the manual posting and/or automatic posting routines.

Location:

Custom routine, therefore, it is not part of the default menu.

Events:

AF030VLBX.

Source Program:

ATFA030.

Function:

AF030Baixa - Manual posting, and AF030VLAUTO - Automatic posting.

Return:

Logic return.


Example:

Image Added

Image Added Wiki Markup* * Example: #Include '[<span style="color: #0000ee"><span style="text-decoration: underline; ">Protheus.ch</span></span>|http://Protheus.ch]' User function AF030VLBX()Local lRet := .T.Local cRotina := paramixb\[1\]Local cManuAuto := paramixb\[2\] If cManuAuto == "MAN"     msgAlert("Manual Posting")    lRet := .t.Elseif cManuAuto == "AUTO"    msgAlert("Automatic Posting")   lRet := .t.Endif Return(lRet) \\ *_Excerpt in which the PE is called in the default source code._* /* -----------------------------------------------------------------------    Validate whether the item selected can be posted   ------------------------------------------------------------------------   Call on manual posting   ----------------------- IF lAF030VLBX   lRet := ExecBlock("AF030VLBX",.F.,.F.,\{"ATFA030","MAN"\})  IF ValType(lRet) == "L" .AND. !lRet      EXIT  ENDIFENDIF ------------------------------------------------------------------------Call on automatic posting (using a static function)--------------------------------------------------------STATIC FUNCTION AF030VLAUTO()LOCAL lRet := .T.Local lAF030VLBX := ExistBlock("AF030VLBX") IF lAF030VLBX    lRet := ExecBlock("AF030VLBX",.F.,.F.,\{"ATFA030","AUTO"\})    IF ValType(lRet) != "L"        lRet := .T.    ENDIFENDIFRETURN lRet ------------------------------------------------------------------------ */     !worddavaf485e25f57cd86bb5b0fc63f3f1b1cc.png|height=32,width=32!