Janitza UMG 604E Mains-analysis device, Mains analyser CAT III 300 V 52.16.002 Benutzerhandbuch

Produktcode
52.16.002
Seite von 151
Programmiersprache Jasic 
63 
GET_REC_VARLIST 
 Liefert maximal alle Variablennamen einer aktuellen Aufzeichnung 
  record reclist = (int,error) (string,recname$) (int,count) (string,varname$[0..count-1]) 
Die Variable "recname$" muß den Namen der Aufzeichnung enthalten. Die Anzahle der zu 
ermittelnden Variablennamen wird in "count" übergeben. 
Beispiel: 
record reclist = (int,error) (int,count) 
(string,namen$[0..15]) (int,timebase[0..15]) 
(int,reccount[0..15]) 
record recvarlist = (int,error) (string,recnamen$) (int,count) 
(string,varname$[0..24]) call get_rec_list reclist 
if reclist.reccount[0]>15 then reclist.reccount[0]= 15; endif 
recvarlist.count = reclist.reccount[0]; 
MaxSelection3 = reclist.reccount[0]+1; 
recvarlist.recnamen$ = reclist.namen$[0]; 
call get_rec_varlist recvarlist 
clearimage 
SetFont(3) 
y=210 
x=10 
GotoXY x,y 
SetTextColor CL_BLUE 
TextOut Format("Record (%.f): ",reclist.reccount[0]), 
recvarlist.recnamen$; 
SetFont(1) 
y=190 
x=10 
GotoXY x,y 
for i=1 to reclist.reccount[0] do 
 SetTextColor CL_GREEN 
 TextOut recvarlist.varname$[i-1] 
 y=y-10;