ORWPT ;SLC/KCM/REV - Patient Lookup Functions ;Jan 23, 2025@10:18:50
Source file <ORWPT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IDINFO(REC,DFN) | ; Return identifying information for a patient
; PID^DOB^SEX^VET^SC%^WARD^RM-BED^NAME |
|
| PTINQ(REF,DFN) | ; Return formatted pt inquiry report
|
|
| PGULF(DFN) | ; persian gulf indicator
|
|
| SCDIS(LST,DFN) | ; Return service connected % and rated disabilities
|
|
| SHOW | ; temporary - show patient inquiry screen
|
|
| SELCHK(REC,DFN) | ; Check for sensitive pt
; SENSITIVE |
|
| DIEDON(VAL,DFN) | ; Check for a date of death
|
|
| SELECT(REC,DFN) | ; Selects patient & returns key information
; 1 2 3 4 5 6 7 8 9 10 11 12 ; NAME^SEX^DOB^SSN^LOCIEN^LOCNM^RMBD^CWAD^SENSITIVE^ADMITTED^CONV^SC^ ; 13 14 15 16 17 18 19 ; SC%^ICN^AGE^TS^TSSVC^SIGI^PRONOUN(S) |
|
| SHARE(VAL,IP,HWND,DFN) | ; Set global to share DFN with other applications
|
|
| BYWARD(LST,WARD) | ; Return a list of patients in a ward
|
|
| LAST5(LST,ID) | ; Return a list of patients matching A9999 identifiers
|
|
| LAST5RPL(LST,ID) | ; ; Return list matching A9999 id's, but from RPL only.
|
|
| FULLSSN(LST,ID) | ; Return a list of patients matching full SSN entered
|
|
| FSSNRPL(LST,ID) | ; Return list matching Full SSN, but from RPL only.
|
|
| TOP(LST) | ; Return top for all patients list (last selected for now)
|
|
| ENCTITL(REC,DFN,LOC,PROV) | ; Return external values for encounter
; LOCNAME^LOCABBR^ROOMBED^PROVNAME |
|
| LISTALL(Y,FROM,DIR) | ; Return a bolus of patient names. From is either Name or IEN^Name.
|
|
| APPTLST(LST,DFN) | ; return a list of appointments
; APPTTIME^LOCIEN^LOCNAME^EXTSTATUS |
|
| ADMITLST(LST,DFN) | ; return a list of admissions
; MOVETIME^LOCIEN^LOCNAME^TYPE |
|
| CLINRNG(LST) | ; return date ranges for clinic appointments
|
|
| DFLTSRC(VAL) | ; return default patient list source (T, W, C, P, S)
|
|
| SAVDFLT(OK,X) | ; save new default patient list settings (X=type^ien^sdt;edt)
|
|
| DISCHRG(Y,DFN,ADMITDT) | ; Get discharge movement information
|
|
| CWAD(Y,DFN) | ; returns CWAD flags for a patient
|
|
| LEGACY(ORLST,DFN) | ; return message if data on the legacy system
; ORLST(0)=1 if data, ORLST(n)=display message if data |
|
| INPLOC(REC,DFN) | ; Return a patient's current location
|
|
| AGE(DFN,BEG) | ; returns age based on date of birth and date of death (or DT)
|
|
| GETFICN(ORWRSLT,DFN) | ;returns ICN plus checksum for a DFN
|
|
| ROK(X) | ; Routine OK (in UCI) (NDBI)
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| RPC Name | Call Tags |
|---|---|
| ORWPT ID INFO | IDINFO |
| ORWPT LIST ALL | LISTALL |
| ORWPT APPTLST | APPTLST |
| ORWPT ADMITLST | ADMITLST |
| ORWPT LAST5 | LAST5 |
| ORWPT CLINRNG | CLINRNG |
| ORWPT TOP | TOP |
| ORWPT SELCHK | SELCHK |
| ORWPT SELECT | SELECT |
| ORWPT ENCTITL | ENCTITL |
| ORWPT PTINQ | PTINQ |
| ORWPT DFLTSRC | DFLTSRC |
| ORWPT SHARE | SHARE |
| ORWPT DISCHARGE | DISCHRG |
| ORWPT SAVDFLT | SAVDFLT |
| ORWPT DIEDON | DIEDON |
| ORWPT CWAD | CWAD |
| ORWPT FULLSSN | FULLSSN |
| ORWPT BYWARD | BYWARD |
| ORWPT LEGACY | LEGACY |
| ORWPT INPLOC | INPLOC |
| ORWPT LAST5 RPL | LAST5RPL |
| ORWPT FULLSSN RPL | FSSNRPL |
| ORWPT GET FULL ICN | GETFICN |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^VA(200 - [#200] | GET1^DIQ |
