HMPYCSO ;SLC/MJK,ASMR/RRB - Convert system objects utility ;8/2/11 15:29
Source file <HMPYCSO.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CONV(HMPDATA,HMPCNTS) | ; -- execute conversion over a system object type
; input: HMPDATA("type") := object type ; - [ OPD - operational (file #800000.11) | PT - HMP (file #800000.1) / default ] |
|
| CONVOBJ(HMPFILE,IEN,HMPCB) | ; -- convert object
|
|
| ERROR(MSG) | ; -- write out error message and inc error tally
|
|
| TALLY(CNTYP) | ; -- inc counter
|
|
| UPDATE(HMPFILE,DA,JSON) | ; -- update DATA wp field on patient object
; input: DA - internal entry number in 800000.1 ; JSON - closed array reference for M representation of object ; return: 1 - update successful | 0 - update not successful (unable to obtain lock) |
|
| TASKCONV | ; -- convert patient task objects
; - converts 'pid' property to SYSID;DFN (ex. F484;237) ; - removes 'patientId' property if it exists |
|
| TASKCB(OBJREF,IEN) | ; -- callback that converts a 'task' object's if necessary
; - converts 'pid' property to SYSID;DFN (ex. F484;237) ; - removes 'patientId' property if it exists |
