PSABRKU1 ;BIR/DB-Upload and Process Prime Vendor Invoice Data ;8/19/99
Source file <PSABRKU1.m>
Package | Total | Call Graph |
---|---|---|
Drug Accountability | 3 | ^PSABRKU3 XTMP^PSABRKU4 ^PSABRKU6 |
MailMan | 1 | ^XMD |
VA Fileman | 1 | NOW^%DTC |
Name | Comments | DBIA/ICR reference |
---|---|---|
STRT | ||
PSAUPLD(RET,TMP) | ;uploads data in VISTA
|
|
SPACES | ;remove all leading spaces in all data elements
|
|
KILL | ||
LINE | ;Places each segment on a node to itself.
|
|
LOGON | ;Check security key
|
|
CHECK | ;Looks for X12 errors. If no errors, loads data into ^TMP($J,"PSAPV SET")
|
RPC Name | Call Tags |
---|---|
PSA UPLOAD | PSAUPLD |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | STRT+1, LOGON+4 |
^TMP($J | PSAUPLD+5, PSAUPLD+6*, STRT+2*, STRT+3*, STRT+5, STRT+6, STRT+13, STRT+14, STRT+17*, LINE+1! , LINE+3, LINE+4, LINE+7*, SPACES+1, SPACES+2, SPACES+3*, SPACES+9*, SPACES+10!, KILL!, KILL+5* , KILL+7*, KILL+8*, KILL+11, KILL+12!, LOGON+2!, LOGON+4* |
^XTMP("PSAPV" | CHECK+3 |
^XUSEC("PSA ORDERS" | LOGON+3 |
Name | Line Occurrences |
---|---|
KILL | STRT+8 |
LINE | STRT+10 |
LOGON | PSAUPLD+4 |
STRT | PSAUPLD+3 |
Name | Field # of Occurrence |
---|---|
^(0 | STRT+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | STRT+1, STRT+4, KILL+1!, LOGON+4 |
CNT | PSAUPLD+5*, PSAUPLD+6*, KILL+4*, KILL+5, KILL+9!, LOGON+2! |
CNTR | KILL+6*, KILL+7, KILL+9! |
>> DATA | PSAUPLD+6* |
DIR | KILL+1! |
DIRUT | KILL+1! |
DT | STRT+4* |
DUZ | KILL+11, LOGON+3 |
DWLC | KILL+1! |
PSABBC | STRT*, STRT+5, KILL+1! |
PSACNT | STRT*, STRT+13*, LINE+2*, LINE+7*, SPACES+1*, SPACES+4*, SPACES+5*, SPACES+6, KILL+1!, LOGON+2! |
PSACOMB | KILL+1! |
PSACS | KILL+1! |
PSACTN1 | KILL+1! |
PSACTRL | KILL+1! |
PSACTRL2 | KILL+1! |
PSADATA | STRT+14*, STRT+15*, STRT+16*, STRT+17, LINE+4*, LINE+5, LINE+6, LINE+8*, KILL+1! |
>> PSADB | STRT+6* |
PSADE | SPACES+6*, SPACES+7*, SPACES+8, KILL+1! |
PSADT | KILL+1! |
PSADUP | KILL+1! |
PSAENTRY | KILL+1! |
PSAERR | KILL+1! |
PSAEX | SPACES+5*, KILL+1! |
PSAEXPEC | KILL+1! |
PSAFND1 | KILL+1! |
PSAGS | KILL+1! |
PSAGUI1 | KILL+10! |
>> PSAGUI2 | LOGON+1* |
>> PSAGUI2( | KILL+4 |
>> PSAGUI3 | LOGON+1* |
>> PSAGUI3( | KILL+6 |
>> PSAGUI4 | KILL+8, KILL+9, LOGON+1* |
PSAHOLD | LINE+2*, LINE+4, LINE+5*, LINE+8*, LINE+9*, KILL+1! |
PSAIEN | KILL+1! |
PSAIN | KILL+1! |
PSAINV | KILL+1! |
PSAINVDT | KILL+1! |
PSAINVN | KILL+1! |
PSAISA | STRT*, STRT+5, STRT+6*, KILL+1! |
PSAISIT | KILL+1! |
PSAISITN | KILL+1! |
PSAITCNT | KILL+1! |
PSAITEM | KILL+1! |
PSALAST | KILL+2! |
PSALINE | STRT*, STRT+5*, STRT+6, STRT+13*, STRT+14, STRT+17, LINE+2*, LINE+3*, LINE+4, SPACES+1* , SPACES+2, SPACES+3, SPACES+9, KILL+2! |
PSALLCS | KILL+2! |
PSALLOK | KILL+2! |
PSALND | STRT*, STRT+6*, STRT+8, STRT+10, STRT+15, KILL+2! |
PSALOC | KILL+2! |
PSANDC | KILL+2! |
PSANEW | KILL+2! |
PSANEXT | CHECK+3*, KILL+2! |
PSANTYPE | KILL+2! |
PSAOK | KILL+2! |
PSAORD | KILL+2! |
PSAORDDT | KILL+2! |
PSAORDN | KILL+2! |
PSAOSIT | KILL+2! |
PSAOSITN | KILL+2! |
PSAOUT | PSAUPLD+3*, STRT+13, KILL+2! |
PSAPC | SPACES+6*, SPACES+8, KILL+2! |
PSAS | KILL+3! |
PSASEG | LINE+6*, LINE+7, SPACES+2*, SPACES+3, SPACES+4, SPACES+5, SPACES+6, SPACES+8*, SPACES+9, KILL+3! |
PSASEGD | STRT*, STRT+6*, STRT+8, STRT+10, STRT+16, KILL+3! |
PSASEGL | SPACES+4*, SPACES+5, KILL+3! |
PSASS | KILL+3! |
PSAST | KILL+3! |
PSASTA | KILL+3! |
PSASTAR | STRT+9*, KILL+3! |
PSASTCNT | KILL+3! |
>> PSASTOP | LINE+6*, LINE+8* |
PSASUB | KILL+3! |
PSASYN | KILL+3! |
PSAUOM | KILL+3! |
PSAUOM1 | KILL+3! |
PSAUOMH | KILL+3! |
PSAUOMH1 | KILL+3! |
PSAVSN | KILL+3! |
PSAX | SPACES+5*, KILL+3! |
RET | PSAUPLD~, PSAUPLD+3*, PSAUPLD+9*, KILL+9* |
RET(0 | LOGON+3*, LOGON+4* |
TMP | PSAUPLD~, STRT! |
TMP( | PSAUPLD+6 |
TMP(0 | PSAUPLD+3, PSAUPLD+4 |
X | PSAUPLD+2*, PSAUPLD+5*, PSAUPLD+6*, KILL+3!, KILL+4*, KILL+6* |
X1 | KILL+3! |
X2 | KILL+3! |
>> XMDUZ | KILL+11* |
>> XMSUB | KILL+11* |
>> XMTEXT | KILL+11* |
>> XMY( | KILL+11* |
XTKDIC | KILL+3! |
XTKERR | KILL+3! |
XTKMODE | KILL+3! |
Y | STRT+1*, STRT+3, KILL+3!, LOGON+4* |