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