©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
IBDFU2 ;ALB/CJM - ENCOUNTER FORM - BUILD FORM(copying blocks) ; 08-JAN-1993
Source file <IBDFU2.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Information Collection System | 3 | (COPYFLD,COPYGRP,COPYHFLD,COPYLINE,COPYMFLD,COPYTEXT)^IBDFU2A ($$GETMA,$$GETPI,$$GETQLFR)^IBDFU2B (DLISTCNT,DLTCNTNT)^IBDFU3 |
| VA Fileman | 2 | FILE^DICN (IX,IX1)^DIK |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COPYBLK(OLDBLOCK,IBFORM,FROMFILE,TOFILE,ROW,COL,TKORDER,NAME,RECMPILE) | ;copys OLDBLOCK in FROMFILE to IBFORM in TOFILE
|
|
| COPYLIST(LIST,OLDBLOCK,NEWBLOCK,FROMFILE,TOFILE) | ;
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DICN | COPYBLK+23, COPYLIST+16 |
| IX^DIK | COPYLIST+10 |
| IX1^DIK | COPYBLK+29, COPYLIST+35 |
| COPYFLD^IBDFU2A | COPYBLK+44 |
| COPYGRP^IBDFU2A | COPYLIST+40 |
| COPYHFLD^IBDFU2A | COPYBLK+52 |
| COPYLINE^IBDFU2A | COPYBLK+56 |
| COPYMFLD^IBDFU2A | COPYBLK+48 |
| COPYTEXT^IBDFU2A | COPYBLK+60 |
| $$GETMA^IBDFU2B | COPYLIST+30 |
| $$GETPI^IBDFU2B | COPYLIST+13 |
| $$GETQLFR^IBDFU2B | COPYLIST+31 |
| DLISTCNT^IBDFU3 | COPYLIST+19 |
| DLTCNTNT^IBDFU3 | COPYBLK+33 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBE( | COPYBLK+12, COPYBLK+26*, COPYBLK+27*, COPYBLK+40, COPYBLK+44, COPYBLK+48, COPYBLK+52, COPYBLK+56, COPYBLK+60, COPYLIST+7 , COPYLIST+22*, COPYLIST+25, COPYLIST+26*, COPYLIST+29*, COPYLIST+32*, COPYLIST+39, COPYLIST+40 |
| Name | Line Occurrences |
|---|---|
| $$COPYLIST | COPYBLK+40 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COL | COPYBLK~, COPYBLK+20, COPYLIST+5~, COPYLIST+26*, COPYLIST+29*, COPYLIST+32 |
| DA | COPYBLK+23!, COPYBLK+28!*, COPYBLK+29!, COPYLIST+10!*, COPYLIST+16!, COPYLIST+34!*, COPYLIST+35! |
| DD | COPYBLK+22!, COPYLIST+15! |
| DIC | COPYBLK+22!*, COPYBLK+23!, COPYLIST+15!*, COPYLIST+16! |
| DIC(0 | COPYBLK+22*, COPYLIST+15* |
| DIE | COPYBLK+23!, COPYLIST+16! |
| DIK | COPYBLK+28!*, COPYBLK+29!, COPYLIST+10*!, COPYLIST+34!*, COPYLIST+35! |
| DINUM | COPYBLK+22!, COPYLIST+15! |
| DO | COPYBLK+22!, COPYLIST+15! |
| DYNAMIC | COPYLIST+5~, COPYLIST+8*, COPYLIST+40 |
| FLD | COPYBLK+10~, COPYBLK+44*, COPYBLK+48*, COPYBLK+52* |
| FROM | COPYBLK+10~, COPYBLK+39*, COPYBLK+40, COPYBLK+43*, COPYBLK+44, COPYBLK+47*, COPYBLK+48, COPYBLK+51*, COPYBLK+52, COPYBLK+55* , COPYBLK+56, COPYBLK+59*, COPYBLK+60, COPYLIST+5~, COPYLIST+36*, COPYLIST+39, COPYLIST+40 |
| FROMFILE | COPYBLK~, COPYBLK+8, COPYBLK+12, COPYBLK+27, COPYBLK+39, COPYBLK+43, COPYBLK+47, COPYBLK+51, COPYBLK+55, COPYBLK+59 , COPYLIST~, COPYLIST+2, COPYLIST+3, COPYLIST+7, COPYLIST+10, COPYLIST+13, COPYLIST+25, COPYLIST+26, COPYLIST+29, COPYLIST+30 , COPYLIST+31, COPYLIST+36 |
| FROMPI | COPYLIST+5~, COPYLIST+12*, COPYLIST+13, COPYLIST+39 |
| GRP | COPYLIST+5~, COPYLIST+40* |
| I | COPYBLK+10~ |
| IBFORM | COPYBLK~, COPYBLK+13 |
| LINE | COPYBLK+10~, COPYBLK+36*, COPYBLK+56* |
| LIST | COPYBLK+10~, COPYBLK+36*, COPYBLK+40*, COPYLIST~, COPYLIST+2, COPYLIST+7, COPYLIST+10, COPYLIST+25, COPYLIST+26, COPYLIST+29 , COPYLIST+40 |
| NAME | COPYBLK~, COPYBLK+14*, COPYBLK+17, COPYBLK+18, COPYBLK+22, COPYLIST+5~, COPYLIST+11*, COPYLIST+14, COPYLIST+15 |
| NEWBLOCK | COPYBLK+10~, COPYBLK+11*, COPYBLK+24*, COPYBLK+25, COPYBLK+26, COPYBLK+27, COPYBLK+28, COPYBLK+33, COPYBLK+40, COPYBLK+44 , COPYBLK+48, COPYBLK+52, COPYBLK+56, COPYBLK+60, COPYBLK+61, COPYLIST~, COPYLIST+2, COPYLIST+11, COPYLIST+40 |
| NEWLIST | COPYLIST+5~, COPYLIST+6*, COPYLIST+17*, COPYLIST+18, COPYLIST+19, COPYLIST+22, COPYLIST+26, COPYLIST+29, COPYLIST+32, COPYLIST+34 , COPYLIST+39, COPYLIST+40, COPYLIST+41 |
| NODE | COPYBLK+10~, COPYBLK+12*, COPYBLK+13*, COPYBLK+14, COPYBLK+18*, COPYBLK+19*, COPYBLK+20*, COPYBLK+21*, COPYBLK+26, COPYBLK+27* , COPYLIST+5~, COPYLIST+7*, COPYLIST+8, COPYLIST+10, COPYLIST+11*, COPYLIST+12, COPYLIST+13*, COPYLIST+22, COPYLIST+25*, COPYLIST+26* , COPYLIST+29*, COPYLIST+30*, COPYLIST+31*, COPYLIST+32 |
| OLDBLOCK | COPYBLK~, COPYBLK+12, COPYBLK+27, COPYBLK+40, COPYBLK+44, COPYBLK+48, COPYBLK+52, COPYBLK+56, COPYBLK+60, COPYLIST~ , COPYLIST+2, COPYLIST+10 |
| RECMPILE | COPYBLK~, COPYBLK+15* |
| ROW | COPYBLK~, COPYBLK+19 |
| SLCTN | COPYLIST+5~ |
| SUB | COPYBLK+10~ |
| TEXT | COPYBLK+10~, COPYBLK+36*, COPYBLK+60* |
| TKORDER | COPYBLK~, COPYBLK+21 |
| TO | COPYBLK+10~, COPYBLK+39*, COPYBLK+40, COPYBLK+43*, COPYBLK+44, COPYBLK+47*, COPYBLK+48, COPYBLK+51*, COPYBLK+52, COPYBLK+55* , COPYBLK+56, COPYBLK+59*, COPYBLK+60, COPYLIST+5~, COPYLIST+36*, COPYLIST+39, COPYLIST+40 |
| TOFILE | COPYBLK~, COPYBLK+9, COPYBLK+22, COPYBLK+26, COPYBLK+27, COPYBLK+28, COPYBLK+33, COPYBLK+39, COPYBLK+43, COPYBLK+47 , COPYBLK+51, COPYBLK+55, COPYBLK+59, COPYLIST~, COPYLIST+2, COPYLIST+4, COPYLIST+13, COPYLIST+15, COPYLIST+19, COPYLIST+22 , COPYLIST+26, COPYLIST+29, COPYLIST+30, COPYLIST+31, COPYLIST+32, COPYLIST+34, COPYLIST+36 |
| TOPI | COPYLIST+5~, COPYLIST+13* |
| >> X | COPYBLK+22*, COPYLIST+15* |
| >> Y | COPYBLK+24, COPYLIST+17 |