Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | EN^DDIOL (IX,LIST)^DIC |
| DRG Grouper | 1 | $$ICDDATA^ICDXCODE |
| Lexicon Utility | 1 | $$IMPDATE^LEXU |
YSDXUTL ;ALB/RBD - DX CODE SET UTILITIES FOR MENTAL HEALTH ;04/02/2012
Source file <YSDXUTL.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | EN^DDIOL (IX,LIST)^DIC |
| DRG Grouper | 1 | $$ICDDATA^ICDXCODE |
| Lexicon Utility | 1 | $$IMPDATE^LEXU |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACTIVE(YSCS) | ; Return start date for requested coding system
; Input: Coding system abbreviation from #80.4 or #757.3 ; ICD, ICP, 10D, 10P |
|
| AVDX | ; Build array of available Diagnosis Sets (Dx only, not Procedure Sets) in YSDXA("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) |
|
| ACTDT(YSTRXD) | ; 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 |
|
| DXVALID | ;
|
| FileNo | Call Tags |
|---|---|
| ^ICDS - [#80.4] | LIST^DIC |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^YSD(627.7 - [#627.7] | DXVALID+9 |
| ^YSD(627.8 - [#627.8] | DXVALID+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | DXVALID+1~, DXVALID+4, DXVALID+6, DXVALID+11, DXVALID+13, DXVALID+17 |
| A(1 | DXVALID+3*, DXVALID+4*, DXVALID+6*, DXVALID+11*, DXVALID+13*, DXVALID+17* |
| A(2 | DXVALID+3* |
| D | ACTIVE+12*, ACTIVE+16! |
| >> DA | DXVALID+1 |
| >> DG("0;3" | DXVALID+2 |
| DIC | ACTIVE+12*, ACTIVE+16! |
| DIC(0 | ACTIVE+12* |
| DT | ACTIVE+15 |
| U | ACTIVE+15, AVDX+10, AVDX+11, ACTDT+16, DXVALID+1, DXVALID+9, DXVALID+10, DXVALID+12, DXVALID+16 |
| X | ACTIVE+11~, ACTIVE+12*, DXVALID+4!, DXVALID+6!, DXVALID+7, DXVALID+11!, DXVALID+13!, DXVALID+17! |
| Y | ACTIVE+11~, ACTIVE+13 |
| YSCODSET | DXVALID+1~, DXVALID+5*, DXVALID+6, DXVALID+10, DXVALID+12 |
| YSCS | ACTIVE~, ACTIVE+12, ACTIVE+14 |
| YSD | AVDX+6~, AVDX+11*, AVDX+12 |
| YSDATA | DXVALID+1~, DXVALID+15*, DXVALID+16 |
| YSDT | ACTDT+10~, ACTDT+13*, ACTDT+14*, ACTDT+15, ACTDT+16 |
| YSDXA | AVDX+7!, ACTDT+17! |
| YSDXA("DILIST" | AVDX+9, AVDX+10, AVDX+11, AVDX+13! |
| YSDXA("DX SET | " , AVDX+12*, ACTDT+12, ACTDT+14, ACTDT+15 |
| YSDXDA | DXVALID+1~, DXVALID+7*, DXVALID+9, DXVALID+15 |
| YSDXDATE | DXVALID+1~*, DXVALID+2*, DXVALID+4, DXVALID+5, DXVALID+15 |
| YSFILE | DXVALID+1~, DXVALID+7*, DXVALID+8, DXVALID+14 |
| YSI | AVDX+6~, AVDX+10*, AVDX+11 |
| YSICDD | ACTIVE+11~, ACTIVE+14*, ACTIVE+15 |
| YSMSG | AVDX+6~ |
| YSOUT | ACTIVE+11~, ACTIVE+15*, ACTIVE+17, ACTDT+10~, ACTDT+13*, ACTDT+16*, ACTDT+18 |
| YSR | AVDX+6~, AVDX+11*, AVDX+12 |
| YSREC | ACTDT+10~, ACTDT+15*, ACTDT+16 |
| YSTRXD | ACTDT~, ACTDT+16 |
| YSTYPE | DXVALID+1~, DXVALID+9*, DXVALID+10, DXVALID+12 |
