VAFCTFNP ;BIR/DRI - NEW PERSON TREATING FACILITY MFU PROCESSING ;4/28/21 16:58
Source file <VAFCTFNP.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 |
|---|---|---|
| EN(MFI,MFA) | ;entry point to process the inbound treating facility list
; Input (example of incoming treating facility list from MPI): ; MFI="MFI^TFL^^REP^^^NE^101~CENTRAL OFFICE" ; MFI("1008785167V219208",500,1)="^^MAD^^^^12596^A^USDVA^PN" ; MFI("1008785167V219208","200AD",1)="^^MAD^^^^23107^A^USDVA^PN" ; MFI("1008785167V219208","200M",1)="^^MAD^^^^12596^A^USDVA^PN" ; MFI("1008785167V219208","200PIV",1)="^^MAD^^^^512388^A^USDVA^EI" ; MFI("1008785167V219208","200PROV",1)="^^MAD^^^^1008785167^A^USDVA^PN" ; MFI("1008785167V219208","200UPN",1)="^^MAD^^^^DAN.XXXXXXXXX^A^USDVA^PN" |
|
| COMP1 | ;compare existing new person tf's to incoming tf's to see what needs deleted
|
|
| COMP2 | ;compare incoming tf's to existing tf's to see what needs added or updated
|
|
| ADD(VAFCFDA,VAFCERR) | ;add new person treating facilities
|
|
| UPDATE(VAFCIEN,VAFCFDA,VAFCERR) | ;update or delete new person treating facilities
|
|
| CLEANUP(ICN) | ;delete new person treating facilities from #391.92 when person becomes a patient ;**1050, VAMPI-9501 (dri)
|
| FileNo | Call Tags |
|---|---|
| ^DGCN(391.92 - [#391.92] | GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCN(391.92 - [#391.92] | EN+38, COMP2+12, UPDATE+2, UPDATE+4, CLEANUP+2, CLEANUP+3, CLEANUP+4 |
| ^VA(200 - [#200] | EN+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AA | EN+18~, COMP1+14*, COMP1+16, COMP2+8*, COMP2+15, COMP2+23 |
| ERROR | EN+18~, EN+45, COMP1+20, COMP2+25, COMP2+26, COMP2+30, COMP2+31 |
| ERROR( | EN+30*, EN+31*, COMP2+35 |
| ERROR("DIERR" | COMP2+26, COMP2+31 |
| FDA | EN+18~, EN+45, COMP1+20, COMP2+25, COMP2+30, CLEANUP+1~, CLEANUP+4 |
| FDA( | EN+39*, EN+40*, EN+41*, EN+42*, EN+43*, EN+44*, COMP1+19*, COMP2+19*, COMP2+20*, COMP2+21* , COMP2+22*, COMP2+23*, COMP2+24*, COMP2+29*, CLEANUP+4* |
| GLO | EN+18~, COMP1+2* |
| >> HL("FS" | COMP2+26, COMP2+31, COMP2+35 |
| >> HLCOMP | COMP2+26, COMP2+31, COMP2+35 |
| ICN | EN+18~, EN+25*, EN+26*, EN+31, EN+38, EN+41, COMP1+4, COMP1+8*, COMP2+2*, COMP2+14 , CLEANUP~, CLEANUP+2 |
| IDENSTAT | EN+18~, COMP1+13*, COMP2+7*, COMP2+16, COMP2+24, COMP2+29 |
| IDTYP | EN+18~, COMP1+15*, COMP1+16, COMP2+9*, COMP2+15, COMP2+22 |
| LOC | EN+18~, EN+26*, COMP1+7*, COMP1+8, COMP1+9, COMP1+10, COMP1+11, COMP1+12, COMP1+13, COMP1+14 , COMP1+15, COMP2+1*, COMP2+2, COMP2+3, COMP2+4, COMP2+5, COMP2+6, COMP2+7, COMP2+8, COMP2+9 |
| MATCH | EN+18~, COMP1+6*, COMP1+7, COMP1+16*, COMP1+18, COMP2+11*, COMP2+12, COMP2+15*, COMP2+16, COMP2+18 |
| MFA | EN~ |
| MFA( | COMP2+26*, COMP2+31*, COMP2+35* |
| MFECNT | EN+18~, COMP1+10*, COMP2+4*, COMP2+26, COMP2+31, COMP2+35 |
| MFI | EN~ |
| NPIEN | EN+18~, EN+25*, EN+26*, EN+30, EN+38, EN+39, COMP1+2, COMP2+12, COMP2+18, COMP2+19 , COMP2+28, CLEANUP+1~, CLEANUP+3*, CLEANUP+4 |
| NPTFIEN | EN+18~, COMP1+2*, COMP1+3, COMP1+4, COMP1+16, COMP1+19, COMP1+20, COMP2+12*, COMP2+13, COMP2+14 , COMP2+15, COMP2+16, COMP2+29, COMP2+30, CLEANUP+1~, CLEANUP+2*, CLEANUP+3, CLEANUP+4* |
| SOURCEID | EN+18~, COMP1+12*, COMP1+16, COMP2+6*, COMP2+15, COMP2+21 |
| SOURCESYS | EN+18~, COMP1+9*, COMP2+3*, COMP2+26, COMP2+31, COMP2+35 |
| SOURCESYSIEN | EN+18~, COMP1+9*, COMP1+16, COMP2+3*, COMP2+12, COMP2+15, COMP2+20 |
| STANUM | EN+18~, EN+20*, EN+26, EN+30, EN+31, COMP2+35 |
| UPDATE | EN+18~, COMP2+11*, COMP2+12, COMP2+16*, COMP2+28 |
| UPDTYP | EN+18~, COMP1+11*, COMP2+5*, COMP2+26, COMP2+31, COMP2+35 |
| VAFCARR | EN+18~, COMP1+3!, COMP2+13! |
| VAFCARR( | COMP1+4, COMP1+16, COMP2+14, COMP2+15, COMP2+16 |
| VAFCERR | EN+18~, ADD~, ADD+1!, UPDATE~, UPDATE+1! |
| VAFCFDA | EN+18~, ADD~, UPDATE~ |
| VAFCIEN | EN+18~, UPDATE~, UPDATE+2, UPDATE+4 |
