Sage X3 how get the Description of a Local Menu

This function return the description of a local menù

Funprog GET_MENLOC_TEXT(PNUMENU,PCODE)
Value Integer PNUMENU # -> Number of menu
Value Integer PCODE   # -> Item Code
   Local Char X_RET(250) : X_RET = ""
   If clalev([F:XAPL]) = 0 Then Local File APLSTD [F:XAPL] : Endif
   Read [F:XAPL]CLE = PNUMENU;PCODE;'ITA'
   If fstat = 0 Then
      X_RET = [F:XAPL]LANMES
   Endif
End X_RET

In this example the function return ‘No’

Local Integer XNUMMENU : XNUMMENU = 1
Local Integer XCODE : XCODE = 1 

#... return 'No'
Infbox func GET_MENLOC_TEXT(XNUMMENU,XCODE)

#... return 'Yes'
XCODE = 2
Infbox func GET_MENLOC_TEXT(XNUMMENU,XCODE)



Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s