Reference

Commande de compilation


javac -g -classpath ${UPS_HOME}/upsjav/upsjav/french/upsvtm.jar reference.java

Commande d'exécution


java ${UPS_HOME}/upsjav/upsjav/french/upsvtm.jar;. -Djava.library.path=${UPS_HOME}/upsvtm/bin;${UPS_HOME}/upsnet/bin;${UPS_HOME}/upscmp/bin;${UPS_HOME}/upscom/bin;${UPS_HOME}/upscrb/bin;${UPS_HOME}/upsjav/bin;${UPS_HOME}/upsjav/bin/french reference

Fichier source


import UpsKrn.Caractere;

import UpsKrn.Reel;

import UpsKrn.MUpsKrn;

import UpsKrn.UpsException;



public class reference

/******************/

{

public static void main(String s[])

/*********************************/

{

Caractere A;

Reference R1;

Reference R2;



try


   {

   if (!MUpsKrn.Demarrer())
   
      return;
   
   

   A=MUpsKrn.JavaString2Caractere("A");

   R1=Reference.Reference(MUpsKrn.Caractere(),A);

   R2=Reference.Reference(MUpsKrn.Caractere(),MUpsKrn.JavaString2Caractere("B"));

   System.out.println(MUpsKrn.Caractere2JavaString((Caractere)R1.Valeur()));

   if (MUpsKrn.Booleen2JavaBoolean(R1.Egal(R2)))
   
      System.out.println("R1==R2");
   
   if (MUpsKrn.Booleen2JavaBoolean(R1.Different(R2)))
   
      System.out.println("R1!=R2");
   
   R2=R1;

   if (R1.Valeur().Identique(R2.Valeur()))
   
      System.out.println("R1.Valeur==R2.Valeur");
   
   R1.Valeur((Objet)MUpsKrn.JavaString2Caractere("C"));

   System.out.println(MUpsKrn.Caractere2JavaString((Caractere)R2.Valeur()));

   

   MUpsKrn.Arreter();

   }

catch (java.lang.Throwable e)

   {

   try
   
      {

      System.out.println("Erreur UpsKrn-0 : L'exception suivante a été envoyée dans le source '"

      
         +e.NomSourceEnErreur+"' ligne "+e.NumeroLigne+", colonne "+e.NumeroColonne+" :");
      
      System.out.println(e.MessageErreur);

      }
   
   catch (java.lang.Throwable e2)
   
      {

      System.out.println(e2.toString());

      }
   
   }

}

}