©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
AMHLEDEL ; IHS/CMI/LAB - DELETE BH RECORD ;
Source file <AMHLEDEL.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INTAKE | ;
|
|
| EN | ;EP
|
|
| GRPDEL(REC,PAT) | ;-- delete the group record and patient entry from group
|
|
| IINTAKE(R) | ;EP - does this visit have an initial intake with updates?
|
|
| GPATDIK(PT,D) | ;-- remove the patient from the group 5101 multiple
|
|
| GRECDIK(D,I) | ;-- delete the record from the group 6101 multiple
|
|
| EOJ | ; EOJ CLEANUP
|
|
| DELETE2 | ;
|
|
| DELETE | ;
|
| FileNo | Call Tags |
|---|---|
| ^AMHREC - [#9002011] | Classic Fileman Calls |
| ^AMHRCDST - [#9002011.06] | Classic Fileman Calls |
| ^AMHRINTK - [#9002011.13] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AMHGROUP - [#9002011.67] | GPATDIK+2 |
| ^AMHGROUP("AREC" | GRPDEL+2, GRPDEL+3 |
| ^AMHRCDST("B" | DELETE+5 |
| ^AMHREC - [#9002011] | DELETE+1, DELETE+2 |
| ^AMHRINTK - [#9002011.13] | INTAKE+3, INTAKE+5, INTAKE+8, INTAKE+9, INTAKE+10, INTAKE+11 |
| ^AMHRINTK("AD" | IINTAKE+3, INTAKE+2, INTAKE+7 |
| ^AMHRINTK("AI" | IINTAKE+4 |
| ^DIC - [#1] | DELETE+4, DELETE2+2, DELETE2+3 |
| Name | Line Occurrences |
|---|---|
| $$IINTAKE | DELETE+3 |
| DELETE2 | DELETE+4 |
| EOJ | DELETE+8 |
| GPATDIK | GRPDEL+5 |
| GRECDIK | GRPDEL+4 |
| GRPDEL | DELETE+7 |
| INTAKE | DELETE2+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | EOJ+2! |
| AMHGO | EN+2~ |
| AMHGRP | DELETE+1*, DELETE+7, EOJ+1! |
| AMHPAT | DELETE+2*, DELETE+7, EOJ+1! |
| AMHRDEL | DELETE+1, DELETE+2, DELETE+3, DELETE+5, DELETE+6, DELETE+7, EOJ+1!, INTAKE+2, INTAKE+3, INTAKE+5 , INTAKE+7, INTAKE+8 |
| AMHVDFN | DELETE2+4*, EOJ+1! |
| AMHVDG | DELETE2+3*, DELETE2+4, EOJ+1! |
| AMHVFLE | DELETE+4*, DELETE2+1, DELETE2+2, DELETE2+3, EOJ+1! |
| AMHVI | DELETE2+4*, EOJ+1! |
| AMHVIGR | DELETE2+3*, DELETE2+4, EOJ+1! |
| AMHVL | DELETE+4*, EOJ+1! |
| AMHVNM | DELETE2+2*, EOJ+1! |
| AMHX | EN+2~, INTAKE+2*, INTAKE+3, INTAKE+4, INTAKE+5, INTAKE+6, INTAKE+7, INTAKE+8, INTAKE+9, INTAKE+10 , INTAKE+11, INTAKE+12 |
| AMHY | EN+2~, INTAKE+7*, INTAKE+8 |
| >> C | INTAKE+2* |
| D | GRECDIK~, GPATDIK~, GPATDIK+2, GPATDIK+4, EOJ+3! |
| D0 | EOJ+3! |
| DA | DELETE+5*, DELETE+6*!, DELETE2+4*, GRECDIK+2*, GPATDIK+1!, GPATDIK+2*, GPATDIK+3, EOJ+3!, INTAKE+4*!, INTAKE+6*! , INTAKE+8*!, INTAKE+9*, INTAKE+12*! |
| DA(1 | GRECDIK+1*, GRECDIK+3, GPATDIK+4*, GPATDIK+5, INTAKE+6*, INTAKE+8* |
| DIC | EOJ+3! |
| DICR | EOJ+3! |
| DIE | EOJ+3!, INTAKE+4*!, INTAKE+6*!, INTAKE+8*!, INTAKE+12*! |
| DIG | EOJ+3! |
| DIH | EOJ+3! |
| DIK | DELETE+5*, DELETE+6*!, DELETE2+4*, GRECDIK+3*, GPATDIK+5*, EOJ+3!, INTAKE+9* |
| DITC | EOJ+3!, INTAKE+4*!, INTAKE+6!, INTAKE+12*! |
| DIU | EOJ+3! |
| DIV | EOJ+3! |
| DIW | EOJ+3! |
| DQ | EOJ+3! |
| DR | EOJ+3!, INTAKE+4*!, INTAKE+6*!, INTAKE+8*!, INTAKE+12*! |
| G | IINTAKE+1~, IINTAKE+2*, IINTAKE+3, IINTAKE+4*, IINTAKE+6 |
| GDA | GRPDEL+1~, GRPDEL+2*, GRPDEL+3, GRPDEL+4, GRPDEL+5, GRECDIK+1 |
| >> GIEN | GRPDEL+3*, GRPDEL+4 |
| I | GRECDIK~, GRECDIK+2 |
| PAT | GRPDEL~, GRPDEL+5 |
| PT | GPATDIK~, GPATDIK+2 |
| R | IINTAKE~, IINTAKE+3 |
| REC | GRPDEL~, GRPDEL+2, GRPDEL+3 |
| U | DELETE+1, DELETE+2, DELETE2+2, INTAKE+3, INTAKE+8, INTAKE+9, INTAKE+10, INTAKE+11 |
| X | EN+2~, DELETE+6*, EOJ+2!, IINTAKE+1~, IINTAKE+3*, IINTAKE+4, INTAKE+11*, INTAKE+12 |
| Y | EN+2~, IINTAKE+1~ |
| >> Z | INTAKE+5*, INTAKE+6 |
| >> ZTQUEUED | DELETE2+4 |