Call Graph
Call Graph Total: 1
| Package | Total | Call Graph |
|---|---|---|
| VA Point of Service | 1 | ($$ADDMRAR,$$FILE,$$RESULT)^VPSMRAR0 |
VPSMRAR5 ;DALOI/KML,WOIFO/BT - Cont. Update of VPS MRAR PDO file ;1/15/15 15:30
Source file <VPSMRAR5.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 |
|---|---|---|
| SUB55(PTIEN,INTERFC,DTIEN,FLD,DIEFLAG,DATA,REQFLDS) | ; file the ADDITIONAL MEDICATIONS multiple (853.55)
; 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 : composite string assigned to a subscript in the local array passed in by Vecna for the specific field ; 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 ; |
|
| CHKADMED(INTERFC,REQFLDS,DATA) | ;Check required Additional Medication 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] | SUB55+23, SUB55+29 |
| Name | Line Occurrences |
|---|---|
| $$CHKADMED | SUB55+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ADDOK | SUB55+24~*, SUB55+25 |
| DATA | SUB55~, SUB55+18, SUB55+22, SUB55+25, SUB55+30, SUB55+35, CHKADMED~, CHKADMED+13, CHKADMED+14, CHKADMED+18 , CHKADMED+19 |
| DIEFLAG | SUB55~, SUB55+24, SUB55+35 |
| DTIEN | SUB55~, SUB55+23, SUB55+24, SUB55+29, SUB55+34 |
| FLD | SUB55~, SUB55+33, SUB55+35 |
| IENS | SUB55+34~*, SUB55+35 |
| INTERFC | SUB55~, SUB55+18, CHKADMED~, CHKADMED+18, CHKADMED+19 |
| MEDID | SUB55+22~*, SUB55+23, SUB55+24, SUB55+29, CHKADMED+13~*, CHKADMED+14, CHKADMED+18, CHKADMED+19 |
| MEDIEN | SUB55+29~*, SUB55+30, SUB55+34 |
| PTIEN | SUB55~, SUB55+23, SUB55+24, SUB55+29, SUB55+34 |
| REQFLDS | SUB55~, SUB55+18, CHKADMED~ |
| REQFLDS("PATI | ENT-FACING ADD MEDICATION" , CHKADMED+18 |
| REQFLDS("STAF | F VIEW ADD MEDICATION" , CHKADMED+19 |
| REQFLDS("VET | VIEW ADD MEDICATION" , CHKADMED+19 |
| RESULT | SUB55+15~*, SUB55+18*, SUB55+19, SUB55+25*, SUB55+26, SUB55+35*, SUB55+37, CHKADMED+11~*, CHKADMED+14*, CHKADMED+15 , CHKADMED+18*, CHKADMED+19*, CHKADMED+20 |
| U | SUB55+22, CHKADMED+13 |
| WP | SUB55+33~*, SUB55+35 |
