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! |