Call Graph
Call Graph Total: 1
| Package | Total | Call Graph |
|---|---|---|
| VA Point of Service | 1 | ($$ADDMRAR,$$FILE,$$RESULT)^VPSMRAR0 |
VPSMRAR3 ;DALOI/KML,WOIFO/BT - Cont. Update of VPS MRAR PDO file ;1/15/15 15:30
Source file <VPSMRAR3.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Point of Service | 1 | ($$ADDMRAR,$$FILE,$$RESULT)^VPSMRAR0 |
| 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 |
|---|---|---|
| SUB53(PTIEN,INTERFC,DTIEN,FLD,DIEFLAG,DATA,REQFLDS) | ; file the ADDITIONAL ALLERGIES multiple (853.53)
; INPUTS ; PTIEN : Patient DFN for 853.5 entry ; INTERFC : value of 'S' indicates that the entries in VPSMRAR coming from Staff-facing interface module. ; : value of 'P' indicates that the entries in VPSMRAR coming from Patient-facing interface module. ; DTIEN : transaction date/time ien for 853.51 sub-entry ; FLD : Field # where the data will be filed ; DIEFLAG : Filing Type (I = Internal, E = External) ; DATA : Field Name^IENS^Field Value ; REQFLDS : Array of required fields by fieldname and entry number ; ; OUTPUT ; success : RESULT = Field Name^IENS^Field Value^1 ; failed : RESULT = Field Name^IENS^Field Value^99^error text describing why data did not get filed ; |
|
| CHKADALR(INTERFC,REQFLDS,DATA) | ;Check required Additional Allergy fields
; INPUTS ; INTERFC : value of 'S' indicates that the entries in VPSMRAR coming from Staff-facing interface module. ; : value of 'P' indicates that the entries in VPSMRAR coming from Patient-facing interface module. ; REQFLDS : Array of required fields by fieldname and entry number ; DATA : Field Name^IENS^Field Value ; ; OUTPUT ; success : RESULT = Field Name^IENS^Field Value^1 ; failed : RESULT = Field Name^IENS^Field Value^99^error text describing why data did not get filed |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^VPS(853.5 - [#853.5] | SUB53+23, SUB53+29 |
| Name | Line Occurrences |
|---|---|
| $$CHKADALR | SUB53+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADDOK | SUB53+24~*, SUB53+25 |
| ALLERID | SUB53+22~*, SUB53+23, SUB53+24, SUB53+29, CHKADALR+13~*, CHKADALR+14, CHKADALR+18, CHKADALR+19 |
| ALLERIEN | SUB53+29~*, SUB53+30, SUB53+34 |
| DATA | SUB53~, SUB53+18, SUB53+22, SUB53+25, SUB53+30, SUB53+35, CHKADALR~, CHKADALR+13, CHKADALR+18, CHKADALR+19 |
| DIEFLAG | SUB53~, SUB53+24, SUB53+35 |
| DTIEN | SUB53~, SUB53+23, SUB53+24, SUB53+29, SUB53+34 |
| FLD | SUB53~, SUB53+33, SUB53+35 |
| IENS | SUB53+34~*, SUB53+35 |
| INTERFC | SUB53~, SUB53+18, CHKADALR~, CHKADALR+18, CHKADALR+19 |
| PTIEN | SUB53~, SUB53+23, SUB53+24, SUB53+29, SUB53+34 |
| REQFLDS | SUB53~, SUB53+18, CHKADALR~ |
| REQFLDS("ADD | ALLERGY-PROVIDER" , CHKADALR+19, ALLERGY-VET" , CHKADALR+18 |
| RESULT | SUB53+15~*, SUB53+18*, SUB53+19, SUB53+25*, SUB53+26, SUB53+35*, SUB53+37, CHKADALR+11~*, CHKADALR+14*, CHKADALR+15 , CHKADALR+18*, CHKADALR+19*, CHKADALR+20 |
| U | SUB53+22, CHKADALR+13 |
| WP | SUB53+33~*, SUB53+35 |
