©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
DGPTAPA1 ;ALB/MTC - PTF A/P ARCHIVE UTILITY ; 10-19-92
Source file <DGPTAPA1.m>
| Package | Total | Call Graph |
|---|---|---|
| Registration | 2 | (AR401,AR601)^DGPTAPA2 (AR501,AR535)^DGPTAPA3 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ARMAIN | ;-- This function will load the array containing the
; PTF detailed information. ; INPUT : DGPTF - Valid PTF entry ; DGTMP - IEN of the template used |
|
| ARINT | ;
|
|
| AR300(N300) | ;-- load 300 node information
; INPUT N300 - Contains 300 node ; OUTPUT - Load display array |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(45 | ARMAIN+20, ARMAIN+23, ARMAIN+31 |
| ^DD(45.02 | AR300+14 |
| ^DGP(45.62 - [#45.62] | ARMAIN+7, ARMAIN+47* |
| ^DGPT - [#45] | ARMAIN+9, ARMAIN+12, ARMAIN+14, ARMAIN+35, ARMAIN+43 |
| ^DIC(42.4 - [#42.4] | ARMAIN+18 |
| ^DIC(45.61 - [#45.61] | AR300+10 |
| ^DPT - [#2] | ARMAIN+12 |
| ^ICD9 - [#80] | ARMAIN+40 |
| Name | Line Occurrences |
|---|---|
| $$AR300 | ARMAIN+44 |
| ARMAIN | ARINT+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DG70 | ARMAIN+5~, ARMAIN+9*, ARMAIN+16, ARMAIN+18, ARMAIN+21, ARMAIN+24, ARMAIN+28, ARMAIN+29, ARMAIN+33, ARMAIN+40 |
| >> DGINC | ARMAIN+35*, ARMAIN+36 |
| >> DGPTF | ARMAIN+9, ARMAIN+12, ARMAIN+14, ARMAIN+35, ARMAIN+43 |
| >> DGTMP | ARMAIN+7, ARMAIN+8, ARMAIN+47 |
| I | ARMAIN+5~, ARMAIN+39*, ARMAIN+40 |
| N300 | AR300~, AR300+6, AR300+8, AR300+10, AR300+12, AR300+13, AR300+15, AR300+17, AR300+19 |
| NUMREC | ARMAIN+5~ |
| OSEQ | ARMAIN+5~, ARMAIN+7*, ARMAIN+8 |
| REF | ARMAIN+5~, ARMAIN+8*, ARMAIN+44 |
| SEQ | ARMAIN+5~, ARMAIN+8*, ARMAIN+44*, ARMAIN+47 |
| U | ARMAIN+8, ARMAIN+12, ARMAIN+14, ARMAIN+16, ARMAIN+18, ARMAIN+20, ARMAIN+21, ARMAIN+23, ARMAIN+24, ARMAIN+26 , ARMAIN+28, ARMAIN+29, ARMAIN+31, ARMAIN+33, ARMAIN+35, ARMAIN+36, ARMAIN+40, ARMAIN+44, ARMAIN+47, AR300+6 , AR300+8, AR300+10, AR300+12, AR300+13, AR300+14, AR300+15, AR300+17, AR300+19 |
| X | ARMAIN+5~, ARMAIN+18*, ARMAIN+20, ARMAIN+21*, ARMAIN+23, ARMAIN+24*, ARMAIN+26, ARMAIN+29*, ARMAIN+31, ARMAIN+43* , ARMAIN+44, AR300+4~, AR300+13*, AR300+14 |
| Y | ARMAIN+5~, ARMAIN+12*, ARMAIN+14*, ARMAIN+16*, ARMAIN+18*, ARMAIN+20*, ARMAIN+23*, ARMAIN+26*, ARMAIN+28*, ARMAIN+31* , ARMAIN+33*, ARMAIN+36*, ARMAIN+40*, ARMAIN+44*, AR300+4~, AR300+6*, AR300+8*, AR300+10*, AR300+14*, AR300+15* , AR300+17*, AR300+19*, AR300+20 |