BHLUP ; cmi/anchorage/maw - BHL Update Specific Fields;
Source file <BHLUP.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DOB | ;-- change the DOB to reflect a new output transform
|
|
| RADDIS | ;-- disable the tt's
|
|
| RAD | ;-- disable new RAD transaction types if not being used
|
|
| FLDS | ;EP - update various fields in this subroutine
|
|
| EMPH | ;-- change the employer phone
|
| Name | Field # of Occurrence |
|---|---|
| ^DIE | DOB+6, RADDIS+4, RADDIS+8 |
| FileNo | Call Tags |
|---|---|
| ^INRHT - [#4000] | Classic Fileman Calls |
| ^INTHL7F - [#4012] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^INRHT("B" | RADDIS+2, RADDIS+6 |
| ^INTHL7F - [#4012] | DOB+8*, EMPH+4* |
| ^INTHL7F("B" | DOB+2, EMPH+2 |
| ^INTHPC - [#4004] | RAD+4 |
| ^INTHPC("B" | RAD+2 |
| Name | Line Occurrences |
|---|---|
| DOB | FLDS+1 |
| EMPH | FLDS+2 |
| RADDIS | RAD+3, RAD+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BHLDA | DOB+1~, DOB+2*, DOB+3, DOB+4, DOB+8, EMPH+1~, EMPH+2*, EMPH+3, EMPH+4 |
| BHLDLS | RAD+1~, RAD+4*, RAD+5 |
| BHLPC | RAD+1~, RAD+2*, RAD+3, RAD+4 |
| BHLTT | RADDIS+1~, RADDIS+2*, RADDIS+3, RADDIS+4, RADDIS+6*, RADDIS+7, RADDIS+8 |
| DA | DOB+4*, DOB+7!, RADDIS+4*, RADDIS+8* |
| DIE | DOB+4*, DOB+7!, RADDIS+4*, RADDIS+5!, RADDIS+8*, RADDIS+9! |
| DR | DOB+5*, DOB+7!, RADDIS+4*, RADDIS+5!, RADDIS+8*, RADDIS+9! |
| U | RAD+4 |