Jan:
Here's a simple example:
output="example.lst";
input="portfoli.lst";
integer i;
For i = 0 to -3 step -1 do
If Close(i) > Close(i-1) then
println symbol,",",close(i):8:3, ",", date(i);
endif;
next i;
The output looks like this:
A , 20.875,06/25/1998
A , 20.750,06/24/1998
AA , 64.500,06/23/1998
AAB , 20.625,06/24/1998
AAB , 20.375,06/22/1998
AABC , 12.375,06/24/1998
AAC , 8.500,06/24/1998
AAC , 7.312,06/23/1998
AACE , 17.875,06/24/1998
AACE , 16.750,06/23/1998
AACE , 16.500,06/22/1998
AAFG , 0.312,06/25/1998
AAFG , 0.281,06/22/1998
AAG , 23.875,06/24/1998
AAG , 23.812,06/23/1998
AAGIY , 3.750,06/23/1998
AAGP , 2.062,06/25/1998
AAGP , 2.031,06/23/1998
AAII , 12.500,06/23/1998
AAIR , 8.156,06/24/1998
AAIR , 8.125,06/23/1998
AAIR , 8.062,06/22/1998
AAM , 14.250,06/25/1998
AAM , 14.000,06/24/1998
AAM , 13.875,06/23/1998
|
