©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
VAFHCDG ;ALB/CM OUTPATIENT DG1 SEGMENT GENERATOR ;3/30/95
Source file <VAFHCDG.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 2 | $$SCE^DGSDU ($$PIVNW,$$PIVX)^VAFHPIVT |
| Scheduling | 2 | $$DATE^SCDXUTL GETDX^SDOE |
| DRG Grouper | 1 | $$ICDDX^ICDCODE |
| Health Level Seven | 1 | $$HLDATE^HLFNC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETPDX(PTR) | ;returns first primary diagnois or 0
|
|
| ODG1(DFN,EVENT,EVDT,VPTR,PSTR,PNUM) | ;
|
|
| COD(ZNODE) | ;
|
|
| DES(CDX) | ;
|
|
| EN1 | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ICD9 - [#80] | COD+8, DES+14 |
| ^ICD9("AB" | DES+5, DES+6, DES+7, DES+8, DES+9, DES+10, DES+11, DES+12 |
| Name | Line Occurrences |
|---|---|
| $$COD | EN1+21, EN1+23 |
| $$DES | EN1+24 |
| $$GETPDX | COD+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CDX | COD+1~, COD+7*, COD+8*, COD+9*, DES~, DES+3, DES+4*, DES+5, DES+6*, DES+7* , DES+8*, DES+9*, DES+10*, DES+11, DES+12*, DES+13, DES+14, DES+15*, DES+16*, DES+17 , GETPDX+5*, GETPDX+8, GETPDX+9*, GETPDX+10 |
| CODE | EN1+1~, EN1+2*, EN1+21*, EN1+23*, EN1+24, EN1+25, EN1+28 |
| CODMET | EN1+1~, EN1+2*, EN1+20*, EN1+30 |
| DFN | ODG1~, ODG1+11, ODG1+12, ODG1+14 |
| DG1 | EN1+1~, EN1+2*, EN1+28*, EN1+29, EN1+30*, EN1+32 |
| EVDT | ODG1~, ODG1+11, ODG1+12, ODG1+14, EN1+26, DES+15 |
| EVENT | ODG1~, ODG1+11, ODG1+12, ODG1+13!, ODG1+14*, ODG1+15 |
| FILE | COD+1~, COD+3*, COD+4 |
| HLD | EN1+1~ |
| >> HLFS | EN1+28, EN1+30 |
| ICD | EN1+1~, EN1+2*, EN1+24*, EN1+25*, EN1+28 |
| LOOP | EN1+1~ |
| NODE | ODG1+12*, ODG1+14*, ODG1+16*, EN1+21, EN1+23, EN1+31! |
| OPTR | COD+1~, COD+3* |
| PNUM | ODG1~, EN1+4*, EN1+30 |
| PSTR | ODG1~, EN1+5*, EN1+7*, EN1+8*, EN1+9, EN1+20, EN1+21, EN1+22, EN1+26, EN1+29 |
| PTR | COD+1~, COD+3*, COD+4, COD+7, GETPDX~, GETPDX+2, GETPDX+3, GETPDX+6 |
| QUOT | EN1+3*, EN1+21, EN1+24, EN1+25, EN1+26, EN1+31!, COD+4, COD+9, COD+11, DES+3 , DES+11, DES+13, DES+14, DES+16 |
| TD | EN1+1~, EN1+2*, EN1+26*, EN1+28 |
| VADX | GETPDX+1~, GETPDX+7*, GETPDX+8*, GETPDX+9 |
| VADX( | GETPDX+8, GETPDX+9 |
| VAENC0 | GETPDX+1~, GETPDX+2*, GETPDX+3 |
| VPTR | ODG1~, ODG1+11, ODG1+14 |
| ZNODE | COD~, COD+3 |