最近有一些朋友問我關於java程式呼叫lingo的問題，為了方便大家瞭解一些過程，下面就將java呼叫的詳細過程重新寫一下。在介紹java呼叫前首先介紹下，他們之間呼叫的原理。

原理:一個完整的java-lingo程式，必須包含三個要素，java程式-model檔案-lingo軟體,這三這個缺一不可，並且model檔案與java程式是相互對應的也就是說如果你修改了其中任何一個檔案其他的檔案也許要做相應的修改,明確了這點後再來說明呼叫過程，首先java呼叫任何其他非java程式肯定是通過JNI將模型所需的資料傳遞給lingo模型檔案，而後Lingo程式再去求解模型，最後再將求解後的結果返回。至於

MODEL:

SETS:

DAYS/ MON TUE WED THU FRI SAT SUN/:

NEEDS,START,ONDUTY;

ENDSETS

[OBJECTIVE]MIN = @SUM(DAYS(I):START(I));

@FOR(DAYS(TODAY):

!Calculate number on duty;

ONDUTY(TODAY)=

@SUM(DAYS(D)|D #LE# 5:

START(@WRAP(TODAY- D + 1,

@SIZE(DAYS))));

!Enforce staffing requirement;

ONDUTY(TODAY)>= NEEDS(TODAY);

@GIN(START);

);

DATA:

NEEDS= @POINTER(1);

@POINTER(2)= START;

@POINTER(3)= ONDUTY;

@POINTER(4)= OBJECTIVE;

@POINTER(5)= @STATUS();

ENDDATA

END

這是lng模型檔案，檔案的model部分不多做介紹，這裡主要介紹的是DATA部分，學過Lingo的朋友應該知道,Lingo模型的DATA部分，是模型的資料部分，用於初始模型中某些變數的值，

Lingo的安裝:這裡並不是要說明如何下載與安裝lingo,而是說明安裝完畢後所需要另外做的幾件事情。

1.在Linux系統下，在命令終端中進入lingo安裝目錄下的bin/linux32目錄，而後執行

sudo./lingovars.sh以及sudo./symlinks.sh在執行完此命令後，還必須將bin/linux32這個目錄加入LD_LIBRARY_PATH環境變數中。

2.在windows中則必須將lingo.exe所在目錄加入PATH環境變數中，這個設定可以通過，我的電腦--》屬性-》高階-》環境變數-》Path中新增得到。

如果不這麼做在執行java程式時就會報載入庫檔案異常。

Java程式碼的編寫:在Eclipse中新建一個java工程,並且引入lingo安裝檔案下的Lingo11.jar（具體名稱因版本而稍有不同）。再新建一個java檔案程式碼如下:

package com.xuen.test;
import java.awt.*;
import java.awt.event.*;
import java.io.File;

import javax.swing.*;

import com.lindo.Lingd11;


public class Staff1 implements ActionListener
{
   // Load the Lingo JNI interface
   static {
      System.loadLibrary( "Lingj11");
   }

   // Create a new Lingo object, which we will use to interface with Lingo
   Lingd11 lng = new Lingd11();

   // Stores the Lingo JNI environment pointer
   Object pnLngEnv;

   JFrame f;
   JPanel p;
   JTextField jtfNeeds[] = new JTextField[ 7];
   JTextField jtfStart[] = new JTextField[ 7];
   JTextField jtfOnDuty[] = new JTextField[ 7];
   JTextField jtfTotal;
   JButton jbtnSolve = new JButton("Solve");
   JButton jbtnExit = new JButton("Exit");

   int nLastIterationCount;

   public Staff1()
   {

      // Create the frame and panel
      f = new JFrame("Lingo staffing example using Java");
      p = new JPanel();                          //  t   l   b   r
      p.setBorder( BorderFactory.createEmptyBorder( 30, 10, 30, 50));
      p.setLayout( new GridLayout(10, 4, 40, 20));

      // Add the widgets.
      addWidgets();

      // Add the panel to the frame.
      f.getContentPane().add( p, BorderLayout.CENTER);

      // Exit when the window is closed.
      f.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);

      // Show the frame
      f.pack();
      f.setVisible(true);

      // no solver iterations performed yet;
      nLastIterationCount = -1;
 
   }

   private void addWidgets()
   {
      String sDays[] = {"Mon", "Tue", "Wed", "Thu", "Fri", "Sat", "Sun"};
      JLabel jl[] = new JLabel[ 7];

      // Row 1...the headers
      JLabel jlHdrDay = new JLabel( "Day:", JLabel.RIGHT);
      p.add( jlHdrDay);
      JLabel jlHdrNeeds = new JLabel( "Needs:", JLabel.RIGHT);
      p.add( jlHdrNeeds);
      JLabel jlHdrStart = new JLabel( "Start:", JLabel.RIGHT);
      p.add( jlHdrStart);
      JLabel jlHdrOnDuty = new JLabel( "On Duty:", JLabel.RIGHT);
      p.add( jlHdrOnDuty);

      // Rows 2-8...days of the week
      for ( int i = 0; i < 7; i++)
      {

         jl[ i] = new JLabel( sDays[ i], JLabel.RIGHT);
         p.add( jl[ i]);
         jtfNeeds[ i] = new JTextField( "0", 5);
         jtfNeeds[ i].setHorizontalAlignment( JTextField.RIGHT);
         p.add( jtfNeeds[ i]);
         jtfStart[ i] = new JTextField( "0", JLabel.RIGHT);
         jtfStart[ i].setEditable( false);
         jtfStart[ i].setHorizontalAlignment( JTextField.RIGHT);
         p.add( jtfStart[ i]);
         jtfOnDuty[ i] = new JTextField( "0", JLabel.RIGHT);
         jtfOnDuty[ i].setEditable( false);
         jtfOnDuty[ i].setHorizontalAlignment( JTextField.RIGHT);
         p.add( jtfOnDuty[ i]);

      }

      // Row 9...displays total of Start column
      JLabel jlNull1 = new JLabel( " ", JLabel.RIGHT);
      p.add( jlNull1);
      JLabel jlTotal = new JLabel( "Total...", JLabel.RIGHT);
      p.add( jlTotal);
      jtfTotal = new JTextField( "0", JLabel.RIGHT);
      jtfTotal.setEditable( false);
      jtfTotal.setHorizontalAlignment( JTextField.RIGHT);
      p.add( jtfTotal);
      JLabel jlNull3 = new JLabel( " ", JLabel.RIGHT);
      p.add( jlNull3);

      // Row 10...Solve and Exit buttons
      JLabel jlNull4 = new JLabel( " ", JLabel.RIGHT);
      p.add( jlNull4);
      JLabel jlNull5 = new JLabel( " ", JLabel.RIGHT);
      p.add( jlNull5);
      jbtnSolve.addActionListener( this);
      p.add( jbtnSolve);
      jbtnExit.addActionListener( this);
      p.add( jbtnExit);

   }

   // Implementation of ActionListener interface.
   public void actionPerformed( ActionEvent event)
   {
      Object source = event.getSource();

      if ( source == jbtnSolve)
      {
         Solve();
      } else {
         System.exit( 0);
      }
   }

   private static int MySolverCallback( Object pnLng, int iLoc, Object jobj)
   {
      Staff1 s = (Staff1) jobj;
      int nIterations[] = new int [1];
      s.lng.LSgetCallbackInfoIntLng( pnLng, Lingd11.LS_IINFO_ITERATIONS_LNG, nIterations);
      if ( nIterations[0] != s.nLastIterationCount)
      {
         s.nLastIterationCount = nIterations[0];
         System.out.println("In Java callback function...iterations = " + s.nLastIterationCount);
      }
      return( 0);
   }

   private static int MyErrorCallback( Object pnLng, int nErrorCode, String jsErrMessage, Object jobj)
   {
      System.out.println("Lingo error code: " + nErrorCode);
      System.out.println("Lingo error message:\n\n " + jsErrMessage);
      return( 0);
   }

   private void Solve()
   {

      int nErr;
      Double d1=0.;
      double dNeeds[] = new double[7];
      double dStart[] = new double [7];
      double dOnDuty[] = new double [7];
      double dObj[] = new double [1];
      double dStatus[] = new double [1];

      System.out.println("\nSolving...");
      
      // get the staffing requirements
      for ( int i=0; i<7; i++)
      {
         String s = jtfNeeds[i].getText();
         try {
            dNeeds[ i] = d1.valueOf( s);
         }
         catch ( Exception e)
         {
            dNeeds[ i] = 0.;
         }
      }
      
      // clear output fields
      for ( int i=0; i<7; i++)
      {
         jtfStart[i].setText( " ");
         jtfOnDuty[i].setText( " ");
      }
      jtfTotal.setText( " ");
      
      // create the Lingo environment
      pnLngEnv = lng.LScreateEnvLng();
      if ( pnLngEnv == null)
      {
         System.out.println( "***Unable to create Lingo environment***");
         return;
      }
      
      // open a log file
      nErr = lng.LSopenLogFileLng( pnLngEnv, "lingo.log");
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSopenLogFileLng() error***: " + nErr);
         return;
      }
      
      // pass lingo a pointer to the staffing needs
      int[] nPointersNow = new int[1];
	  nErr = lng.LSsetPointerLng( pnLngEnv, dNeeds, nPointersNow);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSsetPointerLng() error***: " + nErr);
         return;
      }
      
      // pass pointers to output areas
	  nErr = lng.LSsetPointerLng( pnLngEnv, dStart, nPointersNow);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSsetPointerLng() error***: " + nErr);
         return;
      }
	  nErr = lng.LSsetPointerLng( pnLngEnv, dOnDuty, nPointersNow);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSsetPointerLng() error***: " + nErr);
         return;
      }
	  nErr = lng.LSsetPointerLng( pnLngEnv, dObj, nPointersNow);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSsetPointerLng() error***: " + nErr);
         return;
      }
	  nErr = lng.LSsetPointerLng( pnLngEnv, dStatus, nPointersNow);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSsetPointerLng() error***: " + nErr);
         return;
      }
      
      // pass Lingo the name of the solver callback function...
      nErr = lng.LSsetCallbackSolverLng( pnLngEnv, "MySolverCallback", this);
      
      // ...and the error callback function
      nErr = lng.LSsetCallbackErrorLng( pnLngEnv, "MyErrorCallback", this);
      
      // construct the script
      
      // echo input to log file
      String sScript = "SET ECHOIN 1" + "\n";
      
      // load the model from disk
      File f=new File("Staffptr.lng");
      sScript = sScript + "TAKE "+f.getAbsolutePath() + "\n";
      
      // view the formulation
      sScript = sScript + "LOOK ALL" + "\n";
      
      // solve
      sScript = sScript + "GO" + "\n";
      
      // exit script processor
      sScript = sScript + "QUIT" + "\n";
      
      // run the script
      dStatus[0] = -1;
      nLastIterationCount = -1;
	  nErr = lng.LSexecuteScriptLng( pnLngEnv, sScript);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSexecuteScriptLng error***: " + nErr);
         return;
      }
      
      // clear the pointers to force update of local arrays
      // ***NOTE*** solution won't get passed to local arrays until
      // LSclearPointersLng is called!!!
	  nErr = lng.LSclearPointersLng( pnLngEnv);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LSclearPointerLng() error***: " + nErr);
         return;
      }
      
      // check the solution status
      if ( dStatus[0] != lng.LS_STATUS_GLOBAL_LNG) 
       System.out.println( "***Unable to Solve*** dStatus:" + dStatus[0]);
      
      // close Lingo's log file
	  nErr = lng.LScloseLogFileLng( pnLngEnv);
      if ( nErr != lng.LSERR_NO_ERROR_LNG )
      {
         System.out.println( "***LScloseLogFileLng() error***: " + nErr);
         return;
      }
	  
      // delete the Lingo environment
      lng.LSdeleteEnvLng( pnLngEnv);
      
      // post the solution
      Integer nTotal = 0;
      for ( int i=0; i<7; i++)
      {
         Double d = dStart[i];
         Integer n = d.intValue(); 
         jtfStart[i].setText( n.toString());
         nTotal = nTotal + n;
      
         d = dOnDuty[i];
         n = d.intValue();
         jtfOnDuty[i].setText( n.toString());
      }
      jtfTotal.setText( nTotal.toString());
    
      //System.out.println( "free Java memory: " +  Runtime.getRuntime().freeMemory());
   }

   // main method
   public static void main(String[] args) {
      Staff1 s = new Staff1();
   }

}

編寫完上述程式碼後還需編寫Lingo模型檔案，在工程資料夾下新建一個STAFFPTR.LNG的文字檔案，並在其中寫入如下內容:

MODEL:

SETS:

DAYS/ MON TUE WED THU FRI SAT SUN/:

NEEDS,START, ONDUTY;

ENDSETS

[OBJECTIVE]MIN = @SUM( DAYS( I): START( I));

@FOR(DAYS( TODAY):

!Calculate number on duty;

ONDUTY(TODAY) =

@SUM(DAYS( D)| D #LE# 5:

START(@WRAP( TODAY - D + 1, @SIZE( DAYS))));

!Enforce staffing requirement;

ONDUTY(TODAY) >= NEEDS( TODAY);

@GIN(START);

);

DATA:

NEEDS= @POINTER( 1);

@POINTER(2) = START;

@POINTER(3) = ONDUTY;

@POINTER(4) = OBJECTIVE;

@POINTER(5) = @STATUS();

ENDDATA

END

完成後右鍵執行即可，如果執行時報如下錯誤，

Exceptionin thread "main" java.lang.UnsatisfiedLinkError:

則說明你的安裝過程有錯（或者你是用的lingo精簡版），重新執行上面所說的Lingo的安裝過程,以及配置eclipse的runconfigurations的環境變數。

最後說明一點，其實這些知識lingo的幫助檔案說明的很清楚，對於一項陌生的應用幫助檔案是最好的老師。