SCRPO5 ;BP-CIOFO/KEITH - Historical Patient Assignment Detail ; 01 Jul 99 9:30 PM
Source file <SCRPO5.m>
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 |
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
|
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 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
^VA(200 - [#200] | GET1^DIQ |
^SCPT(404.43 - [#404.43] | GET1^DIQ |
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 |
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 |
>> | 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* |
Name | Field # of Occurrence |
---|---|
$T(@SCSUB | IHS+7 |