Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: YS119PST

Package: Mental Health

Routine: YS119PST


Information

YS119PST ;SLC/KCM - Patch 119 post-init - PCL-5 ; 9/15/2015

Source Information

Source file <YS119PST.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Mental Health 2 ($$FINDTEST,FIXTESTS,UPDDT)^YS119PS0  FIXDATE^YS119PS3  
VA FileMan 2 (FILE,UPDATE,WP)^DIE  CLEAN^DILF  
Kernel 1 (BMES,MES)^XPDUTL  

Entry Points

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

External References

Name Field # of Occurrence
FILE^DIE FLD2DLL+4, FLD2DROP+3
UPDATE^DIE ADDSCALE+13, ADDKEY+17
WP^DIE UPDPCLQ+18, UPDPCLR+5
CLEAN^DILF UPDPCLQ+20, FLD2DLL+6, FLD2DROP+5, ADDSCALE+16, ADDKEY+19, UPDPCLR+7
BMES^XPDUTL UPDPCLQ+19, FLD2DLL+5
MES^XPDUTL FLD2DROP+4, ADDSCALE+14, ADDKEY+18, UPDPCLR+6
$$FINDTEST^YS119PS0 PCL5+8
FIXTESTS^YS119PS0 POST+2
UPDDT^YS119PS0 PCL5+9, DROPPCL+5
FIXDATE^YS119PS3 PCL5+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^YTT(601.72 - [#601.72] WP^DIE
^YTT(601.93 - [#601.93] WP^DIE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("DIERR" UPDPCLQ+19, FLD2DLL+5, FLD2DROP+4, ADDSCALE+14, ADDKEY+18, UPDPCLR+6
^YTT(601.71 - [#601.71] UPDPCLQ+8, UPDCPLX+3, DROPPCL+3, ADDSCLS+3, UPDPCLR+2
^YTT(601.76 - [#601.76] UPDPCLQ+10, UPDPCLQ+11, ADDKEYS+11, ADDKEYS+12
^YTT(601.86 - [#601.86] ADDSCLS+4
^YTT(601.87 - [#601.87] ADDSCALE+1, ADDSCALE+2, ADDSCALE+4
^YTT(601.91 - [#601.91] ADDKEY+4, ADDKEY+5, ADDKEY+8
^YTT(601.93 - [#601.93] UPDPCLR+3

Label References

Name Line Occurrences
ADDKEY ADDKEYS+15
ADDKEYS ADDSCLS+5, ADDSCLS+6, ADDSCLS+7, ADDSCLS+8
ADDSCALE ADDSCLS+5, ADDSCLS+6, ADDSCLS+7, ADDSCLS+8
ADDSCLS PCL5+5
DROPPCL PCL5+4
FLD2DLL UPDCPLX+4
FLD2DROP DROPPCL+4
PCL5 POST+1
Q10 UPDPCLQ+3
Q14 UPDPCLQ+4
Q15 UPDPCLQ+5
Q16 UPDPCLQ+6
UPDCPLX PCL5+3
UPDPCLQ PCL5+2
UPDPCLR PCL5+6

Naked Globals

Name Field # of Occurrence
^(0 ADDKEY+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CIEN ADDKEYS+2~, ADDKEYS+11*, ADDKEYS+12
CONTENT UPDPCLQ+1~, UPDPCLQ+10*, UPDPCLQ+11
DESIG UPDPCLQ+1~, UPDPCLQ+11*, UPDPCLQ+12, UPDPCLQ+13, UPDPCLQ+17, ADDKEYS+2~, ADDKEYS+12*, ADDKEYS+13
DIERR UPDPCLQ+16~, UPDPCLQ+19, FLD2DLL+1~, FLD2DLL+5, FLD2DROP+1~, FLD2DROP+4, ADDSCALE+6~, ADDSCALE+14, ADDSCALE+15, ADDKEY+10~
, ADDKEY+18, UPDPCLR+1~, UPDPCLR+6
EXISTS ADDKEY+2~, ADDKEY+3*, ADDKEY+4, ADDKEY+5*, ADDKEY+6
FDA FLD2DLL+1~, FLD2DROP+1~, ADDSCALE+6~, ADDKEY+10~
FDA( FLD2DLL+2*, FLD2DLL+3*, FLD2DROP+2*, ADDSCALE+8*, ADDSCALE+9*, ADDSCALE+10*, ADDSCALE+11*, ADDSCALE+12*, ADDKEY+12*, ADDKEY+13*
, ADDKEY+14*, ADDKEY+15*, ADDKEY+16*
FDAIEN ADDSCALE+6~, ADDKEY+10~
FDAIEN(1 ADDSCALE+7*, ADDSCALE+15, ADDKEY+11*
FIRST ADDKEYS~, ADDKEYS+8
GRP ADDSCLS+1~, ADDSCLS+4*, ADDSCLS+5, ADDSCLS+6, ADDSCLS+7, ADDSCLS+8, ADDSCALE~, ADDSCALE+1, ADDSCALE+2, ADDSCALE+9
I ADDKEY+2~, ADDKEY+4*, ADDKEY+5, UPDPCLR+1~, UPDPCLR+4*
ID ADDSCALE~, ADDSCALE+4*, ADDSCALE+7, ADDSCALE+8, ADDKEY~, ADDKEY+8*, ADDKEY+11, ADDKEY+12
IDX UPDCPLX+1~, UPDCPLX+2*
KEYID ADDSCLS+1~, ADDSCLS+2*, ADDKEYS+15*
LAST ADDKEYS~, ADDKEYS+8
NM ADDSCALE~, ADDSCALE+11, ADDSCALE+12
PCL5 UPDPCLQ+1~, UPDPCLQ+8*, UPDPCLQ+10, ADDSCLS+1~, ADDSCLS+3*, ADDSCLS+4, ADDKEYS+11, UPDPCLR+1~, UPDPCLR+2*, UPDPCLR+3
QIEN UPDPCLQ+1~, UPDPCLQ+14*, UPDPCLQ+18, ADDKEYS+2~, ADDKEYS+10*, ADDKEYS+11, ADDKEYS+13*, ADDKEYS+15
QNUM ADDKEYS+2~, ADDKEYS+8*, ADDKEYS+13
QUES UPDPCLQ+1~
QUES( UPDPCLQ+13, UPDPCLQ+17
QUES("10." UPDPCLQ+3*
QUES("14." UPDPCLQ+4*
QUES("15." UPDPCLQ+5*
QUES("16." UPDPCLQ+6*
QUESTION ADDKEY~, ADDKEY+5, ADDKEY+14
RPT UPDPCLR+1~, UPDPCLR+3*, UPDPCLR+5
SCALE ADDSCLS+1~, ADDSCLS+5, ADDSCLS+6, ADDSCLS+7, ADDSCLS+8, ADDSCALE~, ADDSCALE+2*, ADDSCALE+15*, ADDKEYS~, ADDKEYS+15
, ADDKEY~, ADDKEY+4, ADDKEY+13
SEQ ADDSCALE~, ADDSCALE+1, ADDSCALE+2, ADDSCALE+10
TARGET ADDKEY~, ADDKEY+5, ADDKEY+15
TSTIEN PCL5+7~, PCL5+8*, PCL5+9, UPDCPLX+1~, UPDCPLX+3*, UPDCPLX+4, FLD2DLL~, FLD2DLL+2, FLD2DLL+3, DROPPCL+1~
DROPPCL+3*, DROPPCL+4, DROPPCL+5, FLD2DROP~, FLD2DROP+2
TSTNM UPDCPLX+1~, UPDCPLX+2*, UPDCPLX+3, DROPPCL+1~, DROPPCL+2*, DROPPCL+3
U UPDPCLQ+11, UPDPCLQ+14, ADDKEYS+12, ADDKEYS+13, ADDKEY+5
VALUE ADDKEYS+2~, ADDKEYS+15*, ADDKEY~, ADDKEY+16
VALUES ADDKEYS+2~
VALUES( ADDKEYS+15
VALUES(0 ADDKEYS+3*
VALUES(1 ADDKEYS+4*
VALUES(2 ADDKEYS+5*
VALUES(3 ADDKEYS+6*
VALUES(4 ADDKEYS+7*
WP UPDPCLQ+16~, UPDPCLR+1~
WP( UPDPCLR+4*
WP(1 UPDPCLQ+17*
X UPDPCLR+1~, UPDPCLR+4*
X0 UPDPCLQ+1~, UPDPCLQ+11*, UPDPCLQ+14, ADDKEYS+2~, ADDKEYS+12*, ADDKEYS+13

Marked Items

Name Field # of Occurrence
$T(DLLTEST+IDX UPDCPLX+2
$T(Q10 UPDPCLQ+3
$T(Q14 UPDPCLQ+4
$T(Q15 UPDPCLQ+5
$T(Q16 UPDPCLQ+6
$T(RPTFMT+I UPDPCLR+4
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All