Tremor-Untersuchunge.. - Jochen Fahrenberg

- 102 -
Anhang 4: SAS-Macro POMO
/*** Posture and Motion ***/
/* Studie 97: Wolfach 8-10/1999 (Tanja Thielgen) */
/* VERSION 2: Standardisierung nur wenn unterschiedliche Variable */
/* 2.11.2000: Bauchlage bei Patient 7 */
/**** MACRO: POMOW.MRC
***/
Aufruf:
pomo;
Die einzugebenden Parameter sind:
lib = Libname
nr = Patienten_nummer (3-stellig)
schlaf = Nummer der Situation, der die bevorzugte
ruhe
Schlafstelung zugeordnet wird
= Nummer der Situation, der die bevorzugte
Ruhestellung zugeordnet wird
seg_min= Anzahl Minuten, die bei Monitoring zu
einem Segment zusammengefasst werden sollen
Ein Macro muss nach SAS-Start e i n m a l geladen werden
(open-abschicken). Danach nur noch aufrufen.
%window ask_pomw irow=10 rows=30
#1 @31 "MACRO POMO"
#2 @26 "(Dipl.Math.F.Foerster)"
#3 @13 "POsition & MOtion, Tremordaten, Studie 97, Klinik Wolfach"
#7 @4 "Bitte geben Sie folgende Parameter ein:"
#8 @4 "======================================="
#10 @9 "Libname:"
#10 @72 lib 5 attr=underline
#12 @9 "Patient-Nummer (3-stellig):"
#12 @72 nr 3 attr=underline
#14 @9 "Nummer der Situation, der die bevorz. Schlafst. entspricht:"
#14 @72 schlaf 2 attr=underline
#16 @9 "Nummer der Situation, der die bevorz. Ruhestel. entspricht:"
#16 @72 ruhe 2 attr=underline
#18 @9 "Anzahl Minuten, die bei Monitoring zu Segment zusammengefasst:"
#18 @72 seg_min 2 attr=underline
;
%macro pomo;
%let lib=wo; %let nr=000;
%let schlaf=13; %let ruhe=11;
%let seg_min=5;
%display ask_pomw;
/* Monitoring-Phase verdichten */
data pomokat; set &lib..s97_&nr;
array x(*) _numeric_;
array q(200) _temporary_; /* DIM(x) muss le 200 sein!! */
array k(201) _temporary_;
array m(1) _temporary_;