SCMRBK ;ALB/SCK - Broker Utilities for multiple patient reassignments; 4/8/96
Source file <SCMRBK.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PTGET(SCDATA,SC) | ||
PTLSTBLD(SCOK,SCVAL) | ; Build the list of patients to be assigned in the ^TMP($J,"SCPATIENT LIST",DFN) global
; 'SC BLD PAT LIST' |
|
PTBLDQ | ||
PTFILE(SCOK,SC) | ; File the patient assignments in the ^TMP($J,"SC TEAM ASSIGN",SCDFN) global
; 'SCMC FILE PAT TM REASGN' |
|
BKGTM | ||
FILEQ | ||
POSFILE(SCOK,SC) | ||
BKGPOS | ||
BLKPOS | ||
BLKTM | ||
PTPOSLST(SCOK,SC) | ||
FILTOUT(DD,AD) | ||
PTTMLST(SCOK,SC) | ||
DISCHPOS(SCOK,SC) | ||
BKG(SCX) | ;hand off to taskman
|
|
S(SCX) | ||
T | ;;
|
RPC Name | Call Tags |
---|---|
SCMC BLD TEAM PAT LIST | PTTMLST |
SCMC FILE PAT TM REASGN | PTFILE |
SCMC BLD REASSIGN PAT LIST | PTLSTBLD |
SCMC DIS TEAM POS | DISCHPOS |
SCMC FILE PAT POS REASGN | POSFILE |
SCMC BLD POS PAT LIST | PTPOSLST |