' step 1
Set callout = Server.CreateObject("RMIMS.Callout")
' define the point on the map where callout will be displayed (pixels)
callout.setAnchor Map.toMapUnits( 300, 200)

' step 2
Set cLayer = Map.getCosmeticLayer()
Set en = cLayer.getCallouts()

' step 3
Set symbol = Server.CreateObject("RMIMS.Symbol")

' step 4
color = Server.CreateObject("RMIMS.Utils").createColor(255, 0, 0) 'red
Set font = Server.CreateObject("RMIMS.TextFont")

symbol.setSize 20
symbol.setColor rmSymbolColor, (color)
symbol.setSymbolStyle "std:star"

font.setColor( color)
font.setBold true
font.setUnderline true
font.setItalic true
font.setSize 20

callout.setSymbol (symbol)
callout.setOrientation rmTopCenter
callout.setFont (font)
' to get a symbol without any text, omit this step
callout.setText "Sample Callout"

' step 5	
en.add(callout)