©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
AGCNVWC ; IHS/ASDS/EFG - WORKMAN'S COMP CONVERSION ROUTINE ;
Source file <AGCNVWC.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | $$HTE^XLFDT (BMES,MES)^XPDUTL |
| VA Fileman | 1 | UPDATE^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| READOLD | ;
|
|
| TS | ||
| ADDONE | ;
|
|
| ENTERNEW | ;CREATE THE NEW RECORDS IN 'THIRD PART LIABILITY' FILE
|
|
| START | ;EP -
|
|
| CREATFDA | ;
|
|
| DISPLAY(GLO,FREC,MSG,KEYWORD) | ;
|
|
| CONFIRM() | ;
|
|
| NEWONE | ;
|
|
| SEARCH(X) | ;
|
|
| FINDINS(X,RECORD) | ;FIND INSURER IN THE INSURER FILE
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNWC - [#9000042] | CREATFDA+2 |
| ^AUPNWC(0 | START+5 |
| ^AUPNWRKC - [#9000032] | READOLD+5, READOLD+6 |
| ^AUPNWRKC("C" | READOLD+2, READOLD+4 |
| ^AUPNWRKC(0 | START+1 |
| ^DIC(9000041 | CONFIRM+1 |
| Name | Line Occurrences |
|---|---|
| ADDONE | CREATFDA+3 |
| CREATFDA | ENTERNEW+1 |
| DISPLAY | SEARCH+3, SEARCH+4 |
| ENTERNEW | READOLD+22 |
| NEWONE | CREATFDA+2 |
| READOLD | START+7 |
| SEARCH | FINDINS+2 |
| TS | START+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGERROR | CREATFDA+1! |
| AGFDA | CREATFDA+1! |
| AGFDA( | NEWONE+4*, NEWONE+5*, NEWONE+6*, NEWONE+7*, NEWONE+8*, NEWONE+9*, NEWONE+10*, NEWONE+11*, NEWONE+12*, NEWONE+13* , NEWONE+14*, NEWONE+15*, NEWONE+16*, NEWONE+17*, ADDONE+2*, ADDONE+3*, ADDONE+4*, ADDONE+5*, ADDONE+6*, ADDONE+7* , ADDONE+8*, ADDONE+9*, ADDONE+10*, ADDONE+11*, ADDONE+12*, ADDONE+13*, ADDONE+14*, ADDONE+15* |
| AGFDA(9000042 | NEWONE+3* |
| AGIEN | CREATFDA+1! |
| AGIEN(1 | NEWONE+1* |
| AGRECORD | CREATFDA+1!, NEWONE+2*, NEWONE+4, NEWONE+5, NEWONE+6, NEWONE+7, NEWONE+8, NEWONE+9, NEWONE+10, NEWONE+11 , NEWONE+12, NEWONE+13, NEWONE+14, NEWONE+15, NEWONE+16, NEWONE+17, ADDONE+1*, ADDONE+2, ADDONE+3, ADDONE+4 , ADDONE+5, ADDONE+6, ADDONE+7, ADDONE+8, ADDONE+9, ADDONE+10, ADDONE+11, ADDONE+12, ADDONE+13, ADDONE+14 , ADDONE+15 |
| >> ATTORN | READOLD+12*, NEWONE+8, ADDONE+6 |
| >> CLAIM | READOLD+10*, NEWONE+6, ADDONE+4 |
| >> CLAIMNUM | READOLD+11*, NEWONE+7, ADDONE+5 |
| >> CLMSTAT | READOLD+16*, NEWONE+12, ADDONE+10 |
| >> DATA0 | READOLD+5*, READOLD+7, READOLD+8, READOLD+9, READOLD+10, READOLD+11, READOLD+12, READOLD+13, READOLD+14, READOLD+15 , READOLD+16, READOLD+17, READOLD+18, READOLD+19, READOLD+20 |
| >> DATA1 | READOLD+6*, READOLD+21 |
| >> DATEINJ | READOLD+7*, NEWONE+4, ADDONE+2 |
| >> DESCRIP | READOLD+9*, NEWONE+5, ADDONE+3 |
| >> DTCLOSE | READOLD+14*, NEWONE+10, ADDONE+8 |
| >> EFFDATE | READOLD+19*, NEWONE+15, ADDONE+13 |
| >> EMPLOYER | READOLD+13*, NEWONE+9, ADDONE+7 |
| >> ENDDATE | READOLD+20*, NEWONE+16, ADDONE+14 |
| >> ENTITY | READOLD+17*, NEWONE+13, ADDONE+11 |
| FREC | SEARCH+3*, SEARCH+4*, DISPLAY~, DISPLAY+1 |
| GLO | SEARCH+1*, SEARCH+2*, SEARCH+3, SEARCH+4, DISPLAY~, DISPLAY+1 |
| >> GRPNAME | READOLD+18*, NEWONE+14, ADDONE+12 |
| INSCOMPP | FINDINS+1!, SEARCH+2, SEARCH+3*, SEARCH+4* |
| KEYWORD | DISPLAY~, DISPLAY+1 |
| MSG | DISPLAY~, DISPLAY+1 |
| >> NOTES | READOLD+21*, NEWONE+17, ADDONE+15 |
| >> PAT | READOLD+8*, CREATFDA+2, NEWONE+1, NEWONE+3, ADDONE+1 |
| >> PATIEN | READOLD+1*, READOLD+2*, READOLD+4 |
| RECORD | READOLD+3*, READOLD+4*, READOLD+5, READOLD+6, FINDINS~, DISPLAY+1 |
| >> RECORDS | START+1*, START+2, START+3 |
| >> TYPEACC | READOLD+15*, NEWONE+11, ADDONE+9 |
| U | START+1, START+5, READOLD+7, READOLD+8, READOLD+9, READOLD+10, READOLD+11, READOLD+12, READOLD+13, READOLD+14 , READOLD+15, READOLD+16, READOLD+17, READOLD+18, READOLD+19, READOLD+20, READOLD+21, SEARCH+3, DISPLAY+1 |
| X | FINDINS~, FINDINS+2, SEARCH~, SEARCH+3, SEARCH+4 |