Páginas filhas
  • AF060BUT - Entry point to create user button

Versões comparadas

Chave

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

AF060BUT - Entry point to create user button

Description

Entry point AF060BUT to create user button.

Notes

(from version 12.1.6)

Examples

User Function AF060BUT()

Local aRotX := PARAMIXB

aRotX := {{"BUTTON AF060BUT","U_Af060ts1",0,2}}

Return(aRotX)

User function Af060ts1()

MsgAlert("Call of the Entry Point AF060BUT")

Return

Preview

 


See also

 


Language

Portuguese(Brazil)

Versions

Microsiga_Protheus12

Operating Systems Supported

All

Compatible with the following Databases

All

Updates

 


Parameters

aRotX = Array with the menu information.

Return

Array with the addition of the user menu.

<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id="ec2191b9-5181-49ad-af11-d87632b5871b"><ac:plain-text-body><![CDATA[

Call events of the Entry Point

If ExistBlock("AF060BUT")

    aRotNew := ExecBlock("AF060BUT",.F.,.F.,{aRot})

   

For nX := 1 To len(aRotNew)

       

     

aAdd(aRot,aRotNew[nX])   

NextEndif

]]></ac:plain-text-body></ac:structured-macro>

<ac:structured-macro ac:name="unmigrated-wiki-markup" ac:schema-version="1" ac:macro-id=

Next

Endif

"d6817905-58d8-44a3-8d6c-387c5635e16f"><ac:plain-text-body><![CDATA[

Variables

Local aRotX := PARAMIXB[1]

]]></ac:plain-text-body></ac:structured-macro>

Source Program

ATFA060.PRW