data test;
q1="Patient's symptoms and behaviors of the psychiatric AE are similar to the ones that patient is normally experiencing. They are not different from the symptoms patient had when he got
admitted to the hospital and which we observed during visits 1and 2. Patient remained hearing voices of imperative and commenting nature in his head, he retained ideas of external influence
on his thoughts and body. As he was receiving the studied drug, anxiety levels have decreased and sleep quality has improved. However, psychosis has remained during visits 9 and 10, for this reason patient needed to remain in the hospital for treatment. According to the Study Protocol, this situation was registered as SAE.";
l = klength(q1);
put _all_;
array _x[4] $200 FAOBJ_1-FAOBJ_4;
if _n_ eq 1 then addr=addrlong(_x[1]);
retain addr; drop addr;
call pokelong(q1,addr,l);
run;
proc contents varnum;
proc print; run;
... View more