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 |