Revision 44389 trunk/org.gvsig.desktop/org.gvsig.desktop.library/org.gvsig.expressionevaluator/org.gvsig.expressionevaluator.lib/org.gvsig.expressionevaluator.lib.impl/src/test/resources/org/gvsig/expressionevaluator/impl/TestScript1_2.txt

View differences:

TestScript1_2.txt
4 4 
    SET x  '';
5 5 
    FOR n IN LIST('hola','adios','fin'):
6 6 
        SET x = x || ' ' || n;
7 
    END FOR
7 
    END
8 8 
    RETURN x;
9 9 
END
10
10 

  		




  11
  11
  
    
CREATE FUNCTION test2 AS


  		




  12
  12
  
    
$$


  		




  13
  13
  
    
    SET s  ''; 


  		




  14
  14
  
    
    SET x TO LIST('hola','adios','fin'); 


  		




  15
  15
  
    
    FOR n IN RANGE(3):


  		




  16
  16
  
    
        SET s = s || ' ' || x[n]; 


  		




  17
  
  
    
    END FOR


  		




  
  17
  
    
    END FOR;


  		




  18
  18
  
    
    RETURN s;


  		




  19
  19
  
    
$$


  		




  
  20
  
    

  		




  
  21
  
    
CREATE FUNCTION saluda AS


  		




  
  22
  
    
    IF LEN($ARGS) > 0 THEN


  		




  
  23
  
    
        SET s TO 'Hola ' || $ARGS[0];


  		




  
  24
  
    
    ELSE


  		




  
  25
  
    
        SET s = 'Hola.';


  		




  
  26
  
    
    END;


  		




  
  27
  
    
    PRINT(s);


  		




  
  28
  
    
    RETURN s;


  		




  
  29
  
    
END


  		




  
  30
  
    

  		




  
  31
  
    
CREATE FUNCTION test3 AS


  		




  
  32
  
    
    RETURN saluda('amigos');


  		




  
  33
  
    
END


  		












Also available in:  Unified diff