©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
IBDF6A ;ALB/CJM - ENCOUNTER FORM - (new forms, deleting forms, adding to setup) ;JAN 16,1993
Source file <IBDF6A.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 5 | ^DIC FILE^DICN ^DIE (,IX)^DIK ^DIR |
| Automated Information Collection System | 4 | ($$COPYFORM,$$NEWNAME,DELETE)^IBDFU2C DLTBLK^IBDFU3 ($$SLCTFORM,CLINICS,LIST)^IBDFU4 PAUSE^IBDFU5 |
| Registration | 1 | FULL^VALM1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETUP | ;
|
|
| DELFORM | ;
|
|
| NEWFORM | ;
|
|
| ADDSETUP(FORM,IBCLINIC,NEW) | ;
|
|
| OVERLAY() | ;asks the user if the he wants to overlay the form already used for the clinic setup
|
|
| COPYFORM | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | DELFORM+7, SETUP+5 |
| FILE^DICN | NEWFORM+7, ADDSETUP+6 |
| ^DIE | NEWFORM+12, COPYFORM+11, ADDSETUP+21 |
| ^DIK | NEWFORM+13 |
| IX^DIK | NEWFORM+18 |
| ^DIR | ADDSETUP+14, OVERLAY+3 |
| $$COPYFORM^IBDFU2C | COPYFORM+6 |
| $$NEWNAME^IBDFU2C | NEWFORM+4, COPYFORM+5 |
| DELETE^IBDFU2C | DELFORM+12, COPYFORM+13 |
| DLTBLK^IBDFU3 | NEWFORM+19 |
| $$SLCTFORM^IBDFU4 | COPYFORM+4 |
| CLINICS^IBDFU4 | DELFORM+8 |
| LIST^IBDFU4 | DELFORM+11 |
| PAUSE^IBDFU5 | NEWFORM+10 |
| FULL^VALM1 | DELFORM+4, NEWFORM+5, COPYFORM+2, SETUP+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBE(357 - [#357] | Classic Fileman Calls |
| ^IBE(357.1 - [#357.1] | Classic Fileman Calls |
| ^SD(409.95 - [#409.95] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBE(357 - [#357] | COPYFORM+10 |
| ^IBE(357.1 - [#357.1] | NEWFORM+16, NEWFORM+17 |
| ^SD(409.95 - [#409.95] | ADDSETUP+4, ADDSETUP+9, ADDSETUP+19 |
| Name | Line Occurrences |
|---|---|
| $$OVERLAY | ADDSETUP+19 |
| ADDSETUP | NEWFORM+14, COPYFORM+15, SETUP+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARY | DELFORM+1~, DELFORM+2*, DELFORM+3, DELFORM+8, DELFORM+9, DELFORM+11, DELFORM+12, DELFORM+13 |
| BLOCK | DELFORM+1~, NEWFORM+1~, NEWFORM+16*, NEWFORM+17, NEWFORM+18, NEWFORM+19 |
| CLINIC | DELFORM+1~ |
| DA | NEWFORM+7!, NEWFORM+12!*, NEWFORM+13*!, NEWFORM+18!*, COPYFORM+11!*, ADDSETUP+4!*, ADDSETUP+7*, ADDSETUP+8, ADDSETUP+9, ADDSETUP+19 , ADDSETUP+21! |
| DD | NEWFORM+6!, ADDSETUP+5! |
| DIC | DELFORM+6!*, DELFORM+7!, NEWFORM+6!*, NEWFORM+7!, SETUP+4!*, SETUP+5!, ADDSETUP+5!*, ADDSETUP+6! |
| DIC("A" | DELFORM+6*, SETUP+4* |
| DIC("S" | DELFORM+6*, SETUP+4* |
| DIC(0 | DELFORM+6*, NEWFORM+6*, SETUP+4*, ADDSETUP+5* |
| DIE | NEWFORM+7!, NEWFORM+12!*, COPYFORM+11!*, ADDSETUP+20!*, ADDSETUP+21! |
| DIE("NO^" | NEWFORM+12*, COPYFORM+11* |
| DIK | NEWFORM+13*!, NEWFORM+18*! |
| DINUM | NEWFORM+6!, ADDSETUP+5! |
| DIR | ADDSETUP+11!, ADDSETUP+14!, OVERLAY+2!, OVERLAY+3! |
| DIR("A" | OVERLAY+2* |
| DIR(0 | ADDSETUP+12*, ADDSETUP+13*, OVERLAY+2* |
| >> DIRUT | ADDSETUP+15, OVERLAY+4 |
| DO | NEWFORM+6!, ADDSETUP+5! |
| DR | NEWFORM+12!*, COPYFORM+11!*, ADDSETUP+20!, ADDSETUP+21*! |
| >> DTOUT | SETUP+5 |
| >> DUOUT | SETUP+5 |
| FLD | NEWFORM+1~, ADDSETUP+2~, ADDSETUP+16*, ADDSETUP+17*, ADDSETUP+18, ADDSETUP+19, ADDSETUP+21 |
| FORM | DELFORM+1~, DELFORM+7*, DELFORM+8, DELFORM+12, NEWFORM+1~, NEWFORM+8*, NEWFORM+9, NEWFORM+12, NEWFORM+13, NEWFORM+14 , NEWFORM+16, NEWFORM+17, NEWFORM+19, SETUP+1~, SETUP+5*, SETUP+6, ADDSETUP~, ADDSETUP+21 |
| >> IBAPI("INDEX" | NEWFORM+20, COPYFORM+16, SETUP+7 |
| IBCLINIC | NEWFORM+14, COPYFORM+15, SETUP+6, ADDSETUP~, ADDSETUP+4, ADDSETUP+5 |
| IBDELETE | NEWFORM+1~, NEWFORM+13, COPYFORM+1~, COPYFORM+13 |
| IBDVR | NEWFORM+1~ |
| IBOLD | COPYFORM+1~, COPYFORM+10* |
| IBSCAN | NEWFORM+1~, NEWFORM+2*, COPYFORM+1~ |
| >> IBTKFORM | NEWFORM+14, COPYFORM+15 |
| IBTXTSZ | NEWFORM+1~, NEWFORM+2* |
| IOSL | DELFORM+11 |
| NAME | NEWFORM+1~, NEWFORM+4*, NEWFORM+6, COPYFORM+1~, COPYFORM+5*, COPYFORM+6 |
| NEW | ADDSETUP~, ADDSETUP+3*, ADDSETUP+13 |
| NEWFORM | COPYFORM+1~, COPYFORM+6*, COPYFORM+7, COPYFORM+10, COPYFORM+11, COPYFORM+13, COPYFORM+15 |
| NOCANDO | DELFORM+1~, DELFORM+2* |
| NODE | ADDSETUP+2~, ADDSETUP+9*, ADDSETUP+17 |
| OLDFORM | COPYFORM+1~, COPYFORM+4*, COPYFORM+6 |
| SETUP | DELFORM+1~, ADDSETUP+2~, ADDSETUP+9* |
| >> VALMBCK | DELFORM+5*, NEWFORM+3*, COPYFORM+3*, SETUP+3* |
| >> X | NEWFORM+6*, ADDSETUP+5* |
| >> Y | DELFORM+7, NEWFORM+8, SETUP+5, ADDSETUP+7, ADDSETUP+15, ADDSETUP+16, ADDSETUP+17, OVERLAY+5 |