©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
AGSSPSDO ; IHS/ADC/CRG -FILLING PSEUDO SSNS INTO BLANK SSNS ;
Source file <AGSSPSDO.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| VA Fileman | 1 | ^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;EP -
|
|
| PSSN | ;Make sure HRN is 6 digits by packing 0s in leading positions
|
|
| RESULTS | ;Results
|
|
| LOOP | ;Loop through all Patients checking SSN field
|
|
| IEN | ;EP--Get IEN in pat file, Use data puller to get SSN, Location and HRN
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNPAT - [#9000001] | LOOP+1, IEN+3, IEN+7 |
| ^DPT - [#2] | RESULTS+4 |
| ^TMP("AG" | IEN+6*, RESULTS+3, RESULTS+5, RESULTS+6, RESULTS+8! |
| Name | Line Occurrences |
|---|---|
| IEN | LOOP+1 |
| PSSN | IEN+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGHRN | IEN+2~, IEN+7*, IEN+9, PSSN+1, PSSN+2*, PSSN+3*, PSSN+4 |
| AGLOC | IEN+2~, IEN+5*, IEN+6, PSSN+4 |
| AGPSEUDO | IEN+2~, PSSN+4* |
| AGSSDATA | IEN+2~, IEN+3* |
| AGSSI | LOOP+1*, LOOP+2!, IEN+1, IEN+3, IEN+4, IEN+6, IEN+7, PSSN+9 |
| AGSSIEN | RESULTS+5*, RESULTS+7, RESULTS+8! |
| AGSSJ | RESULTS+3*, RESULTS+4, RESULTS+5, RESULTS+6, RESULTS+8! |
| AGSSN | IEN+2~, IEN+4*, IEN+6, PSSN+6 |
| AGSSNAME | RESULTS+4*, RESULTS+7, RESULTS+8! |
| AGSSPSSN | RESULTS+6*, RESULTS+7, RESULTS+8! |
| DA | IEN+2~, PSSN+9* |
| DIC | IEN+2~, PSSN+7*, PSSN+8 |
| DIE | IEN+2~, PSSN+8* |
| DR | IEN+2~, PSSN+10* |
| DUZ(2 | IEN+5, IEN+7 |