©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
ABSPICPY ; IHS/OIT/CASSevern/Pieran ran 9/19/2011 - Copy Insurance default Profiles
Source file <ABSPICPY.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Patient Registration | 1 | $$INSTYP^AGUTL |
| Pharmacy Point of Sale | 1 | LOG^ABSPOSL2 |
| VA Fileman | 1 | UPDATE^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CAIDCOPY(ABSPINS) | ;Read through the CAIDTAB table and load those settings
|
|
| POPSPEC(ABSPINS,ABSPSPEC) | ;Now populate the Special Code stuff
|
|
| POPFLD(ABSPINS,ABSPSPFL) | ;Next we populate the suppressed fields
|
|
| CARECOPY(ABSPINS) | ;Read through the CARETAB table and load those settings
|
|
| PRIVCOPY(ABSPINS) | ;Read through the PRIVTAB table and load those settings
|
|
| CARETAB | ;;TYPE;NCPDP FIELD #;COMMENT;VALUE
|
|
| POPSEG(ABSPINS,ABSPSPSG) | ;Next we populate the suppressed segments
|
|
| PRIVTAB | ;;TYPE;NCPDP FIELD #;COMMENT;VALUE
|
|
| RDLINE(LINE,ABSPINS) | ;Go through the line and populate the array
|
|
| PROCESS(ABSPINS,TYP) | ;Process the INSURER here
|
|
| DEFCOPY(ABSPINS) | ;Read through the DEFTAB table and load those settings
|
|
| DEFTAB | ;;TYPE;NCPDP FIELD #;FIELD NAME;VALUE
|
|
| EN(ABSPINS) | ;EP
|
|
| CAIDTAB | ;;TYPE;NCPDP FIELD #;COMMENT;VALUE
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABSPEI - [#9002313.4] | RDLINE+2, POPSPEC+2, POPSEG+2, POPFLD+2 |
| Name | Line Occurrences |
|---|---|
| CAIDCOPY | PROCESS+3 |
| CARECOPY | PROCESS+4 |
| DEFCOPY | PROCESS+2 |
| POPFLD | PROCESS+11 |
| POPSEG | PROCESS+10 |
| POPSPEC | PROCESS+9 |
| PRIVCOPY | PROCESS+5 |
| PROCESS | EN+16 |
| RDLINE | DEFCOPY+4, CAIDCOPY+4, CARECOPY+4, PRIVCOPY+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABSPINS | EN~, EN+14, EN+16, PROCESS~, PROCESS+2, PROCESS+3, PROCESS+4, PROCESS+5, PROCESS+9, PROCESS+10 , PROCESS+11, DEFCOPY~, DEFCOPY+4, CAIDCOPY~, CAIDCOPY+4, CARECOPY~, CARECOPY+4, PRIVCOPY~, PRIVCOPY+4, RDLINE~ , RDLINE+2, RDLINE+9, POPSPEC~, POPSPEC+2, POPSPEC+9, POPSPEC+10, POPSEG~, POPSEG+2, POPSEG+6, POPFLD~ , POPFLD+2, POPFLD+6 |
| ABSPSPEC | PROCESS+1~, PROCESS+9, POPSPEC~ |
| ABSPSPEC( | RDLINE+6*, POPSPEC+5, POPSPEC+8 |
| ABSPSPFL | PROCESS+1~, PROCESS+11, POPFLD~ |
| ABSPSPFL( | RDLINE+8*, POPFLD+5 |
| ABSPSPSG | PROCESS+1~, PROCESS+10, POPSEG~ |
| ABSPSPSG( | RDLINE+7*, POPSEG+5 |
| FILE | RDLINE+1~, RDLINE+2*, RDLINE+9 |
| FLDNUM | RDLINE+1~ |
| INS | PROCESS+1~, POPSPEC+3~, POPSEG+3~ |
| INS(1 | PROCESS+7, RDLINE+9*, POPSPEC+9*, POPSPEC+10*, POPSEG+6*, POPFLD+6* |
| L | DEFCOPY+1~, DEFCOPY+2*, CAIDCOPY+1~, CAIDCOPY+2*, CARECOPY+1~, CARECOPY+2*, PRIVCOPY+1~, PRIVCOPY+2* |
| LINE | DEFCOPY+1~, DEFCOPY+3*, DEFCOPY+4, CAIDCOPY+1~, CAIDCOPY+3*, CAIDCOPY+4, CARECOPY+1~, CARECOPY+3*, CARECOPY+4, PRIVCOPY+1~ , PRIVCOPY+3*, PRIVCOPY+4, RDLINE~, RDLINE+3, RDLINE+4, RDLINE+5 |
| NCPDPCD | RDLINE+4*, RDLINE+6, RDLINE+8, RDLINE+9, POPSPEC+3~, POPSPEC+4*, POPSPEC+5*, POPSPEC+7, POPSPEC+8, POPSPEC+9 , POPFLD+3~, POPFLD+4*, POPFLD+5*, POPFLD+6 |
| OK | EN+1~, EN+2* |
| SEGCD | POPSEG+3~, POPSEG+4*, POPSEG+5*, POPSEG+6 |
| STRING | POPSPEC+3~, POPSPEC+8*, POPSPEC+10 |
| TYP | EN+1~, EN+14*, EN+15*, EN+16, PROCESS~, PROCESS+3, PROCESS+4, PROCESS+5 |
| TYPE | RDLINE+1~, RDLINE+3*, RDLINE+6, RDLINE+7, RDLINE+8, RDLINE+9 |
| VAL | RDLINE+1~, RDLINE+5*, RDLINE+6, RDLINE+7, RDLINE+9 |
| ZERR | PROCESS+1~, PROCESS+8, POPSPEC+3~, POPSPEC+13, POPSEG+3~, POPSEG+9, POPFLD+3~, POPFLD+9 |
| Name | Field # of Occurrence |
|---|---|
| $T(CAIDTAB+L | CAIDCOPY+2, CAIDCOPY+3 |
| $T(CARETAB+L | CARECOPY+2, CARECOPY+3 |
| $T(DEFTAB+L | DEFCOPY+2, DEFCOPY+3 |
| $T(PRIVTAB+L | PRIVCOPY+2, PRIVCOPY+3 |