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 |