Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: SCMCBK1

Package: Scheduling

Routine: SCMCBK1


Information

SCMCBK1 ;LB/SCK - Broker Utilities for multiple patient assignments;

Source Information

Source file <SCMCBK1.m>

Call Graph

Call Graph Total: 16

Package Total Call Graph
Scheduling 14 ($$PTTM,$$PTTP)^SCAPMC  $$PTTP^SCAPMC11  $$ACPTCL^SCAPMC18  $$PTTM^SCAPMC2  PTPCNOTM^SCAPMC20  $$ACPTATP^SCAPMC21  $$PTCLBR^SCAPMC26  $$PTST^SCAPMC27  
$$PTAP^SCAPMC28  $$ACPTATM^SCAPMC6  ALPHA^SCAPMCU2  $$PCRLPTTP^SCMCTPU2  (CHK,TMP)^SCUTBK  HDREC^SCUTBK3  
IHS Changes To ADT 1 $$HRCN^BDGF2  
VA Fileman 1 BLD^DIALOG  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Scheduling 3 SCMCBK  SCMCBK4  SCMRBK  

Entry Points

Name Comments DBIA/ICR reference
PTCLEN(SCOK,SC) ; Enroll patient in associated clinic for a position
; ' SC PAT ENROLL CLN '
CLN ; File all patients in selected clinic.
PARSE(SC) ;
BAD(SCBAD,SCOLD,SCOK) ;
PTEAM ;
CHKPOS(SCOK,SC) ; Check for primary care pratitioner and attending positions for patient
; ' SC CHECK FOR PC POS '
; Piece 1 of SCOK = 1 if ok for practitioner role
; 0 if not ok
; Piece 2 of SCOK = 1 if ok for ateending role
; 0 if not ok
APPT ; File all patients for the selected clinic appointment range
PSTOPC ; File all patients in with the selected stop code to the new position and team
NEWVAR ;
ASGALLP(SCOK,SC) ; Assign all entries in the selected source to the selected team and position
BAD2(SCBAD,SCOLD,SCOK) ;
CLRVAR ; Clear all parsing variables
ASGNALL(SCOK,SC) ; Assign all entries for the selection source to the appropriate team.
; ' SC FILE ALL PAT TM ASGN '
PCLN ; File all patients in selected clinic to the new position and team
TEAM ; File all patients for the selected team
NOPCTM(SCOK,SC) ; Build list of patients with a primary care assignment, but no primary care team;
; ' SC BLD NOPC TM LIST '
PAPPT ;
PPOS ;
STOPC ; File all patients in the selected stop code

External References

Name Field # of Occurrence
$$HRCN^BDGF2 BAD+5, BAD+10, BAD2+5, BAD2+10
BLD^DIALOG BAD+6, BAD+11, BAD2+6, BAD2+11
$$PTTM^SCAPMC ASGNALL+17
$$PTTP^SCAPMC ASGALLP+15
$$PTTP^SCAPMC11 PPOS+1
$$ACPTCL^SCAPMC18 PTCLEN+15
$$PTTM^SCAPMC2 TEAM+1, PTEAM+1
PTPCNOTM^SCAPMC20 NOPCTM+20
$$ACPTATP^SCAPMC21 ASGALLP+22
$$PTCLBR^SCAPMC26 CLN+2, PCLN+2
$$PTST^SCAPMC27 STOPC+2, PSTOPC+2
$$PTAP^SCAPMC28 APPT+1, PAPPT+1
$$ACPTATM^SCAPMC6 ASGNALL+24
ALPHA^SCAPMCU2 NOPCTM+27
$$PCRLPTTP^SCMCTPU2 CHKPOS+14
CHK^SCUTBK PTCLEN+5, CHKPOS+9, NOPCTM+6, ASGNALL+5, ASGALLP+4
TMP^SCUTBK PTCLEN+6, CHKPOS+10, NOPCTM+7, ASGNALL+6, ASGALLP+5
HDREC^SCUTBK3 BAD+12, BAD2+12

Used in RPC

RPC Name Call Tags
SC PAT ENROLL CLN PTCLEN
SC CHECK FOR PC POS CHKPOS
SC FILE ALL PAT TM ASGN ASGNALL
SC FILE ALL PAT POS ASGN ASGALLP
SC BLD NOPC TM LIST NOPCTM

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PTCLEN+14, BAD+5, BAD+10, BAD2+5, BAD2+10
^SCTM(404.57 - [#404.57] PTCLEN+13
^TMP("SC TMP LIST" NEWVAR+9!, CLRVAR+9!
^TMP("SCMC" NOPCTM+21!, ASGNALL+26!, ASGALLP+24!
^TMP($J NEWVAR+7!, NEWVAR+8!, NEWVAR+10!, CLRVAR+7!, CLRVAR+8!, CLRVAR+10!, NOPCTM+11!, NOPCTM+24, NOPCTM+25*, NOPCTM+28
, CLN+3, CLN+4*, CLN+5!, STOPC+3*, STOPC+4, STOPC+5*, APPT+2*, APPT+3, APPT+4*, TEAM+2*
, TEAM+3, TEAM+4*, PCLN+3, PCLN+4*, PSTOPC+3*, PSTOPC+4, PSTOPC+5*, PAPPT+2*, PAPPT+3, PAPPT+4*
, PTEAM+2*, PTEAM+3, PTEAM+4*, PPOS+2*, PPOS+3, PPOS+4*

Label References

Name Line Occurrences
@( NOPCTM+15, ASGNALL+21, ASGALLP+19
BAD ASGNALL+27
BAD2 ASGALLP+25
CLRVAR NEWVAR+2, PTCLEN+17, CHKPOS+16, NOPCTM+32, ASGNALL+30, ASGALLP+28
NEWVAR NOPCTM+4, ASGNALL+3, ASGALLP+3
PARSE PTCLEN+8, CHKPOS+12, NOPCTM+9, ASGNALL+8, ASGALLP+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BLOCK NEWVAR+4~, CLRVAR+3!, NOPCTM+13*, NOPCTM+15
DIERR BAD+1~, BAD+12, BAD2+1~, BAD2+12
DT PARSE+3, PARSE+4, PARSE+5, ASGNALL+13, ASGALLP+11
DTMP ASGNALL+15*, ASGNALL+18, ASGALLP+2~, ASGALLP+13*, ASGALLP+16
DUZ ASGNALL+12, ASGALLP+10
DUZ(2 BAD+5, BAD+10, BAD2+5, BAD2+10
>> I NOPCTM+23*, NOPCTM+24*, NOPCTM+25, NOPCTM+28*, NOPCTM+30, CLN+3*, CLN+4, STOPC+4*, STOPC+5, APPT+3*
, APPT+4, TEAM+3*, TEAM+4, PCLN+3*, PCLN+4, PSTOPC+4*, PSTOPC+5, PAPPT+3*, PAPPT+4, PTEAM+3*
, PTEAM+4, PPOS+3*, PPOS+4
I1 NOPCTM+3~, NOPCTM+28*
SC PARSE~, PTCLEN~, PTCLEN+8, CHKPOS~, CHKPOS+12, NOPCTM~, NOPCTM+9, ASGNALL~, ASGNALL+8, ASGALLP~
, ASGALLP+7
SC("ADD1" PTCLEN+9
SC("BEGIN" PARSE+4
SC("BEND" PARSE+9
SC("BLAST" PARSE+10
SC("BSTART" PARSE+8
SC("CLINIC" PARSE+14
SC("DATE" PARSE+3
SC("DFN" PARSE+18
SC("END" PARSE+5
SC("FILE" PARSE+11
SC("FROMPOS" PARSE+17
SC("FROMTEAM" PARSE+16
SC("INCL" PARSE+6
SC("JOB" PARSE+7
SC("JOBID" PARSE+12
SC("MAX" PARSE+13
SC("MORE" PARSE+19
SC("POSITION" PARSE+2
SC("RESTRICT" ASGNALL+11
SC("SOURCE" ASGNALL+9, ASGALLP+8
SC("STOPCODE" PARSE+15
SC("TEAM" PARSE+1
SC("TYPE" ASGNALL+10, ASGALLP+9
SCADDFLD NEWVAR+5~, CLRVAR+5!, PTCLEN+3~
SCADDFLD( ASGNALL+10*, ASGNALL+11*, ASGNALL+12*, ASGNALL+13*, ASGALLP+9*, ASGALLP+10*, ASGALLP+11*
SCADDFLD(1 PTCLEN+9*
SCBAD NEWVAR+5~, CLRVAR+4!, ASGNALL+23!, ASGNALL+27, ASGALLP+21!, ASGALLP+25, BAD~, BAD2~
SCBAD( BAD+3, BAD2+3
SCBLOCK NEWVAR+4~, CLRVAR+3!, NOPCTM+14*
SCCLN PARSE+14*, NEWVAR+4~, CLRVAR+2!, PTCLEN+3~, PTCLEN+13*, PTCLEN+14, PTCLEN+15
SCCOUNT NEWVAR+4~, CLRVAR+4!
SCDFN PARSE+18*, CLRVAR+3!, PTCLEN+3~, PTCLEN+14, PTCLEN+15, CHKPOS+7~, CHKPOS+14, BAD+1~, BAD+2*, BAD+3*
, BAD+5, BAD+8*, BAD+10, BAD2+1~, BAD2+2*, BAD2+3*, BAD2+5, BAD2+8*, BAD2+10
SCDTRNG NEWVAR+4~, CLRVAR+2!
SCDTRNG("BEGIN" PARSE+4*
SCDTRNG("END" PARSE+5*, ASGNALL+15, ASGNALL+18*, ASGALLP+13, ASGALLP+14*, ASGALLP+16*
SCDTRNG("INCL" PARSE+6*
>> SCDTTRNG("END" ASGNALL+16*
SCDTVAR PARSE+3*, CLRVAR+3!, PTCLEN+3~, PTCLEN+15, CHKPOS+7~, CHKPOS+14, NOPCTM+20, ASGNALL+24, ASGALLP+22
SCEND PARSE+9*, CLRVAR+2!
SCER2 NEWVAR+4~, CLRVAR+5!
SCERMSG NEWVAR+4~, CLRVAR+4!, PTCLEN+3~
SCFILE PARSE+11*, CLRVAR+2!
SCFRMPOS PARSE+17*, NEWVAR+4~, CLRVAR+3!
SCFRMTM PARSE+16*, NEWVAR+4~, CLRVAR+3!
SCJOB PARSE+7*, CLRVAR+2!
SCJOBID PARSE+12*, CLRVAR+2!
SCLAST PARSE+10*, CLRVAR+2!
SCLOC NEWVAR+4~, CLRVAR+4!, NOPCTM+19*, NOPCTM+20
SCMORE PARSE+19*, NEWVAR+4~, CLRVAR+4!
SCNEW NEWVAR+5~, CLRVAR+4!, ASGNALL+23!, ASGALLP+21!
SCNUM PARSE+13*, NEWVAR+4~, CLRVAR+2!, STOPC+2, APPT+1
SCOK PTCLEN~, PTCLEN+10*, PTCLEN+15*, CHKPOS~, CHKPOS+14*, NOPCTM~, NOPCTM+17*, NOPCTM+30*, ASGNALL~, ASGNALL+27
, ASGALLP~, ASGALLP+25, BAD~, BAD+12, BAD2~, BAD2+12
SCOK( ASGNALL+28*, ASGALLP+26*
SCOK1 NEWVAR+4~, CLRVAR+4!, CLN+2*, STOPC+2*, APPT+1*, TEAM+1*, PCLN+2*, PSTOPC+2*, PAPPT+1*, PTEAM+1*
, PPOS+1*
>> SCOK2 ASGNALL+17*, ASGALLP+15*
SCOLD NEWVAR+5~, CLRVAR+4!, ASGNALL+23!, ASGNALL+27, ASGALLP+21!, ASGALLP+25, BAD~, BAD2~
SCOLD( BAD+8, BAD2+8
SCOUT NEWVAR+4~, CLRVAR+5!
SCPARM BAD+1~, BAD+6, BAD+11, BAD2+1~, BAD2+6, BAD2+11
SCPARM("PATIENT" BAD+5*, BAD+10*, BAD2+5*, BAD2+10*
SCPOS PARSE+2*, CLRVAR+3!, PTCLEN+13, CHKPOS+7~, CHKPOS+14, NOPCTM+13, NOPCTM+14, ASGALLP+15, ASGALLP+22
SCSCDE PARSE+15*, NEWVAR+4~, CLRVAR+2!
SCSRCE NEWVAR+4~, CLRVAR+5!, ASGNALL+9*, ASGNALL+20, CLN+2, STOPC+2, APPT+1, TEAM+1, ASGALLP+8*, ASGALLP+18
, PCLN+2, PSTOPC+2, PAPPT+1, PTEAM+1, PPOS+1
SCSRCTYP NEWVAR+4~, CLRVAR+5!, ASGNALL+20*, ASGNALL+21, ASGALLP+18*, ASGALLP+19
SCSTART PARSE+8*, CLRVAR+2!
SCTEAM PARSE+1*, NEWVAR+4~, CLRVAR+3!, NOPCTM+14, ASGNALL+17, ASGNALL+24, CLN+2, PCLN+2
SCTMP NEWVAR+5~, CLRVAR+4!, STOPC+2, STOPC+3, APPT+1, APPT+2, TEAM+1, TEAM+2, PSTOPC+2, PSTOPC+3
, PAPPT+1, PAPPT+2, PTEAM+1, PTEAM+2, PPOS+1, PPOS+2
SCX NEWVAR+5~, CLRVAR+3!, ASGNALL+24*, ASGNALL+28, ASGALLP+22*, ASGALLP+26
SUBRTN NEWVAR+5~, CLRVAR+3!
U NOPCTM+30, ASGNALL+20, CLN+2, CLN+4, STOPC+2, STOPC+5, APPT+1, APPT+4, TEAM+1, TEAM+4
, ASGALLP+18, PCLN+2, PCLN+4, PSTOPC+2, PSTOPC+5, PAPPT+1, PAPPT+4, PTEAM+1, PTEAM+4, PPOS+1
, PPOS+4, BAD+5, BAD+10, BAD2+5, BAD2+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Local Variables |  All