EASEZPVI ;ALB/AMA,ERC,SCK,LBD; GATHER VISTA INSURANCE DATA TO PRINT FROM DG OPTIONS ; 10/29/12 1:07pm
Source file <EASEZPVI.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INSUR(EASDFN) | ;GET INSURANCE DATA
; INPUT: ; EASDFN - POINTER TO THE PATIENT FILE |
|
| I408(EASDFN,MTDT,EASARRAY) | ;retrieve ien(s) to files #408.12,#408.13,#408.21,#408.22
; Modified from I408^EASEZI, called from V408^EASEZPV2 |
| Name | Field # of Occurrence |
|---|---|
| ^%DT | I408+16 |
| ALL^DGMTU21 | I408+18 |
| $$GET1^DIQ | INSUR+29, INSUR+34, INSUR+35, INSUR+36, INSUR+37, I408+34 |
| GETS^DIQ | INSUR+21 |
| $$GET^EASEZC1 | INSUR+14, INSUR+61, INSUR+62, INSUR+66 |
| $$KEY711^EASEZU1 | INSUR+13, INSUR+42, INSUR+44, INSUR+46, INSUR+48, INSUR+50, INSUR+52, INSUR+54, INSUR+56, INSUR+58 , INSUR+64, INSUR+68 |
| $$FMTE^XLFDT | I408+15 |
| FileNo | Call Tags |
|---|---|
| 2.312 | GETS^DIQ |
| ^IBA(355.3 - [#355.3] | GET1^DIQ |
| ^DIC(36 - [#36] | GET1^DIQ |
| ^DGMT(408.21 - [#408.21] | GET1^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.22 - [#408.22] | I408+41 |
| ^DPT - [#2] | INSUR+20 |
| ^TMP("EZDATA" | INSUR+15*, INSUR+16*, INSUR+43*, INSUR+45*, INSUR+47*, INSUR+49*, INSUR+51*, INSUR+53*, INSUR+55*, INSUR+57* , INSUR+59*, INSUR+65*, INSUR+69* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | I408+10~, I408+15* |
| %F | I408+10~, I408+15* |
| CAT | INSUR+12~, INSUR+62*, INSUR+63, INSUR+64, INSUR+68 |
| CITY | INSUR+12~, INSUR+34*, INSUR+47 |
| DGINC | I408+11~ |
| DGINC( | I408+32 |
| DGINC("S" | I408+23* |
| DGINC("V" | I408+20* |
| DGINR | I408+11~ |
| DGINR( | I408+40 |
| DGINR("S" | I408+24* |
| DGINR("V" | I408+21* |
| DGREL | I408+11~ |
| DGREL( | I408+28, I408+30, I408+31 |
| DGREL("S" | I408+25* |
| DGREL("V" | I408+22* |
| DT | INSUR+30 |
| EASARRAY | I408~ |
| EASARRAY(408 | I408+31*, I408+43* |
| EASDFN | INSUR~, INSUR+14, INSUR+20, INSUR+21, INSUR+66, I408~, I408+14, I408+18 |
| FLD | INSUR+11~, INSUR+23*, INSUR+24 |
| GRPCD | INSUR+12~, INSUR+37*, INSUR+55 |
| GRPTR | INSUR+12~, INSUR+28*, INSUR+29, INSUR+37, INSUR+61, INSUR+62 |
| I21 | I408+12~, I408+32*, I408+33, I408+34, I408+43 |
| I22 | I408+12~, I408+40*, I408+41, I408+43 |
| IEN | INSUR+11~, INSUR+26*, INSUR+27, INSUR+28, INSUR+30, INSUR+32, INSUR+33, INSUR+37, INSUR+38 |
| IENS | INSUR+11~, INSUR+22*, INSUR+23, INSUR+24 |
| INCYR | I408+11~, I408+34*, I408+39 |
| INDA | INSUR+11~, INSUR+20*, INSUR+21, INSUR+66 |
| INNAME | INSUR+12~, INSUR+38*, INSUR+57 |
| INPTR | INSUR+11~, INSUR+32*, INSUR+34, INSUR+35, INSUR+36 |
| INSORT | INSUR+11~ |
| INSORT( | INSUR+24*, INSUR+26, INSUR+27, INSUR+28, INSUR+30, INSUR+32, INSUR+33, INSUR+37, INSUR+38 |
| INSUR | INSUR+11~, INSUR+25! |
| INSUR( | INSUR+22, INSUR+23, INSUR+24 |
| KEY | INSUR+11~, INSUR+13*, INSUR+15, INSUR+16, INSUR+42*, INSUR+43, INSUR+44*, INSUR+45, INSUR+46*, INSUR+47 , INSUR+48*, INSUR+49, INSUR+50*, INSUR+51, INSUR+52*, INSUR+53, INSUR+54*, INSUR+55, INSUR+56*, INSUR+57 , INSUR+58*, INSUR+59, INSUR+64*, INSUR+65, INSUR+68*, INSUR+69 |
| KEYNM | INSUR+12~, INSUR+40*, INSUR+41*, INSUR+42, INSUR+44, INSUR+46, INSUR+48, INSUR+50, INSUR+52, INSUR+54 , INSUR+56, INSUR+58 |
| M | INSUR+12~, INSUR+40*, INSUR+41*, INSUR+43, INSUR+45, INSUR+47, INSUR+49, INSUR+51, INSUR+53, INSUR+55 , INSUR+57, INSUR+59, INSUR+65, INSUR+69 |
| MTDATE | I408+10~, I408+16*, I408+39 |
| MTDT | I408~, I408+15, I408+18, I408+38 |
| MULTIPLE | INSUR+11~, INSUR+19*, INSUR+39*, INSUR+40, INSUR+41 |
| NAME | INSUR+11~, INSUR+33*, INSUR+43 |
| PHONE | INSUR+12~, INSUR+36*, INSUR+53 |
| POLNO | INSUR+12~, INSUR+37*, INSUR+59 |
| STATE | INSUR+12~, INSUR+35*, INSUR+49 |
| STPTR | INSUR+12~, INSUR+35* |
| STREET | INSUR+12~, INSUR+34*, INSUR+45 |
| SUB1 | I408+11~, I408+27*, I408+28, I408+30, I408+31, I408+32, I408+40, I408+43 |
| SUB2 | I408+11~, I408+29*, I408+30*, I408+31, I408+32, I408+40, I408+43 |
| TYPE | INSUR+11~, INSUR+24* |
| U | I408+43 |
| VDATA | INSUR+11~, INSUR+14*, INSUR+15, INSUR+16, INSUR+17, INSUR+66*, INSUR+67, INSUR+69 |
| X | I408+10~, I408+15* |
| Y | I408+10~, I408+15*, I408+16 |
| ZIP | INSUR+12~, INSUR+36*, INSUR+51 |
