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 |  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: SCRPO5

Package: Scheduling

Routine: SCRPO5


Information

SCRPO5 ;BP-CIOFO/KEITH - Historical Patient Assignment Detail ; 01 Jul 99 9:30 PM

Source Information

Source file <SCRPO5.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Scheduling 4 $$GETALL^SCAPMCA  ($$DTR,HDR)^SCRPO  DISP0^SCRPW23  (END,TITL)^SCRPW50  
VA Fileman 3 ^DIC  $$GET1^DIQ  ^DIR  
Kernel 2 $$NOW^XLFDT  EN^XUTMDEVQ  
IHS Changes To ADT 1 $$HRCN^BDGF2  
IHS Changes To Scheduling 1 ^BSDSCO5  

Entry Points

Name Comments DBIA/ICR reference
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
RUN ;Print report
PTDET
IHS ;EP; entry point for list template ;IHS/ANMC/LJF 11/1/2000
PCPOS ;;3^PC Position^SCPT(404.43)^4^5^6^6^2^7
NPCPOS ;;7^Non-PC Position^SCPT(404.43)^4^5^6^6^2^7
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
NPCTM ;;10^Non-PC Team^SCPT(404.42)^3^4^5^11^2^12
NPCPR ;;6^Non-PC Provider^SCTM(404.52)^11^9^10^7^2^8
SHDR ;Subheader
EXIT
SDT(X) ;Slashed date
SLINE(SCORD,SCNAME,SCACT,SCINAC,SCUSER,SCDENT,SUNM,SCTNM,SCBNM,SCLN) ;Set report global
SSHDR(X,CONT) ;Subheader
NPCPPOS ;;9^Non-PC Preceptor Position^SCTM(404.53)^16^14^15^7^2^8
PCAP ;;2^PC Associate Provider^SCTM(404.52)^11^9^10^7^2^8
NPCPPR ;;8^Non-PC Preceptor Provider^SCTM(404.52)^11^9^10^7^2^8
PCPPOS ;;4^PC Preceptor Position^SCTM(404.53)^16^14^15^7^2^8

External References

Name Field # of Occurrence
$$HRCN^BDGF2 IHS+31
^BSDSCO5 RUN+1
^DIC PTDET+2
$$GET1^DIQ IHS+20, IHS+21, IHS+22
^DIR IHS+54
$$GETALL^SCAPMCA IHS+5
$$DTR^SCRPO PTDET+4
HDR^SCRPO IHS+35, IHS+38, IHS+44
DISP0^SCRPW23 EXIT, IHS+35
END^SCRPW50 EXIT
TITL^SCRPW50 PTDET+1
$$NOW^XLFDT IHS+29
EN^XUTMDEVQ PTDET+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PTDET+6
Function Call: WRITE
  • Prompt: " (none found)"
  • Line Location: IHS+41
Function Call: WRITE
  • Prompt: !
  • Line Location: IHS+54
Function Call: WRITE
  • Prompt: !,"Patient: ",$E(SCPNAME,1,18),?29,"ID: ",SCSSN,?46,"DOB: ",SCDOB
  • Line Location: SHDR+3
Function Call: WRITE
  • Prompt: ?64,"AGE: ",SCAGE,?74,$J(SCGEND,6),!,SCLINE
  • Line Location: SHDR+4
Function Call: WRITE
  • Prompt: !,"Assignment",?28,"Active",?40,"Inactive",?52,"Assigned by/date"
  • Line Location: SHDR+6
Function Call: WRITE
  • Prompt: !,"-------------------------- ---------- ---------- ----------------------------"
  • Line Location: SHDR+7
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:
    • IHS+54

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" IHS+29, IHS+33
^TMP("SC" IHS+6, IHS+9, IHS+10
^TMP("SCRPT" IHS+4!, IHS+8*, IHS+37, IHS+39, IHS+41, IHS+42, IHS+43, IHS+45, IHS+55!, SLINE+16*
^VA(200 - [#200] SLINE+15

Label References

Name Line Occurrences
$$SDT SLINE+13
EXIT PTDET+2, PTDET+3, PTDET+4
SHDR IHS+35, IHS+38, IHS+44
SLINE IHS+23
SSHDR IHS+40, IHS+44

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

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

Marked Items

Name Field # of Occurrence
$T(@SCSUB IHS+7
Info |  Source |  Call 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