SCRPTP ;ALB/CMM - List of Team's Patients ; 29 Jun 99 04:11PM
Source file <SCRPTP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EXIT1 | ;
|
|
ERR | ;
|
|
EXIT2 | ;
|
|
IHS | ;EP; entry point for list template ;IHS/ANMC/LJF 11/03/2000
|
|
FORMATAC(SCCNT,CNAME,PINF,INS,TIEN,PTIEN,PTNAME,PID,PIEN,PNAME,ROLN,PCAP) | ;Format MULTIPLES
|
|
QUE(INST,TEAM,ROLE,PSTAT,SORT,IOP,ZTDTH) | ;queue report
|
|
RET | ||
ENTRY2(INST,TEAM,ROLE,PSTAT,SORT,IOP,ZTDTH) | ;Second entry point for GUI to use
|
|
PROMPTS | ;Prompt for Institution, Team, Role, Patient Status and Print device
|
|
TINF(TIEN) | ;team information
|
|
FORMAT(INS,TIEN,PTIEN,PTNAME,PID,PIEN,PNAME,CNAME,PINF,ROLN,PCAP) | ;Format column information
|
|
QENTRY | ;driver entry point
|
|
FIND | ;
|
|
PST(PTIEN,CLIEN) | ;
|
Name | Field # of Occurrence |
---|---|
^%ZTLOAD | ENTRY2+20 |
^BSDSCTP | QENTRY+1 |
$$PTTM^SCAPMC2 | FIND+7 |
TDESC^SCRPITP2 | TINF+9 |
TALL^SCRPPAT3 | FIND+2 |
PRINTIT^SCRPTP2 | IHS+6 |
HITS^SCRPTP3 | FIND+9 |
INST^SCRPU1 | PROMPTS+4 |
PRMTT^SCRPU1 | PROMPTS+5 |
ROLE^SCRPU1 | PROMPTS+6 |
$$SORT2^SCRPU2 | PROMPTS+8 |
PTSTAT^SCRPU2 | PROMPTS+7 |
$$NODATA^SCRPU3 | IHS+5 |
EN^XUTMDEVQ | QUE+8 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | PST+7, PST+8, PST+10, PST+11, PST+13 |
^SCTM(404.51 - [#404.51] | TINF+4 |
Name | Line Occurrences |
---|---|
ERR | PROMPTS+4, PROMPTS+5, PROMPTS+6, PROMPTS+7, PROMPTS+9 |
EXIT1 | RET+2 |
EXIT2 | IHS+7 |
FIND | IHS+4 |
QENTRY | ENTRY2+14 |
QUE | PROMPTS+12 |
RET | ENTRY2+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CLIEN | PST~, PST+7, PST+8 |
CNAME | FORMAT~, FORMATAC~, FORMATAC+27 |
DT | PST+14 |
EN | PST+5~, PST+6*, PST+8*, PST+9, PST+10, PST+11, PST+13 |
ENODE | PST+5~, PST+13*, PST+14, PST+16 |
ERR | FIND+1~, FIND+3*, FIND+4, FIND+7, FIND+10, FIND+11 |
FOUND | PST+5~, PST+6*, PST+7, PST+9*, PST+10, PST+11, PST+17*, PST+18 |
II | QUE+6~, QUE+7*, ENTRY2+18~, ENTRY2+19* |
INS | TINF+8*, TINF+9, TINF+10, FORMAT~, FORMAT+18, FORMAT+19, FORMAT+20, FORMAT+23, FORMAT+24, FORMAT+26 , FORMAT+27, FORMAT+28, FORMAT+29, FORMAT+31, FORMATAC~, FORMATAC+18, FORMATAC+19, FORMATAC+20, FORMATAC+24, FORMATAC+25 , FORMATAC+26, FORMATAC+27 |
INST | QUE~, ENTRY2~, ENTRY2+10, EXIT2+2! |
IOP | QUE~, ENTRY2~, ENTRY2+10, ENTRY2+12*, ENTRY2+13*, ENTRY2+17, EXIT2+2! |
IOST | ENTRY2+12*, ENTRY2+14, QENTRY+1 |
LIST | FIND+1~, FIND+3*, FIND+4, FIND+7, FIND+9, FIND+10, FIND+11 |
>> NEXT | FORMAT+31 |
NODATA | IHS+5*, IHS+6, EXIT2+2! |
NUMBER | PROMPTS+1~, ENTRY2+11~, RET*, RET+1*, RET+3 |
NXT | PST+5~, PST+6*, PST+11*, PST+13 |
OKAY | FIND+1~, FIND+7* |
PC | TINF+3~, TINF+6*, TINF+10 |
PCAP | FORMAT~, FORMAT+28, FORMATAC~ |
PHONE | TINF+3~, TINF+7*, TINF+10 |
PID | FORMAT~, FORMAT+17*, FORMAT+20, FORMAT+24, FORMATAC~, FORMATAC+17*, FORMATAC+20 |
PIEN | FORMAT~, FORMAT+18, FORMAT+21, FORMAT+22, FORMATAC~, FORMATAC+18, FORMATAC+22, FORMATAC+23 |
PINF | FORMAT~, FORMAT+29, FORMATAC~, FORMATAC+25, FORMATAC+26 |
PNAME | FORMAT~, FORMAT+15*, FORMAT+18, FORMAT+26, FORMATAC~, FORMATAC+15*, FORMATAC+18 |
PRNT | PROMPTS+1~ |
PSTAT | QUE~, ENTRY2~, ENTRY2+10, EXIT2+2!, PST+9, PST+16 |
PTIEN | PST~, PST+7, PST+8, PST+10, PST+11, PST+13, FORMAT~, FORMAT+19, FORMAT+20, FORMAT+21 , FORMAT+22, FORMATAC~, FORMATAC+19, FORMATAC+20, FORMATAC+22, FORMATAC+23 |
PTNAME | FORMAT~, FORMAT+16*, FORMAT+19, FORMAT+23, FORMATAC~, FORMATAC+16*, FORMATAC+19 |
QTIME | PROMPTS+1~, PROMPTS+3* |
ROLE | QUE~, ENTRY2~, ENTRY2+10, EXIT2+2! |
ROLN | FORMAT~, FORMAT+27, FORMATAC~ |
SCCNT | FORMATAC~, FORMATAC+24, FORMATAC+25, FORMATAC+26, FORMATAC+27 |
SCUP | PROMPTS+2!, EXIT1+1! |
SEC | FORMAT+14~, FORMAT+21*, FORMAT+22*, FORMAT+23, FORMAT+24, FORMAT+26, FORMAT+27, FORMAT+28, FORMAT+29, FORMAT+31 , FORMATAC+14~, FORMATAC+22*, FORMATAC+23*, FORMATAC+24, FORMATAC+25, FORMATAC+26, FORMATAC+27 |
SORT | PROMPTS+8*, PROMPTS+9, PROMPTS+12, QUE~, ENTRY2~, ENTRY2+10, EXIT2+2!, FORMAT+21, FORMAT+22, FORMATAC+22 , FORMATAC+23 |
STOP | EXIT2+2! |
STORE | IHS+1*, IHS+2, IHS+3, IHS+5, IHS+6, EXIT2+1, EXIT2+2!, FORMAT+18, FORMAT+19, FORMAT+20 , FORMAT+23, FORMAT+24*, FORMAT+26*, FORMAT+27*, FORMAT+28*, FORMAT+29*, FORMAT+31*, FORMATAC+18, FORMATAC+19, FORMATAC+20 , FORMATAC+24, FORMATAC+25*, FORMATAC+26*, FORMATAC+27* |
TEAM | QUE~, ENTRY2~, ENTRY2+10, EXIT2+2!, FIND+2 |
TEAM( | FIND+5 |
TIEN | FIND+1~, FIND+3*, FIND+5*, FIND+7, FIND+9, TINF~, TINF+4, TINF+9, FORMAT~, FORMAT+18 , FORMAT+19, FORMAT+20, FORMAT+23, FORMAT+24, FORMAT+26, FORMAT+27, FORMAT+28, FORMAT+29, FORMAT+31, FORMATAC~ , FORMATAC+18, FORMATAC+19, FORMATAC+20, FORMATAC+24, FORMATAC+25, FORMATAC+26, FORMATAC+27 |
TITL | IHS+1*, IHS+5, IHS+6, EXIT2+2! |
TNAME | TINF+3~, TINF+5*, TINF+10 |
TNODE | TINF+3~, TINF+4*, TINF+5, TINF+6, TINF+7, TINF+8 |
TRD | FORMAT+14~, FORMAT+21*, FORMAT+22*, FORMAT+23, FORMAT+24, FORMAT+26, FORMAT+27, FORMAT+28, FORMAT+29, FORMAT+31 , FORMATAC+14~, FORMATAC+21~, FORMATAC+22*, FORMATAC+23*, FORMATAC+24, FORMATAC+25, FORMATAC+26, FORMATAC+27 |
VAUTD | PROMPTS+1~, PROMPTS+12 |
VAUTPS | PROMPTS+1~, PROMPTS+7, PROMPTS+12 |
VAUTR | PROMPTS+1~, PROMPTS+6, PROMPTS+12 |
VAUTT | PROMPTS+1~, PROMPTS+5, PROMPTS+12 |
Y | PROMPTS+4, PROMPTS+5!, PROMPTS+6!, PROMPTS+7!, PROMPTS+8! |
ZTDESC | ENTRY2+17*, EXIT1+1! |
ZTDTH | QUE~, ENTRY2~, ENTRY2+15*, EXIT1+1! |
ZTIO | ENTRY2+17*, EXIT1+1! |
ZTRTN | ENTRY2+16*, EXIT1+1! |
ZTSAVE | QUE+6~, QUE+8, EXIT1+1! |
ZTSAVE( | QUE+7*, ENTRY2+19* |
ZTSK | RET+1, EXIT1+1! |