EASEZF1 ;ALB/jap,TM - Filing 1010EZ Data to Patient Database ; 8/16/11 4:04pm
Source file <EASEZF1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| F2(EASAPP,EASDFN) | ;file to Patient record in #2
|
|
| RESOLVE | ;try to resolve invalid input for free text fields only
|
|
| F202(SUBFILE,DATAKEY,EZDATA,SUBIEN,KEYIEN) | ;add or edit subrecord in subfile #2.02
|
|
| F206(SUBFILE,DATAKEY,EZDATA,SUBIEN) | ;add subrecord in subfile #2.06
|
|
| FPOB(DATAKEY,EZDATA,SUBIEN,PTDATA) | ;add or edit pob city & state
|
|
| F23216(SUBFILE,DATAKEY,EZDATA,SUBIEN,KEYIEN) | ;add subrecord in subfile #2.3216
|
|
| TBD1 | ;if this is entirely new and later than VistA episodes, allow add?
|
|
| TBD2 | ;if matching episode already exists, allow update?
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | Classic Fileman Calls, VAL^DIE |
