VAFCPTAD ; ISA/RJS,Zoltan;BIR/PTD - ADD NEW PATIENT ENTRY ;APR 6, 1999
Source file <VAFCPTAD.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | FILE^DICN (CHK,UPDATE)^DIE |
| Registration | 1 | $$SITE^VASITE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1 | ;Check value of all required fields
|
|
| ADD(RETURN,PARAM) | ;Add an entry to the PATIENT (#2) file for VOA
|
|
| FILE | ;Call FILE^DICN to add new entry to PATIENT (#2) file
|
|
| ALIAS | ;Optional - Add ALIAS and ALIAS SSN data for entry
|
| RPC Name | Call Tags |
|---|---|
| VAFC VOA ADD PATIENT | ADD |
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls, CHK^DIE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(5 - [#5] | EN1+84, EN1+86 |
| ^DPT - [#2] | ALIAS+25, ALIAS+27 |
| ^DPT("AICN" | EN1+24 |
| ^DPT(0 | FILE+8, FILE+10 |
| ^TMP("DIERR" | EN1+10, EN1+19, EN1+21, EN1+33, EN1+39, EN1+45, EN1+56, EN1+67, EN1+77, EN1+88 , EN1+92 |
| Name | Line Occurrences |
|---|---|
| ALIAS | FILE+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AFN | ALIAS+4~, ALIAS+7*, ALIAS+13 |
| ALN | ALIAS+4~, ALIAS+6*, ALIAS+12 |
| ALSERR | EN1+1~, FILE+17, FILE+18, ALIAS+24*, ALIAS+28* |
| AMN | ALIAS+4~, ALIAS+8*, ALIAS+14 |
| ASFX | ALIAS+4~, ALIAS+9*, ALIAS+15 |
| ASSN | ALIAS+4~, ALIAS+10*, ALIAS+17, ALIAS+21 |
| DA | FILE+1~, FILE+9! |
| DD | FILE+1!, FILE+9! |
| DIC | FILE+1~, FILE+2*, FILE+9! |
| DIC("DR" | FILE+3*, FILE+4*, FILE+5*, FILE+6*, FILE+7* |
| DIC(0 | FILE+2* |
| DIERR | EN1+1~ |
| DLAYGO | FILE+2*, FILE+9! |
| DO | FILE+1!, FILE+9! |
| DPTIDS | EN1+1~ |
| DPTIDS( | EN1+41* |
| DPTX | EN1+1~, EN1+35* |
| DR | FILE+1~, FILE+9! |
| ERR | ALIAS+4~ |
| ERR("DIERR" | ALIAS+28 |
| ERROR | EN1+1~ |
| FDA | EN1+1~, ALIAS+4~, ALIAS+23 |
| FDA( | ALIAS+20*, ALIAS+21* |
| FLG | EN1+1~, EN1+5*, EN1+11*, EN1+20*, EN1+22*, EN1+34*, EN1+40*, EN1+46*, EN1+50*, EN1+52* , EN1+57*, EN1+68*, EN1+74*, EN1+78*, EN1+89*, EN1+93*, EN1+95 |
| FN | EN1+1~, EN1+28*, EN1+30 |
| I | ALIAS+4~, ALIAS+5*, ALIAS+19*, ALIAS+20, ALIAS+21 |
| LN | EN1+1~, EN1+28*, EN1+29 |
| LOC | ALIAS+4~ |
| LOC( | ALIAS+12*, ALIAS+13*, ALIAS+14*, ALIAS+15*, ALIAS+16*, ALIAS+17*, ALIAS+20, ALIAS+21 |
| MN | EN1+1~, EN1+28*, EN1+31 |
| NUM | ALIAS+4~, ALIAS+5*, ALIAS+6, ALIAS+7, ALIAS+8, ALIAS+9, ALIAS+10, ALIAS+12, ALIAS+13, ALIAS+14 , ALIAS+15, ALIAS+16, ALIAS+17, ALIAS+20, ALIAS+21 |
| PARAM | ADD~ |
| PARAM("ALIAS" | FILE+16, ALIAS+2, ALIAS+5, ALIAS+6, ALIAS+7, ALIAS+8, ALIAS+9, ALIAS+10 |
| PARAM("CHKSUM" | EN1+18*, EN1+21 |
| PARAM("DOB" | EN1+38, EN1+39 |
| PARAM("FULLICN" | EN1+14, EN1+15, EN1+16, EN1+17, EN1+18 |
| PARAM("GENDER" | EN1+55, EN1+56 |
| PARAM("ICN" | EN1+17*, EN1+19, EN1+24 |
| PARAM("MMN" | EN1+92, EN1+93 |
| PARAM("NAME" | EN1+27, EN1+28, EN1+29*, EN1+30*, EN1+31*, EN1+32*, EN1+33, ALIAS+28 |
| PARAM("POBCTY" | EN1+77, EN1+78 |
| PARAM("POBST" | EN1+82, EN1+84, EN1+86*, EN1+87 |
| PARAM("PRFCLTY" | EN1+8, EN1+9, EN1+10 |
| PARAM("PSEUDO" | EN1+49*, EN1+52 |
| PARAM("SRVCNCTD" | EN1+60, EN1+63 |
| PARAM("SSN" | EN1+44, EN1+45, EN1+46, EN1+47, EN1+48*, EN1+50 |
| PARAM("TYPE" | EN1+66, EN1+67 |
| PARAM("VET" | EN1+71, EN1+74 |
| RESULT | EN1+1~, EN1+10, EN1+19, EN1+21, EN1+33, EN1+39, EN1+41, EN1+45, EN1+56, EN1+67 , EN1+77, EN1+88, EN1+92 |
| RETURN | ADD~, EN1+4! |
| RETURN(1 | EN1+8*, EN1+9*, EN1+10*, EN1+14*, EN1+15*, EN1+19*, EN1+21*, EN1+24*, EN1+27*, EN1+33* , EN1+38*, EN1+39*, EN1+44*, EN1+45*, EN1+55*, EN1+56*, EN1+60*, EN1+66*, EN1+67*, EN1+71* , EN1+77*, EN1+82*, EN1+88*, EN1+92*, EN1+95*, FILE+12*, FILE+17*, FILE+18* |
| RGRSICN | EN1+1~, EN1+5* |
| SFX | EN1+1~, EN1+28*, EN1+32 |
| STIEN | EN1+81~, EN1+84*, EN1+85, EN1+86 |
| U | FILE+12 |
| UNDEF | EN1+81~*, EN1+82, EN1+85* |
| VAFCA08 | EN1+1~, EN1+5* |
| VAFCDFN | EN1+2~, FILE+13*, FILE+17, ALIAS+20, ALIAS+21, ALIAS+25, ALIAS+27, ALIAS+28 |
| VAFCDOB | EN1+2~, EN1+40*, FILE+3 |
| VAFCICN | EN1+2~, EN1+20*, FILE+3 |
| VAFCMMN | EN1+2~, EN1+93*, FILE+7 |
| VAFCNAM | EN1+2~, EN1+34*, FILE+2, FILE+12 |
| VAFCPF | EN1+2~, EN1+11*, FILE+3 |
| VAFCPOBC | EN1+2~, EN1+78*, FILE+5 |
| VAFCPOBS | EN1+2~, EN1+89*, FILE+6 |
| VAFCRSN | EN1+3~, EN1+52*, FILE+4 |
| VAFCSRV | EN1+3~, EN1+63*, FILE+3 |
| VAFCSSN | EN1+3~, EN1+46*, EN1+50*, FILE+3, FILE+4 |
| VAFCSUM | EN1+3~, EN1+22*, FILE+3 |
| VAFCSX | EN1+3~, EN1+57*, FILE+3 |
| VAFCTYP | EN1+3~, EN1+68*, FILE+3 |
| VAFCVET | EN1+3~, EN1+74*, FILE+3 |
| VAL | EN1+1~, EN1+10*, EN1+11, EN1+19*, EN1+20, EN1+21*, EN1+22, EN1+33*, EN1+34, EN1+35 , EN1+39*, EN1+40, EN1+45*, EN1+46, EN1+56*, EN1+57, EN1+67*, EN1+68, EN1+77*, EN1+78 , EN1+87*, EN1+88, EN1+89, EN1+92*, EN1+93 |
| X | EN1+1~, FILE+2* |
| Y | EN1+1~, FILE+12, FILE+13 |