Janitza UMG 604E Mains-analysis device, Mains analyser CAT III 300 V 52.16.002 Benutzerhandbuch
Produktcode
52.16.002
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.
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])
(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
(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$;
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;