YS119PST ;SLC/KCM - Patch 119 post-init - PCL-5 ; 9/15/2015
Source file <YS119PST.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| POST | ; Post-init calls for patch 119
 | 
|
| PCL5 | ; Update the PCL-5 definitions
 | 
|
| UPDPCLQ | ; Update the PCL-5 questions
 | 
|
| UPDCPLX | ; Update complex (DLL-scored) test entries
 | 
|
| FLD2DLL(TSTIEN) | ; update record to contain DLL^YTSCORE
 | 
|
| DROPPCL | ; Disable the other PCL tests
 | 
|
| FLD2DROP(TSTIEN) | ; update OPERATIONAL field to be "Dropped"
 | 
|
| ADDSCLS | ; add scales for PCL-5
 | 
|
| ADDSCALE(SCALE,ID,GRP,SEQ,NM) | ; add a new scale
 | 
|
| ADDKEYS(SCALE,FIRST,LAST) | ; Add a set of scoring keys for PCL-5
 ; from: ADDSLCS expects: PCL5,KEYID  | 
|
| ADDKEY(ID,SCALE,QUESTION,TARGET,VALUE) | ; add a new scoring key
 ; quit if key already there  | 
|
| UPDPCLR | ; update the PCL-5 report to include cluster information
 | 
|
| DLLTEST | ; tests scored by DLL
 | 
|
| Q10 | ;;Blaming yourself or someone else for the stressful experience or what happened after it?
 | 
|
| Q14 | ;;Trouble experiencing positive feelings (for example, being unable to feel happiness or have loving feelings for people close to you)?
 | 
|
| Q15 | ;;Irritable behavior, angry outbursts, or acting aggressively?
 | 
|
| Q16 | ;;Taking too many risks or doing things that could cause you harm?
 | 
|
| RPTFMT | ; PCL-5 report text
 | 
| FileNo | Call Tags | 
|---|---|
| ^YTT(601.72 - [#601.72] | WP^DIE | 
| ^YTT(601.93 - [#601.93] | WP^DIE |