PXDXUTL ;HP/TJH - DX CODE SET UTILITIES FOR PCE ;15 Aug 2012 9:22 AM
Source file <PXDXUTL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACTIVE(PXCS) | ; Return start date for requested coding system
; Input: Coding system abbreviation from #80.4 or #757.03 ; ICD, ICP, 10D, 10P |
|
| AVDX | ; Build array of available Diagnosis Sets (Dx only, not Procedure Sets) in PXDXA("DX SET",fm-date)
; [1] = IEN in #80.4 ; [2] = Code Set name ; [3] = Code Set abbreviation ; [4] = File number holding code set values (always 80 in this function) ; [5] = Date that code set becomes active (FM format) |
|
| AVDXT | ; AVDX TEST SET
|
|
| ACTDT(PXTRXD) | ; Active Dx Code Set for date supplied
; Input - a FileMan date ; Returns 4 piece value: ; [1] = Code Set abbreviation ; [2] = IEN into file #80.4 ; [3] = Long name ; [4] = Activation Date (FM) ; or ; 0 if no active Dx code set is found for the date supplied |
|
| SDESC(PXPOVIEN) | ; Return short description for Computed field .019 - ICD NARRATIVE of file [#9000010.07]
; This function is not intended for general use. ; Input: a pointer to V POV [#9000010.07] |
|
| CSDATE(VSITIEN) | ; Determine date to be used with diagnosis code look-ups when making ^ICDXCODE calls
; Input - Visit IEN for file #9000010 ; Output - FileMan date (Time element is removed if it exists) ; Returns Visit Date unless this is an "E" record, in which case it returns Data Entry Date. ; If, for some unknown reason, the Visit record doesn't exist the output will default to Today's date. |
| FileNo | Call Tags |
|---|---|
| ^ICDS - [#80.4] | LIST^DIC |
