DGHBPUTL ;ALB/PWC,JAM - Health Benefit Plan Utility Routine ;5/22/13 11:50am
Source file <DGHBPUTL.m>
Package | Total | Call Graph |
---|---|---|
Registration | 2 | $$ADD^DGENDBS $$SITE^VASITE |
VA FileMan | 2 | NOW^%DTC ^DIK |
Health Level Seven | 1 | $$FMDATE^HLFNC |
Income Verification Match | 1 | EVENT^IVMPLOG |
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 |
---|---|---|
GETHBP(DFN) | ;Return all records in HBP sub-file #25.01 in HBP array
; returns current information in HBP("CUR",PLAN NAME)=ENTIRE DATA FROM 25.01 DA ; returns current information in HBP("CUR",PLAN NAME,"IEN")=PLAN CODE ; returns history information in HBP("HIS",DA,DTTM)=PLAN NAME^ENTIRE DATA FROM 25.02 DA |
|
HBP1 | ||
GETDETL(HBPNUM) | ;Return detail for each HBP in an array for display purposes
|
|
GETPLAN | ; Return all Health Benefit Plans from file #25.11 in array
|
|
SETPLAN(DFN,PLAN,SITE) | ;Set Health Benefit Plan and History into file 25.01 and 25.02 for input DFN
; Current data plans will also be filed into the history so that history will contain all ; additions and deletions for the patient |
|
DELPLAN(DFN,PLAN,SITE) | ;Delete Health Benefit Plan and set History into file 25.01 and 25.02 for input DFN
|
|
HL7UPD(DFN,DGHBP,MSHDATE) | ; Store HL7 Health Benefit Plan (HBP) data in PATIENT file (#2)
|
|
STORCUR(DFN,STORDATA) | ; Store Current data
|
|
STORHIS(DFN,STORDATA,ACTION) | ; Store History data
|
|
DELCUR(DFN,HBPCODE) | ; Delete entry from Current data
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGHBP(25.11 - [#25.11] | GETHBP+9, HBP1+3, GETDETL+3, GETDETL+6, GETPLAN+2, GETPLAN+5, GETPLAN+6 |
^DPT - [#2] | GETHBP+7, GETHBP+8, HBP1+1, HBP1+2, DELPLAN+5, HL7UPD+6, HL7UPD+7, HL7UPD+9*, HL7UPD+20, DELCUR+3 |
Name | Line Occurrences |
---|---|
DELCUR | HL7UPD+13 |
STORCUR | HL7UPD+21 |
STORHIS | HL7UPD+12, HL7UPD+22 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | SETPLAN+6, DELPLAN+3 |
ACTION | STORHIS~, STORHIS+7 |
ADDHBP | HL7UPD+1~ |
ADDHBP( | HL7UPD+4*, HL7UPD+9 |
CNT | GETDETL+2~, GETDETL+7* |
DA | DELPLAN+1~, DELPLAN+5*, DELCUR+1~, DELCUR+3* |
DA(1 | DELPLAN+4*, DELPLAN+5, DELPLAN+7, DELCUR+2*, DELCUR+3, DELCUR+4 |
DATA | GETDETL+2~, GETDETL+6*, SETPLAN+4~, SETPLAN+14, SETPLAN+18~, SETPLAN+27, DELPLAN+1~, DELPLAN+19, STORCUR+1~, STORCUR+8 , STORHIS+1~, STORHIS+9 |
DATA( | GETDETL+7, SETPLAN+8*, SETPLAN+20*, DELPLAN+11*, STORCUR+3*, STORHIS+3* |
DATA(1 | SETPLAN+9*, SETPLAN+21*, DELPLAN+12*, STORCUR+4*, STORHIS+4* |
DATA(2 | SETPLAN+10*, SETPLAN+22*, DELPLAN+13*, STORCUR+5*, STORHIS+5* |
DATA(3 | SETPLAN+11*, SETPLAN+23*, DELPLAN+14*, STORCUR+6*, STORHIS+6* |
DATA(4 | SETPLAN+12*, SETPLAN+24*, DELPLAN+15*, STORCUR+7*, STORHIS+7* |
DATA(5 | SETPLAN+25*, DELPLAN+16*, STORHIS+8* |
DATETIME | SETPLAN+4~, SETPLAN+6*, SETPLAN+9, SETPLAN+20, DELPLAN+1~, DELPLAN+3*, DELPLAN+11 |
DFN | GETHBP~, GETHBP+4, GETHBP+7, GETHBP+8, HBP1+1, HBP1+2, SETPLAN~, SETPLAN+7, SETPLAN+15, SETPLAN+19 , DELPLAN~, DELPLAN+4, HL7UPD~, HL7UPD+6, HL7UPD+7, HL7UPD+9, HL7UPD+12, HL7UPD+13, HL7UPD+20, HL7UPD+21 , HL7UPD+22, STORCUR~, STORCUR+2, STORHIS~, STORHIS+2, DELCUR~, DELCUR+2 |
DGENDA | SETPLAN+4~, SETPLAN+14, SETPLAN+18~, SETPLAN+27, DELPLAN+1~, DELPLAN+19, STORCUR+1~, STORCUR+8, STORHIS+1~, STORHIS+9 , DELCUR+1~ |
DGENDA(1 | SETPLAN+7*, SETPLAN+19*, DELPLAN+4*, STORCUR+2*, STORHIS+2*, DELCUR+2* |
DGHBP | HL7UPD~, HL7UPD+16 |
DGHBP( | HL7UPD+4, HL7UPD+17, HL7UPD+18 |
DIK | DELPLAN+1~, DELPLAN+7*, DELPLAN+8!, DELCUR+1~, DELCUR+4*, DELCUR+5! |
DUZ | SETPLAN+10, SETPLAN+22, DELPLAN+13 |
HBCODE | GETHBP+5~, GETHBP+6*, GETHBP+8*, GETHBP+9, GETHBP+11, HBP1*, HBP1+2*, HBP1+3 |
HBDATA | GETHBP+5~, GETHBP+6*, GETHBP+8*, GETHBP+10, HBP1*, HBP1+2*, HBP1+4 |
HBIEN | GETPLAN+1~, GETPLAN+4*, GETPLAN+5*, GETPLAN+6, GETPLAN+7 |
HBNAME | GETHBP+5~, GETHBP+9*, GETHBP+10, GETHBP+11, HBP1+3*, HBP1+4 |
>> HBP("CUR" | GETHBP+5!, GETHBP+10*, GETHBP+11* |
>> HBP("DETAIL" | GETDETL+2!, GETDETL+3*, GETDETL+4*, GETDETL+5, GETDETL+7* |
>> HBP("HIS" | GETHBP+5!, HBP1+4* |
>> HBP("PLAN" | GETPLAN+1!, GETPLAN+7* |
HBPCODE | DELCUR~, DELCUR+3 |
HBPLAN | GETPLAN+1~*, GETPLAN+2*, GETPLAN+5 |
HBPNOD | HL7UPD+1~, HL7UPD+7*, HL7UPD+9, HL7UPD+11*, HL7UPD+12, HL7UPD+13 |
HBPNUM | GETDETL~, GETDETL+1, GETDETL+3, GETDETL+6, GETDETL+7 |
HL7DATA | HL7UPD+1~, HL7UPD+18*, HL7UPD+20, HL7UPD+21, HL7UPD+22 |
LAST | GETDETL+2~, GETDETL+5*, GETDETL+7 |
MSHDATE | HL7UPD~, HL7UPD+11 |
OCC | HL7UPD+1~, HL7UPD+4*, HL7UPD+6*, HL7UPD+7, HL7UPD+9, HL7UPD+17*, HL7UPD+18 |
PLAN | GETPLAN+1~, GETPLAN+6*, GETPLAN+7, SETPLAN~, SETPLAN+8, SETPLAN+21, DELPLAN~, DELPLAN+5, DELPLAN+12 |
SDT | GETHBP+5~, GETHBP+6*, GETHBP+7*, GETHBP+8, HBP1*, HBP1+1*, HBP1+2, HBP1+4 |
SITE | SETPLAN~, SETPLAN+11, SETPLAN+12, SETPLAN+23, SETPLAN+25, DELPLAN~, DELPLAN+14, DELPLAN+16 |
STORDATA | STORCUR~, STORCUR+3, STORCUR+4, STORCUR+5, STORCUR+6, STORCUR+7, STORHIS~, STORHIS+3, STORHIS+4, STORHIS+5 , STORHIS+6, STORHIS+8 |
SUCCESS | SETPLAN+4~, SETPLAN+14*, SETPLAN+15, SETPLAN+18~, SETPLAN+27*, DELPLAN+1~, DELPLAN+19*, STORCUR+1~, STORCUR+8*, STORHIS+1~ , STORHIS+9* |
U | HL7UPD+4, HL7UPD+9, HL7UPD+11, HL7UPD+13, HL7UPD+20, STORCUR+3, STORCUR+4, STORCUR+5, STORCUR+6, STORCUR+7 , STORHIS+3, STORHIS+4, STORHIS+5, STORHIS+6, STORHIS+8 |