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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: SCMCMHHP

Package: Scheduling

Routine: SCMCMHHP


Information

SCMCMHHP ;BP-CIOFO/KEITH - Historical Patient Assignment Detail ; 23 Feb 12 3:30 PM

Source Information

Source file <SCMCMHHP.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Scheduling 5 $$TMPT^SCAPMC  $$GETALL^SCAPMCA  ($$DTR,HDR)^SCRPO  DISP0^SCRPW23  (END,TITL)^SCRPW50  
VA FileMan 3 ^DIC  $$GET1^DIQ  ^DIR  
Kernel 2 $$NOW^XLFDT  EN^XUTMDEVQ  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Scheduling 1 SCMC MH PCMM HIST PAT RPT  

Entry Points

Name Comments DBIA/ICR reference
PTDET
EXIT
RUN ;Print report
SHDR ;Subheader
SSHDR(X,CONT) ;Subheader
SLINE(SCORD,SCNAME,SCACT,SCINAC,SCUSER,SCDENT,SUNM,SCTNM,SCBNM,SCLN) ;Set report global
CODE ;Data handling instructions
; The following $TEXT lines contain data handling instructions
; in the format: $PIECE 1 = output order
; 2 = subtitle
; 3 = global reference of history record
; 4 = $piece of history record ifn
; 5 = $piece of active date
; 6 = $piece of inactive date
; 7 = $piece of user (in history record)
; 8 = $piece of provider/position/team name
; 9 = $piece of date entered
NPCPOS ;;7^Non-PC Position^SCPT(404.43)^4^5^6^6^2^7
NPCPPOS ;;9^Non-PC Preceptor Position^SCTM(404.53)^16^14^15^7^2^8
NPCPPR ;;8^Non-PC Preceptor Provider^SCTM(404.52)^11^9^10^7^2^8
NPCPR ;;6^Non-PC Provider^SCTM(404.52)^11^9^10^7^2^8
NPCTM ;;10^Non-PC Team^SCPT(404.42)^3^4^5^11^2^12
PCAP ;;2^PC Associate Provider^SCTM(404.52)^11^9^10^7^2^8
PCPOS ;;3^PC Position^SCPT(404.43)^4^5^6^6^2^7
PCPPOS ;;4^PC Preceptor Position^SCTM(404.53)^16^14^15^7^2^8
PCPR ;;1^PC Provider^SCTM(404.52)^11^9^10^7^2^8
PCTM ;;5^PC Team^SCPT(404.42)^3^4^5^11^2^12
SDT(X) ;Slashed date
MHTEAM(DFN) ;Patch 589 used to exclude all teams that are not Mental Health
; Input
; DFN = Patient DFN

External References

Name Field # of Occurrence
^DIC PTDET+2
$$GET1^DIQ RUN+20, RUN+21, RUN+22
^DIR PTDET+11, RUN+53
$$TMPT^SCAPMC MHTEAM+15
$$GETALL^SCAPMCA RUN+5
$$DTR^SCRPO PTDET+4
HDR^SCRPO RUN+34, RUN+37, RUN+43
DISP0^SCRPW23 EXIT, RUN+34
END^SCRPW50 EXIT
TITL^SCRPW50 PTDET+1
$$NOW^XLFDT RUN+29
EN^XUTMDEVQ PTDET+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PTDET+14
Function Call: WRITE
  • Prompt: " (none found)"
  • Line Location: RUN+40
Function Call: WRITE
  • Prompt: !
  • Line Location: RUN+53
Function Call: WRITE
  • Prompt: !,"Patient: ",$E(SCPNAME,1,18),?29,"SSN: ",SCSSN,?46,"DOB: ",SCDOB
  • Line Location: SHDR+2
Function Call: WRITE
  • Prompt: ?64,"AGE: ",SCAGE,?74,$J(SCGEND,6),!,SCLINE
  • Line Location: SHDR+3
Function Call: WRITE
  • Prompt: !,"Assignment",?28,"Active",?40,"Inactive",?52,"Assigned by/date"
  • Line Location: SHDR+5
Function Call: WRITE
  • Prompt: !,"-------------------------- ---------- ---------- ----------------------------"
  • Line Location: SHDR+6
Function Call: WRITE
  • Prompt: !,X,$S($G(CONT):" (cont.)",1:""),":"
  • Line Location: SSHDR+3
Routine Call
  • DIC
  • Line Location:
    • PTDET+2
Routine Call
  • DIR
  • Line Location:
    • PTDET+11
    • RUN+53

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^VA(200 - [#200] GET1^DIQ
^SCPT(404.43 - [#404.43] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" RUN+29, RUN+32
^SD(403.47 - [#403.47] MHTEAM+10
^TMP("SC" RUN+6, RUN+9, RUN+10
^TMP("SCRPT" RUN+4!, RUN+8*, RUN+36, RUN+38, RUN+40, RUN+41, RUN+42, RUN+44, RUN+54!, SLINE+16*
^VA(200 - [#200] SLINE+15

Label References

Name Line Occurrences
$$MHTEAM PTDET+7
$$SDT SLINE+13
EXIT PTDET+2, PTDET+3, PTDET+4
PTDET PTDET+7
SHDR RUN+34, RUN+37, RUN+43
SLINE RUN+23
SSHDR RUN+39, RUN+43

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CONT SSHDR~, SSHDR+3
DFN PTDET~, PTDET+3*, PTDET+7, RUN+5, RUN+6, RUN+9, RUN+10, MHTEAM~, MHTEAM+15
DIC PTDET~, PTDET+2*
DIC(0 PTDET+2*
DIR PTDET+8!, PTDET+11!, RUN+53~
DIR("A" PTDET+9*, PTDET+10*
DIR(0 PTDET+8*, RUN+53*
DT RUN+33
DTOUT PTDET~, PTDET+2
DUOUT PTDET~, PTDET+2
IOSL RUN+37, RUN+43
IOST RUN+34, RUN+53
SC PTDET~, PTDET+3*, PTDET+4
SC("DTR" RUN+4, RUN+27, MHTEAM+13
SCACT RUN+13*, RUN+14, RUN+23, RUN+39*, RUN+41*, RUN+42, RUN+44, SLINE~, SLINE+13, SLINE+16
SCAGE RUN+1~, RUN+32*, RUN+33*, SHDR+3
SCARR MHTEAM+9~, MHTEAM+14*, MHTEAM+15, MHTEAM+16, MHTEAM+17
SCBNM SLINE~, SLINE+15
SCDATA RUN+1~, RUN+10*, RUN+11, RUN+12, RUN+13, RUN+15
SCDENT RUN+19*, RUN+23, SLINE~, SLINE+13
SCDOB RUN+2~, RUN+32*, SHDR+2
SCDT PTDET~, PTDET+4, RUN+2~, RUN+4*, RUN+5
SCDT("B" PTDET+3*
SCEU RUN+3~, RUN+20*
SCEUNM RUN+3~, RUN+20*, RUN+23
SCFF RUN+1~, RUN+5*
SCFOUND RUN+1~, RUN+5*, RUN+35, RUN+36, SHDR+4, SLINE+12*
SCGEND RUN+2~, RUN+31*, SHDR+3
SCI RUN+1~, RUN+5*, RUN+7*, RUN+9*, RUN+10, RUN+42*, RUN+44, MHTEAM+9~, MHTEAM+15*
SCIFN RUN+2~, RUN+12*, RUN+16, RUN+21
SCINAC RUN+15*, RUN+23, SLINE~, SLINE+13
SCLEBNM RUN+3~, RUN+22*, RUN+23
SCLEDT RUN+3~, RUN+22*
SCLINE RUN+1~, RUN+28*, SHDR+3
SCLN RUN+1~, RUN+5*, RUN+23, SLINE~, SLINE+12*, SLINE+16
SCNAME RUN+11*, RUN+23, SLINE~, SLINE+13
SCORD SLINE~, SLINE+16
SCOUT RUN+2~, RUN+5*, RUN+36, RUN+37, RUN+41, RUN+42, RUN+43, RUN+53, SHDR+1
SCPAGE RUN+1~, RUN+28*
SCPNAME RUN+2~, RUN+30*, SHDR+2
SCPNOW RUN+1~, RUN+29*
SCPT0 PTDET~, PTDET+3*, RUN+30, RUN+31, RUN+32
SCREC RUN+2~, RUN+16*, RUN+17, RUN+18, RUN+19, RUN+20, RUN+21, RUN+22
SCSH RUN+2~, RUN+38*, RUN+39, RUN+43
SCSSN RUN+2~, RUN+30*, SHDR+2
SCSTAT RUN+3~, RUN+21*
SCSTNM RUN+3~, RUN+21*, RUN+23
SCSUB RUN+1~, RUN+5*, RUN+6*, RUN+9, RUN+10, RUN+36*, RUN+38, RUN+39, RUN+40, RUN+41
, RUN+42, RUN+44, RUN+46
SCTITL RUN+2~, RUN+34, RUN+37, RUN+43
SCTITL(1 RUN+26*
SCTITL(2 RUN+27*
SCTNM SLINE~, SLINE+15
SCUSER RUN+18*, RUN+23, SLINE~, SLINE+15
SCX RUN+3~, RUN+7*, RUN+44*, RUN+45, RUN+47, RUN+48, RUN+49, SLINE+13*, SLINE+15*, SLINE+16
SCX( RUN+7*
SCX(1 RUN+8, RUN+23
SCX(2 RUN+8
SCX(3 RUN+8*, RUN+16
SCX(4 RUN+12
SCX(5 RUN+13
SCX(6 RUN+15
SCX(7 RUN+18
SCX(8 RUN+11
SCX(9 RUN+19
SCY RUN+3~, SLINE+13*, SLINE+14*, SLINE+15
SUNM SLINE~, SLINE+15
TP MHTEAM+9~, MHTEAM+12*, MHTEAM+15
TP( MHTEAM+12*
TPDT MHTEAM+9~, MHTEAM+13*, MHTEAM+15
TPIEN MHTEAM+9~, MHTEAM+10*, MHTEAM+11, MHTEAM+12
U RUN+7, RUN+8, RUN+11, RUN+12, RUN+13, RUN+15, RUN+18, RUN+19, RUN+20, RUN+21
, RUN+22, RUN+30, RUN+31, RUN+32, RUN+45, RUN+47, RUN+48, RUN+49, SLINE+13, SLINE+15
X PTDET~, PTDET+13*, SSHDR~, SSHDR+3, SDT~, SDT+1*, SDT+2
Y PTDET~, PTDET+3, RUN+29*, RUN+32*
Y(0 PTDET+3
ZTSAVE PTDET+13~, PTDET+14
ZTSAVE( PTDET+13*

Marked Items

Name Field # of Occurrence
$T(@SCSUB RUN+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All