Routine: SCMCBK1

Information

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

Source file <SCMCBK1.m>

Name	Comments	DBIA/ICR reference
PARSE(SC)	;
NEWVAR	;
CLRVAR	; Clear all parsing variables
PTCLEN(SCOK,SC)	; Enroll patient in associated clinic for a position ; ' SC PAT ENROLL CLN '
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
NOPCTM(SCOK,SC)	; Build list of patients with a primary care assignment, but no primary care team; ; ' SC BLD NOPC TM LIST '
ASGNALL(SCOK,SC)	; Assign all entries for the selection source to the appropriate team. ; ' SC FILE ALL PAT TM ASGN '
CLN	; File all patients in selected clinic.
STOPC	; File all patients in the selected stop code
APPT	; File all patients for the selected clinic appointment range
TEAM	; File all patients for the selected team
ASGALLP(SCOK,SC)	; Assign all entries in the selected source to the selected team and position
PCLN	; File all patients in selected clinic to the new position and team
PSTOPC	; File all patients in with the selected stop code to the new position and team
PAPPT	;
PTEAM	;
PPOS	;
BAD(SCBAD,SCOLD,SCOK)	;
BAD2(SCBAD,SCOLD,SCOK)	;