VAQUTL92 ;ALB/JFP,JRP - PDX TRANSACTION Lookup ;01-SEPT-93
Source file <VAQUTL92.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Patient Data Exchange | 4 | VAQDIS11 VAQDIS12 VAQDIS15 VAQLED01 |
Name | Comments | DBIA/ICR reference |
---|---|---|
TRNDATA(TRNPTR) | ; -- Returns nodes in transaction file in local array NODE
; INPUT: TRNPTR = Pointer to VAQ - TRANSACTION FILE ; OUTPUT: 0 = Success ; see variable = ; -1^Reason = Bad input |
|
ZERO | ; -- ZERO node
|
|
QRY | ; -- QRY node
|
|
RQST1 | ; -- RQST1 node
|
|
RQST2 | ; -- RQST2 node
|
|
ATHR1 | ; -- ATHR1 node
|
|
ATHR2 | ; -- ATHR2 node
|
|
KILLTRN | ; -- Kills variables created in TRNDATA
|
|
RLSEPAT(TRANPTR) | ;GET INFO ON PATIENT RELEASED BY REMOTE FACILITY
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | RQST1+1, ATHR1+1 |
^VAT(394.61 - [#394.61] | TRNDATA+15, RLSEPAT+11 |
^VAT(394.62 - [#394.62] | RLSEPAT+24, RLSEPAT+26, RLSEPAT+27, RLSEPAT+35, RLSEPAT+37 |
^VAT(394.71 - [#394.71] | RLSEPAT+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATAPTR | RLSEPAT+13~, RLSEPAT+23*, RLSEPAT+24*, RLSEPAT+26, RLSEPAT+27, RLSEPAT+35, RLSEPAT+37 |
DOB | RLSEPAT+13~, RLSEPAT+21*, RLSEPAT+39*, RLSEPAT+42 |
FIELD | RLSEPAT+13~, RLSEPAT+32*, RLSEPAT+33, RLSEPAT+38, RLSEPAT+39, RLSEPAT+40 |
FOUND | RLSEPAT+13~, RLSEPAT+23*, RLSEPAT+24, RLSEPAT+38*, RLSEPAT+39*, RLSEPAT+40* |
NAME | RLSEPAT+13~, RLSEPAT+21*, RLSEPAT+38*, RLSEPAT+42 |
ND | TRNDATA+12~, TRNDATA+14*, TRNDATA+15 |
NODE | TRNDATA+11!, ATHR2+4! |
NODE( | TRNDATA+15* |
NODE("ATHR1" | ATHR1+1, ATHR1+2 |
NODE("ATHR2" | ATHR2+1, ATHR2+2 |
NODE("QRY" | QRY+1, QRY+2, QRY+4, QRY+6 |
NODE("RQST1" | RQST1+1, RQST1+2 |
NODE("RQST2" | RQST2+1, RQST2+2 |
NODE(0 | ZERO+1, ZERO+2, ZERO+3, ZERO+4, ZERO+5 |
SEGPTR | RLSEPAT+13~, RLSEPAT+18*, RLSEPAT+19, RLSEPAT+24, RLSEPAT+28 |
SSN | RLSEPAT+13~, RLSEPAT+21*, RLSEPAT+40*, RLSEPAT+42 |
TMP | RLSEPAT+13~, RLSEPAT+15*, RLSEPAT+16, RLSEPAT+27*, RLSEPAT+28, RLSEPAT+29, RLSEPAT+31, RLSEPAT+32, RLSEPAT+37*, RLSEPAT+38 , RLSEPAT+39, RLSEPAT+40 |
TRANPTR | RLSEPAT~, RLSEPAT+11, RLSEPAT+15, RLSEPAT+24, RLSEPAT+26 |
TRNPTR | TRNDATA~, TRNDATA+9, TRNDATA+15 |
U | ZERO+1, ZERO+2, ZERO+3, ZERO+4, ZERO+5, QRY+1, QRY+2, QRY+4, QRY+6, RQST1+1 , RQST1+2, RQST2+1, RQST2+2, ATHR1+1, ATHR1+2, ATHR2+1, ATHR2+2 |
VAQADOM | ATHR2+2*, KILLTRN+5! |
VAQADT | ATHR1+1*, KILLTRN+4! |
VAQAPER | ATHR1+2*, KILLTRN+4! |
VAQASITE | ATHR2+1*, KILLTRN+5! |
VAQCSTAT | ZERO+2*, KILLTRN+1! |
VAQEDOB | QRY+5*, KILLTRN+2! |
VAQESSN | QRY+3*, KILLTRN+2! |
VAQIDOB | QRY+4*, QRY+5, KILLTRN+2! |
VAQISSN | QRY+2*, QRY+3, KILLTRN+2! |
VAQPTID | QRY+6*, KILLTRN+2! |
VAQPTNM | QRY+1*, KILLTRN+2! |
VAQPTPTR | ZERO+3*, KILLTRN+1! |
VAQRDOM | RQST2+2*, KILLTRN+6! |
VAQRDT | RQST1+1*, KILLTRN+3! |
VAQRPER | RQST1+2*, KILLTRN+3! |
VAQRSITE | RQST2+1*, KILLTRN+6! |
VAQRSTAT | ZERO+5*, KILLTRN+1! |
VAQSENP | ZERO+4*, KILLTRN+1! |
VAQTRN | ZERO+1*, KILLTRN+1! |
Y | TRNDATA+12~, RQST1+1*, ATHR1+1* |