AUPNLK2 ; IHS/CMI/LAB - IHS PATIENT LOOKUP ADD NEW PATIENT ; [ 11/02/2006 9:48 AM ]
Source file <AUPNLK2.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 2 | FILE^DICN ^DIK |
IHS Patient | 1 | ^AUPNLK2B |
Name | Comments | DBIA/ICR reference |
---|---|---|
EDIT | ; EXTERNAL ENTRY POINT - EDIT NAME
|
|
EOJ | ; EXTERNAL ENTRY POINT
|
|
ADDPAT | ; ADD PATIENT
|
|
ACCESS | ; CHECK FILEMAN ACCESS
|
|
START | ;
|
|
INIT | ; EXTERNAL ENTERY POINT - INITIALIZATION
|
|
IHSPAT | ; ADD PATIENT TO 9000001
|
|
IHSPATE | ; ERROR ADDING TO 9000001
|
|
TALK | ; EXTERNAL ENTERY POINT - TALK TO OPERATOR
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
^AUPNPAT - [#9000001] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(2 | EDIT+2 |
^DIC - [#1] | ACCESS+2 |
^DPT - [#2] | ADDPAT+3, IHSPAT+3 |
^VA(200 - [#200] | INIT+7 |
Name | Line Occurrences |
---|---|
ACCESS | INIT+3 |
ADDPAT | START+8 |
EDIT | START+3 |
EOJ | START+2, START+4, START+7, START+9, START+10 |
IHSPAT | ADDPAT+3 |
IHSPATE | IHSPAT+3 |
INIT | START+1 |
TALK | START+6 |
Name | Field # of Occurrence |
---|---|
^("LAYGO" | ACCESS+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> AUP("DR" | ADDPAT+2, EOJ+2! |
>> AUPDFN | ADDPAT+2*, ADDPAT+3, IHSPAT+3, IHSPATE+2, EOJ+1* |
>> AUPDIC | ACCESS+1 |
>> AUPDICW | ADDPAT+2, IHSPAT+3 |
AUPGID | EOJ+2! |
AUPID | EOJ+2! |
AUPID0 | EOJ+2! |
AUPIDS | EOJ+2! |
>> AUPL | IHSPAT+4* |
AUPLID | START+5!, ADDPAT+1, EOJ+2! |
AUPQF2 | START+2, START+4, START+7, START+9, EDIT+3*, IHSPATE+3*, INIT+1*, INIT+2*, INIT+4, INIT+7* , ACCESS+2*, EOJ+1, EOJ+2! |
AUPRCR | IHSPAT+5!, EOJ+2! |
AUPRCR( | IHSPAT+2*, IHSPAT+4 |
AUPRCR("DIC(0)" | IHSPATE+1 |
AUPSET | EOJ+2! |
AUPV | IHSPAT+2*, IHSPAT+4*, IHSPAT+5!, EOJ+2! |
>> AUPX | EDIT+1, EDIT+5*, ADDPAT+2 |
DA | IHSPATE+2*! |
DD | ADDPAT+2!, IHSPAT+1! |
>> DIC | IHSPAT+3* |
>> DIC("DR" | ADDPAT+2*!, IHSPAT+3*, IHSPAT+4! |
>> DIC("W" | ADDPAT+2*, IHSPAT+3* |
>> DIC(0 | START+6, EDIT+3, ADDPAT+1, IHSPAT+3*, IHSPAT+4!, INIT+2, INIT+7, ACCESS+2 |
DIK | IHSPATE+2*! |
DINUM | IHSPAT+3*, IHSPAT+4! |
DLAYGO | IHSPAT+3*, IHSPAT+4!, ACCESS+2 |
DO | ADDPAT+2!, IHSPAT+1! |
DT | IHSPAT+3 |
DUZ | IHSPAT+3, INIT+5*, INIT+7 |
DUZ(0 | INIT+2, ACCESS+2 |
I | INIT+3!, ACCESS+2 |
U | EDIT+2 |
X | EDIT+1*, EDIT+3, EDIT+5, ADDPAT+2*, IHSPAT+3*, INIT+3!, ACCESS+1*, ACCESS+2* |
>> Y | ADDPAT+2, IHSPAT+3 |