CRHD2 ; CAIRO/CLC - GET DATA ITEMS FOR CHANGEOVER LIST ;08-Apr-2008 08:03;CLC
Source file <CRHD2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CODESTS(CRHDRTN,CRHDSTR) | ;CODE STATUS -using orders, try to find and orderable item for DNR, if not found look for a text order
; by the name of DNRTITLE, title also set up as a p |
|
| NODETAM(CRHDY,CRHDDFN,CRHDCAT) | ;GET ACTIVE MEDS WITHOUT THE DETAILS, FOR ACTIVE MEDS WITH DETAILS USE CRHDAM
|
|
| SORT | ;
|
|
| OUTPUT | ;
|
|
| TEMPDATA(CRHDRTN,CRHDFLDN,CRHDUSER,CRHDDFN,CRHDTXT) | ;TEMPORARY DATA, DATA ONLY USE FOR A SHORT TIME FRAME
|
|
| NEW | ||
| UPDATE(CRHDFLD,CRHDUSER,CRHDDFN,CRHDTXT) | ;
|
|
| STORETXT(CRHDIEN,CRHDMIEN,CRHDTARY) | ;store text to file
|
|
| SAVEOLD(CRHDIEN,CRHDMIEN) | ;
|
|
| CHK(CRHDFLDN,CRHDUSER,CRHDDFN) | ;
|
|
| XREF(CRHDIEN,CRHDMIEN) | ;SET THE XREF FOR SPECIALTY AND TEAM
|
|
| KILXREF(CRHDIEN,CRHDMIEN) | ;KILL XREF FOR SPECIALTY AND TEAM
|
|
| ONOFFPRV(CRHDPRIV,CRHDIEN,CRHDMIEN) | ;ON/OFF PRIVATE NOTE
|
|
| LOCK(CRHDRTN,CRHDDFN,CRHDFLDM) | ;
|
| RPC Name | Call Tags |
|---|---|
| CRHD SAVE TEMP FLD | TEMPDATA |
| CRHD IS RECORD LOCKED | LOCK |
