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* |