©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
AGSSPSZZ ; IHS/ADC/CRG -FILLING PSEUDO SSNS INTO BLANK SSNS ;
Source file <AGSSPSZZ.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
|
|
| 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 |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNPAT - [#9000001] | LOOP+1 |
| Name | Line Occurrences |
|---|---|
| IEN | LOOP+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGHRN | IEN+1~, PSSN+1, PSSN+2*, PSSN+3*, PSSN+4 |
| AGLOC | IEN+1~, PSSN+4 |
| AGPSEUDO | IEN+1~, PSSN+4* |
| AGSSDATA | IEN+1~ |
| AGSSI | LOOP+1*, LOOP+2!, IEN+2, IEN+3, IEN+4, PSSN+9 |
| AGSSN | IEN+1~, IEN+3*, IEN+4, PSSN+6 |
| DA | IEN+1~, PSSN+9* |
| DIC | IEN+1~, PSSN+7*, PSSN+8 |
| DIE | IEN+1~, PSSN+8* |
| DR | IEN+1~, PSSN+10* |