LR7OV3 ; IHS/DIR/AAB - Update file 60 with Blood Component Request (66.9) ; [ 8/11/97 ]
Source file <LR7OV3.m>
Package | Total | Call Graph |
---|---|---|
Kernel | 1 | ($$NEWCP,BMES,MES)^XPDUTL |
VA Fileman | 1 | (,IX)^DIK |
Name | Comments | DBIA/ICR reference |
---|---|---|
LOCK | ||
EN | ;Start here to load Blood Product Requests from file 66.9
|
|
DEL | ;Delete components out of file 60 (for testing only)
|
|
POS | ;Post init for future blood bank patch, when/if ordering components
|
|
P1 | ;Post init entry point
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^LAB(60 - [#60] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LAB(60 - [#60] | EN+2, LOCK, LOCK+1, LOCK+2, LOCK+4*, LOCK+5*, LOCK+7*, DEL+2 |
^LAB(62 - [#62] | EN+3 |
^LAB(62.07 - [#62.07] | EN+4 |
^LAB(66.9 - [#66.9] | LOCK+1 |
^LRO(68 - [#68] | LOCK+5 |
Name | Line Occurrences |
---|---|
EN | P1+2 |
LOCK | LOCK |
Name | Field # of Occurrence |
---|---|
^( | LOCK+1, LOCK+4*, DEL+2 |
^(0 | EN+2, LOCK+2 |
^(1 | LOCK+4* |
^(12 | LOCK+4*, DEL+2 |
^(3 | LOCK+4* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CTR | EN+1~ |
DA | EN+1~, LOCK+6*, DEL+1~, DEL+2* |
DIK | EN+1~, LOCK+6*, DEL+1~, DEL+2* |
DUZ(2 | LOCK+5 |
EDIT | EN+1~, EN+4*, LOCK+4 |
IFN | EN+1~, LOCK+1*, LOCK+4, DEL+1~, DEL+2* |
IFN1 | EN+1~, LOCK+2*, LOCK+3, LOCK+4, LOCK+5, LOCK+6 |
IFN2 | EN+1~ |
LAST | EN+1~, LOCK+1*, LOCK+3*, LOCK+7 |
LRCHK | POS+1~, POS+2* |
RCOM | EN+1~, EN+4*, LOCK+4 |
SPEC | EN+1~, EN+2*, EN+3*, LOCK+4 |
X | EN+1~, EN+2*, LOCK+1*, LOCK+4, DEL+1~ |
X1 | EN+1~ |
Y | EN+1~ |