FICO
FICO Xpress Optimization Examples Repository
FICO Optimization Community FICO Xpress Optimization Home
Back to examples browserNext example

Folio - Embedding examples from 'Getting started'

Description
Simple embedding tasks for a portfolio optimization problem:
  • loading and running a BIM file (foliorun.bas)
  • executing a Mosel model (folioexec.bas)
  • parameterized model execution (folioparam.bas)

folioembedvb.zip[download all files]

Source Files
By clicking on a file name, a preview is opened at the bottom of this page.
foliorun.bas[download]
folioexec.bas[download]
folioparam.bas[download]
foliodata.mos[download]

Data Files





folioexec.bas

Attribute VB_Name = "Module1"
Option Explicit
' ********************************************************
'  Mosel Library Example Problems
'  ==============================
'  file folioexec.bas
'  ``````````````````
'  Executing a Mosel model.
'
'  (c) 2008 Fair Isaac Corporation
'      author: S.Heipcke, Aug. 2003
' ********************************************************

Sub Main()
 Dim result As Long
 Dim model

' Initialize Mosel
 XPRMinit

' Execute = compile/load/run a model
 XPRMexecmod "", "foliodata.mos", "", result, model

 XPRMunloadmod (model)
 model = XPRM_NULL
End Sub

Back to examples browserNext example