SCMCBK ;ALB/SCK - Broker Utilities for multiple patient assignments; 4/8/96 ; 11/30/11 4:23pm
Source file <SCMCBK.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PTCLBLD(SCOK,SC) | ; Build patient list for a selected clinic
; 'SC BLD PAT CLN LIST' |
|
| PTCLNQ | ||
| PTSCBLD(SCOK,SC) | ; Build patient list for selected stop code
; 'SC BLD PAT SCDE LIST' |
|
| PTSCQ | ||
| PTTMBLD(SCOK,SC) | ; Build a list of patients for a selected team and return the $J of the TMP globall
; where the list is stored. ; ' SC BLD PAT TM LIST ' |
|
| PTPSBLD(SCOK,SC) | ;
; ' SC BLD PAT POS LIST ' |
|
| PTAPBLD(SCOK,SC) | ; Build patient list for selected appointment range.
; ' SC BLD PAT APT LIST ' |
|
| PTAPQ | ||
| PTGET(SCDATA,SC) | ; Return a block of patients to the client
; 'SC GET PAT BLOCK' |
|
| PTLSTBLD(SCOK,SCVAL) | ; Build the list of patients to be assigned in the ^TMP($J,"SC PATIENT LIST",DFN) global
; 'SC BLD PAT LIST' |
|
| PTBLDQ | ||
| PTFILE(SCOK,SC) | ; File the patient assignments in the ^TMP($J,"SC TEAM ASSIGN",SCDFN) global
; 'SC FILE PAT TM ASGN' |
|
| FILEQ | ||
| POSFILE(SCOK,SC) | ; File the patient assignments in the ^TMP($J,"SC PATIENT LIST") global
; ' SC FILE PAT POS ASGN ' |
|
| BLKPOS | ;
|
|
| BLKTM | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$PTTM^SCAPMC | BLKTM+4 |
| $$PTTP^SCAPMC | BLKPOS+4 |
| $$PTTP^SCAPMC11 | PTPSBLD+18 |
| $$PTTM^SCAPMC2 | PTTMBLD+17 |
| $$ACPTATP^SCAPMC21 | POSFILE+21 |
| $$PTCLBR^SCAPMC26 | PTCLBLD+10 |
| $$PTCLBRTP^SCAPMC26 | PTCLBLD+9 |
| $$PTST^SCAPMC27 | PTSCBLD+20 |
| $$PTAP^SCAPMC28 | PTAPBLD+24 |
| $$ACPTATM^SCAPMC6 | PTFILE+22 |
| $$GETPC^SCAPMCU2 | PTAPBLD+45 |
| ALPHA^SCAPMCU2 | PTCLBLD+17, PTSCBLD+27, PTTMBLD+24, PTPSBLD+24, PTAPBLD+58 |
| BAD^SCMCBK1 | PTFILE+23 |
| BAD2^SCMCBK1 | POSFILE+23 |
| CLRVAR^SCMCBK1 | PTCLNQ, PTSCQ, PTTMBLD+29, PTPSBLD+30, PTAPBLD+61, PTGET+20, PTFILE+28, POSFILE+27 |
| NEWVAR^SCMCBK1 | PTCLBLD+3, PTSCBLD+3, PTTMBLD+4, PTPSBLD+3, PTAPBLD+9 |
| PARSE^SCMCBK1 | PTCLBLD+7, PTSCBLD+8, PTTMBLD+8, PTPSBLD+7, PTAPBLD+13, PTGET+14, PTFILE+13, POSFILE+13 |
| QUEUED^SCMCBK4 | PTFILE+6, POSFILE+6 |
| CHK^SCUTBK | PTCLBLD+4, PTSCBLD+5, PTTMBLD+5, PTPSBLD+4, PTAPBLD+10, PTGET+11, PTLSTBLD+5, PTFILE+10, POSFILE+10 |
| TMP^SCUTBK | PTCLBLD+5, PTSCBLD+6, PTTMBLD+6, PTPSBLD+5, PTAPBLD+11, PTGET+12, PTLSTBLD+6, PTFILE+11, POSFILE+11 |
| RPC Name | Call Tags |
|---|---|
| SC GET PAT BLOCK | PTGET |
| SC BLD PAT LIST | PTLSTBLD |
| SC FILE PAT TM ASGN | PTFILE |
| SC BLD PAT CLN LIST | PTCLBLD |
| SC FILE PAT POS ASGN | POSFILE |
| SC BLD PAT SCDE LIST | PTSCBLD |
| SC BLD PAT TM LIST | PTTMBLD |
| SC BLD PAT POS LIST | PTPSBLD |
| SC BLD PAT APT LIST | PTAPBLD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^SCPT(404.43 - [#404.43] | PTAPBLD+34 |
| ^TMP( | PTCLBLD+14, PTCLBLD+15!, PTGET+16, PTGET+17, PTGET+18!, PTLSTBLD+11!, PTLSTBLD+15*, PTFILE+26!, POSFILE+25! |
| ^TMP("SC TMP LIST" | PTAPBLD+27, PTAPBLD+37*, PTAPBLD+38*, PTAPBLD+39*, PTAPBLD+44, PTAPBLD+47, PTAPBLD+48!, PTAPBLD+49!, PTAPBLD+50* |
| ^TMP("SCMC" | PTCLBLD+11!, PTSCBLD+21!, PTTMBLD+18!, PTPSBLD+19!, PTAPBLD+28, PTAPBLD+29, PTAPBLD+30, PTAPBLD+41! |
| ^TMP($J | PTCLBLD+14*, PTCLBLD+19, PTSCBLD+10!, PTSCBLD+23*, PTSCBLD+24, PTSCBLD+25*, PTTMBLD+9!, PTTMBLD+19*, PTTMBLD+21, PTTMBLD+22* , PTTMBLD+25, PTPSBLD+9!, PTPSBLD+20*, PTPSBLD+22, PTPSBLD+23*, PTAPBLD+15!, PTAPBLD+52*, PTAPBLD+53, PTAPBLD+55, PTAPBLD+56* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BLOCK | PTSCBLD+13*, PTSCBLD+15, PTTMBLD+13*, PTTMBLD+15, PTPSBLD+12*, PTPSBLD+14, PTAPBLD+18*, PTAPBLD+20 |
| DFN | PTAPBLD+44~*, PTAPBLD+45, PTAPBLD+47, PTAPBLD+48 |
| DT | PTAPBLD+31, PTAPBLD+33, PTFILE+20, POSFILE+19 |
| DUZ | PTFILE+19, POSFILE+18 |
| I | PTSCBLD+25*, PTTMBLD+21*, PTTMBLD+22, PTTMBLD+25*, PTTMBLD+27, PTPSBLD+23*, PTAPBLD+55*, PTAPBLD+56, PTGET+9~, PTGET+16* , PTGET+17 |
| >> I1 | PTSCBLD+24*, PTSCBLD+25, PTSCBLD+28, PTTMBLD+25*, PTPSBLD+22*, PTPSBLD+23, PTPSBLD+25, PTAPBLD+53*, PTAPBLD+55, PTAPBLD+59 |
| NSAS | PTAPBLD+46~* |
| SC | PTCLBLD~, PTCLBLD+7, PTSCBLD~, PTSCBLD+8, PTTMBLD~, PTTMBLD+8, PTPSBLD~, PTPSBLD+7, PTAPBLD~, PTAPBLD+13 , PTGET~, PTGET+14, PTFILE~, PTFILE+13, POSFILE~, POSFILE+13 |
| SC("CLINIC" | PTAPBLD+37 |
| SC("POSITION" | PTAPBLD+34 |
| SC("RESTRICT" | PTFILE+18 |
| SC("TYPE" | PTFILE+17, POSFILE+17 |
| SCADDFLD | PTFILE+8~, POSFILE+8~ |
| SCADDFLD( | PTFILE+17*, PTFILE+18*, PTFILE+19*, PTFILE+20*, POSFILE+17*, POSFILE+18*, POSFILE+19* |
| SCADTM | POSFILE+8~, POSFILE+15*, POSFILE+21 |
| SCAS | PTAPBLD+33~* |
| SCBAD | PTFILE+8~, PTFILE+23, POSFILE+8~, POSFILE+23 |
| >> SCBLOCK | PTSCBLD+14*, PTTMBLD+14*, PTPSBLD+13*, PTAPBLD+19*, BLKPOS+4, BLKTM+4 |
| SCC | PTAPBLD+55~*, PTAPBLD+56 |
| >> SCCLN | PTCLBLD+9, PTCLBLD+10, PTAPBLD+24 |
| SCDATA | PTGET~ |
| SCDATA( | PTGET+17* |
| SCDFN | PTLSTBLD+3~, PTLSTBLD+14*, PTLSTBLD+15 |
| >> SCDTRNG("END" | BLKPOS+2, BLKPOS+3*, BLKPOS+5*, BLKTM+2, BLKTM+3*, BLKTM+5* |
| SCDTVAR | PTFILE+8~, PTFILE+22, POSFILE+8~, POSFILE+21 |
| SCEND | PTGET+9~, PTGET+16, PTGET+18 |
| SCERMSG | PTPSBLD+18, PTFILE+8~, POSFILE+8~ |
| SCEX | PTAPBLD+45~*, PTAPBLD+46 |
| SCFILE | PTFILE+8~, POSFILE+8~ |
| >> SCFRMPOS | PTPSBLD+18 |
| >> SCFRMTM | PTTMBLD+17 |
| SCI | PTAPBLD+30~*, PTAPBLD+31, PTAPBLD+33, PTAPBLD+34, PTAPBLD+35 |
| SCII | PTAPBLD+31~* |
| SCJOB | PTGET+9~, PTGET+16, PTGET+17, PTGET+18, PTLSTBLD+3~, PTLSTBLD+13*, PTLSTBLD+15, PTFILE+8~, PTFILE+14, PTFILE+26 , POSFILE+8~, POSFILE+14, POSFILE+25 |
| SCJOBID | PTGET+9~, PTGET+16, PTGET+17, PTGET+18 |
| SCLAST | PTGET+9~, PTGET+18 |
| >> SCLOC | PTSCBLD+20, PTSCBLD+23, PTTMBLD+17, PTTMBLD+19, PTPSBLD+18, PTPSBLD+20, PTAPBLD+24, PTAPBLD+52 |
| SCMAFLD | POSFILE+8~ |
| >> SCMORE | PTSCBLD+20, PTAPBLD+24 |
| SCN | PTAPBLD+35~*, PTAPBLD+37, PTAPBLD+47~*, PTAPBLD+49 |
| SCNEW | PTFILE+8~, POSFILE+8~ |
| SCNEW1 | POSFILE+8~ |
| >> SCNUM | PTSCBLD+20, PTAPBLD+24 |
| SCOK | PTCLBLD~, PTCLBLD+9*, PTCLBLD+10*, PTCLBLD+12, PTCLBLD+14, PTCLBLD+15, PTCLBLD+19*, PTSCBLD~, PTSCBLD+17*, PTSCBLD+19* , PTSCBLD+20*, PTSCBLD+28*, PTTMBLD~, PTTMBLD+12*, PTTMBLD+17*, PTTMBLD+27*, PTPSBLD~, PTPSBLD+16*, PTPSBLD+18*, PTPSBLD+25* , PTAPBLD~, PTAPBLD+22*, PTAPBLD+23*, PTAPBLD+24*, PTAPBLD+59*, PTLSTBLD~, PTLSTBLD+8*, PTLSTBLD+10*, PTLSTBLD+11, PTLSTBLD+16* , PTFILE~, PTFILE+23, POSFILE~, POSFILE+23 |
| SCOK( | PTFILE+24*, POSFILE+24* |
| >> SCOK1 | PTSCBLD+17, PTAPBLD+22, BLKPOS+4*, BLKTM+4* |
| SCOLD | PTFILE+8~, PTFILE+23, POSFILE+8~, POSFILE+23 |
| SCPOS | PTCLBLD+9, PTSCBLD+13, PTSCBLD+14, PTTMBLD+13, PTTMBLD+14, PTPSBLD+12, PTPSBLD+13, PTAPBLD+18, PTAPBLD+19, PTAPBLD+34~* , POSFILE+8~, POSFILE+21 |
| SCS | PTAPBLD+35~*, PTAPBLD+37 |
| >> SCSCDE | PTSCBLD+20 |
| SCSTART | PTGET+9~, PTGET+16 |
| SCTEAM | PTCLBLD+10, PTSCBLD+14, PTTMBLD+14, PTPSBLD+13, PTAPBLD+19, PTAPBLD+46, PTFILE+8~, PTFILE+22, POSFILE+8~ |
| SCTMP | PTAPBLD+27~*, PTAPBLD+36*, PTAPBLD+37, PTAPBLD+38, PTAPBLD+39 |
| SCVAL | PTLSTBLD~, PTLSTBLD+9, PTLSTBLD+13, PTLSTBLD+14 |
| SCX | PTFILE+8~, PTFILE+22*, PTFILE+24, POSFILE+8~, POSFILE+21*, POSFILE+24, BLKPOS+1~, BLKPOS+2*, BLKPOS+5, BLKTM+1~ , BLKTM+2*, BLKTM+5 |
| SDFN | PTAPBLD+29~*, PTAPBLD+37, PTAPBLD+38 |
| SS | PTAPBLD+28~*, PTAPBLD+29 |
| U | PTCLBLD+19, PTSCBLD+28, PTTMBLD+27, PTPSBLD+25, PTAPBLD+31, PTAPBLD+33, PTAPBLD+34, PTAPBLD+35, PTAPBLD+37, PTAPBLD+46 , PTAPBLD+59, PTLSTBLD+13, PTLSTBLD+14 |
| >> XWBAPVER | PTFILE+6, POSFILE+6 |
| XX | PTAPBLD+29~*, PTAPBLD+30 |