Code example: New VST expression (Aviation)

The original VST expression can be modified to look like the one below to abbreviate advanced/callout annotation.

Function Generate([OBJECTID], [OBJECTID_arr],
[LABELSTATUS_CODE], [LABELSTATUS_CODE_arr], [PRIMARYNAVAID_CODE],
[PRIMARYNAVAID_CODE_arr], [SystemSubtype], [SystemSubtype_arr],
[Ident_Txt], [Ident_Txt_arr], [Frequency_Val], [Frequency_Val_arr],
[Channel_Txt], [Channel_Txt_arr], [Voice_Code], [Voice_Code_arr],
[ComponentSubtype], [ComponentSubtype_arr], [Name_Txt],
[Name_Txt_arr], [LAT_TXT], [LAT_TXT_arr], [LONG_TXT],
[LONG_TXT_arr], [ROLEFIX_CODE], [ROLEFIX_CODE_arr]) 

VariableArray = Array([OBJECTID_arr], [LABELSTATUS_CODE_arr],
[PRIMARYNAVAID_CODE_arr], [SystemSubtype_arr], [Ident_Txt_arr],
[Frequency_Val_arr], [Channel_Txt_arr], [Voice_Code_arr],
[ComponentSubtype_arr], [Name_Txt_arr], [LAT_TXT_arr],
[LONG_TXT_arr], [ROLEFIX_CODE_arr]) 

k = 0 
do while k <UBound(VariableArray) + 1 
         tempArray = VariableArray(k) 
         i = 1
         outputText = outputText & tempArray(0) 
         do while i <ubound(tempArray) + 1 
                  outputText = outputText & "<>"
                  outputText = outputText & tempArray(i) 
                  i = i + 1 
loop
outputText = outputText & "||" 
k = k + 1 loop 
Generate =outputText 
End Function