Routine: SCMCBK

Information

SCMCBK ;ALB/SCK - Broker Utilities for multiple patient assignments; 4/8/96 ; 11/30/11 4:23pm

Source file <SCMCBK.m>

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	;