SCMRTMM ;ALB/REW/PDR - Patient Team Multiple Reasssignment MailMessages ; 17 JUL 98
Source file <SCMRTMM.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETLN(TEXT) | ;
|
|
| TEXT(SCFILE,SCNODE,SCPC,SCSPACE,SCLAB) | ;returns fldname & external value
|
|
| QTTXT | ||
| DDNAME(FILE,FIELD) | ;return the fieldname
|
|
| MAILLST(SCTM,SCFIELDA,SCDATE,SCBADTM) | ; Reports only reassignment failures
; Input: ; SCTM - Pointer to Team File (#404.51) ; SCFIELDA - Field array with internal values ; SCDATE - Effective Date ; SCBADTM - DFN array of patients unassignable to team |
|
| BAD | ; Guts of message
|
|
| QTMULT | ;
|
| FileNo | Call Tags |
|---|---|
| ^SD(404.91 - [#404.91] | GET1^DIQ |
