©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
PXUTL1 ;ISL/dee - Utility routines used by PCE ;4/3/97
Source file <PXUTL1.m>
| Package | Total | Caller Graph |
|---|---|---|
| PCE Patient Care Encounter | 20 | PXAICPT PXAIPOV PXAPI PXBAPI1 PXBGPOV PXBGVST PXBPPOV PXBSTOR PXCA0 PXCEHLOC PXCEINTR PXCEPAT PXCEPOV1 PXCEPRV PXCESDAM PXCEVFI5 PXCEVFIL PXCEVSIT PXQGVST PXUTLVST |
| Scheduling | 3 | SDSCAPI SDSCNSCP SDSCOMP |
| iCare | 3 | BQIUL1 BQIUL2 BQIULPT |
| Text Integration Utility | 1 | TIUPXAP2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRIMSEC(PXUTVST,PXUTAUPN,PXUTNODE,PXUPIECE) | ;Returns ien of the primary one
; if there is one for the passed visit otherwise returns 0. ; Parameters: ; PXUTVST Pointer to the visit ; PXUTAUPN V-File global e.g. "^AUPNVPRV" ; PXUTNODE The node that the Primary/Secondary field is on ; PXUPIECE The piece of the Primary/Secondary field |
|
| APPT2VST(PXUTLPAT,PXUTLDT,HLOC) | ;Returns ien of visit that the related
|
|
| PRIMVPOV(PXUTVST) | ;Returns the primary diagnosis if there is one
; for the passed visit otherwise returns 0. |
|
| VST2APPT(VISIT) | ;Is this visit related to an appointment
|
|
| PRIMVPRV(PXUTVST) | ;Returns the primary provider if there is one
; for the passed visit otherwise returns 0. |
|
| APPOINT(PXUTLDFN,PXUTLDT,HLOC) | ;Returns 1 if the patient has and appointment
|
|
| VSTAPPT(PXUTLPAT,PXUTLDT,PXUTLLOC,PXUTLVST) | ;Returns 1 if the visit is being pointed to by an
; appointment otherwise 0. |
|
| EXTTEXT(IEN,REQUIRED,FILE,FIELD1,FIELD2) | ;Returns the external form.
|
|
| DISPOSIT(PXUTLDFN,PXUTLDT,PXUTVIEN) | ;Checks to see if a visit is a dispoition
|
| Name | Field # of Occurrence |
|---|---|
| EN^DIQ1 | EXTTEXT+19 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVPOV - [#9000010.07] | PRIMVPOV+4 |
| ^AUPNVPRV - [#9000010.06] | PRIMVPRV+4 |
| ^AUPNVSIT - [#9000010] | VST2APPT+7 |
| ^DPT - [#2] | DISPOSIT+1, APPOINT+2, VSTAPPT+2, APPT2VST+2 |
| ^SCE - [#409.68] | DISPOSIT+1, VSTAPPT+2, APPT2VST+2 |
| Name | Line Occurrences |
|---|---|
| $$PRIMSEC | PRIMVPRV+3, PRIMVPOV+3 |
| $$VSTAPPT | VST2APPT+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | EXTTEXT+11~, EXTTEXT+16*, EXTTEXT+20, EXTTEXT+21 |
| DIC | EXTTEXT+11~, EXTTEXT+13* |
| DIQ | EXTTEXT+11~, EXTTEXT+17* |
| DIQ(0 | EXTTEXT+18* |
| DR | EXTTEXT+11~, EXTTEXT+14*, EXTTEXT+15* |
| FIELD1 | EXTTEXT~, EXTTEXT+12, EXTTEXT+14, EXTTEXT+20 |
| FIELD2 | EXTTEXT~, EXTTEXT+15, EXTTEXT+21 |
| FILE | EXTTEXT~, EXTTEXT+12, EXTTEXT+13, EXTTEXT+20, EXTTEXT+21 |
| HLOC | APPOINT~, APPOINT+2, APPT2VST~, APPT2VST+2 |
| IEN | EXTTEXT~, EXTTEXT+16 |
| PXCATEMP | PRIMVPRV+2~, PRIMVPRV+3*, PRIMVPRV+4, PRIMVPOV+2~, PRIMVPOV+3*, PRIMVPOV+4 |
| PXTEXT | EXTTEXT+11~, EXTTEXT+20*, EXTTEXT+21*, EXTTEXT+22*, EXTTEXT+23*, EXTTEXT+24 |
| PXUPIECE | PRIMSEC~, PRIMSEC+10 |
| PXUTAUPN | PRIMSEC~, PRIMSEC+10 |
| PXUTDIQ1 | EXTTEXT+11~ |
| PXUTDIQ1( | EXTTEXT+20, EXTTEXT+21 |
| PXUTLDFN | DISPOSIT~, DISPOSIT+1, APPOINT~, APPOINT+2 |
| PXUTLDT | DISPOSIT~, DISPOSIT+1, APPOINT~, APPOINT+2, VSTAPPT~, VSTAPPT+2, APPT2VST~, APPT2VST+2 |
| PXUTLLOC | VSTAPPT~, VSTAPPT+2 |
| PXUTLPAT | VSTAPPT~, VSTAPPT+2, APPT2VST~, APPT2VST+2 |
| PXUTLVST | VSTAPPT~, VSTAPPT+2 |
| PXUTNODE | PRIMSEC~ |
| PXUTPRIM | PRIMSEC+8~, PRIMSEC+9*, PRIMSEC+10*, PRIMSEC+11 |
| PXUTVIEN | DISPOSIT~, DISPOSIT+1 |
| PXUTVST | PRIMVPRV~, PRIMVPRV+3, PRIMVPOV~, PRIMVPOV+3, PRIMSEC~ |
| REQUIRED | EXTTEXT~, EXTTEXT+22, EXTTEXT+23 |
| VISIT | VST2APPT~, VST2APPT+7, VST2APPT+9 |
| VISIT0 | VST2APPT+6~, VST2APPT+7*, VST2APPT+8, VST2APPT+9 |
| X | EXTTEXT+11~ |
| Y | EXTTEXT+11~ |