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 |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: YS130PST

Package: Mental Health

Routine: YS130PST


Information

YS130PST ;SLC/KCM - Patch 130 Post-Init ; 1/25/2017

Source Information

Source file <YS130PST.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 $$REPLACE^XLFSTR  MES^XPDUTL  $$CREATE^XUSAP  
Mental Health 3 SETCATS^YS130PS0  SAVE96^YTWJSONF  FMUPD^YTXCHGU  
VA FileMan 1 $$FIND1^DIC  

Entry Points

Name Comments DBIA/ICR reference
EDTDATE ; date used to update 601.71:18
POST ; Post-init for YS*5.01*130
PROXY ; Create proxy user
LPSTAFF ; Loop through instruments to set staff entry only
UPDSTAFF(NAME,VALUE) ; Update STAFF ENTRY ONLY field
FIXANS(TESTNM) ; Fix the case of the answer tags for
STAFF ; Staff Entry Only Instruments

External References

Name Field # of Occurrence
$$FIND1^DIC PROXY+1
$$REPLACE^XLFSTR FIXANS+10
MES^XPDUTL PROXY+2, PROXY+4
$$CREATE^XUSAP PROXY+3
SETCATS^YS130PS0 POST+6
SAVE96^YTWJSONF POST+3
FMUPD^YTXCHGU UPDSTAFF+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^YTT(601.71 - [#601.71] UPDSTAFF+2, FIXANS+5
^YTT(601.93 - [#601.93] FIXANS+6, FIXANS+7, FIXANS+8, FIXANS+11*

Label References

Name Line Occurrences
FIXANS POST+1, POST+2
LPSTAFF POST+5
PROXY POST+4
UPDSTAFF LPSTAFF+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
I LPSTAFF+1~, LPSTAFF+2*, FIXANS+1~, FIXANS+4~, FIXANS+7*, FIXANS+8, FIXANS+11
IEN UPDSTAFF+1~, UPDSTAFF+2*, UPDSTAFF+5
NAME UPDSTAFF~, UPDSTAFF+2
REC UPDSTAFF+1~, UPDSTAFF+5
REC(18 UPDSTAFF+4*
REC(94 UPDSTAFF+3*
RPT FIXANS+1~, FIXANS+4~, FIXANS+6*, FIXANS+7, FIXANS+8, FIXANS+11
SWAP FIXANS+1~, FIXANS+10
SWAP("<*ANSWER_7771*>" FIXANS+2*
SWAP("<*ANSWER_7778*>" FIXANS+3*
TEST FIXANS+1~, FIXANS+4~, FIXANS+5*, FIXANS+6
TESTNM FIXANS~, FIXANS+5
U LPSTAFF+2
VALUE UPDSTAFF~, UPDSTAFF+3
X LPSTAFF+1~, LPSTAFF+2*, FIXANS+1~, FIXANS+8*, FIXANS+9, FIXANS+10*, FIXANS+11

Marked Items

Name Field # of Occurrence
$T(EDTDATE+1 UPDSTAFF+4
$T(STAFF+I LPSTAFF+2
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All