©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
ORCDRA1 ;SLC/MKB-Utility functions for RA dialogs ; 08 May 2002 2:12 PM
Source file <ORCDRA1.m>
| Package | Total | Call Graph |
|---|---|---|
| Order Entry Results Reporting | 2 | ($$PTR,$$VAL)^ORCD $$DIV^OREVNTX |
| Radiology Nuclear Medicine | 1 | EN4^RAO7PC1 |
| Registration | 1 | $$SITE^VASITE |
| VA Fileman | 1 | ^DIR |
| Package | Total | Caller Graph |
|---|---|---|
| Order Entry Results Reporting | 2 | ORCDRA ORWDXM2 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CKPTYPE | ; -- Check procedure for Series type
|
|
| DIV() | ; -- Returns division of ordering location
|
|
| VALIDWP(ROOT) | ; -- Validate wp field (borrowed from VALWP^RAUTL5)
; Pass back '1' is data is valid, '0' if not valid. |
|
| DEFLOC() | ; -- Returns default imaging location
|
|
| CHNGCAT | ; -- Kill dependent values if Category changes
|
|
| MATCH(CATG) | ; -- Category match pt location type?
|
|
| MODE() | ; -- Returns default mode of transport
|
|
| ILOC | ; -- Get allowable imaging locations
|
|
| DIVQ | ||
| SCHEDULD() | ; -- Returns 1 or 0, if patient is scheduled for pre-op
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ORD(101.41 - [#101.41] | CHNGCAT+3, MODE+2 |
| ^ORD(101.43 - [#101.43] | CKPTYPE+1 |
| ^RAMIS(71.2 - [#71.2] | CKPTYPE+2, MODE+3 |
| ^SC - [#44] | DIV+1, MATCH+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CATG | MATCH~, MATCH+3, MATCH+4 |
| CHAR | VALIDWP+3~, VALIDWP+10*, VALIDWP+11 |
| CNT | VALIDWP+3~, VALIDWP+6*, VALIDWP+10*, VALIDWP+11*, ILOC+1~, ILOC+3*, ILOC+4*, ILOC+6 |
| DIR | SCHEDULD+1~ |
| DIR("A" | SCHEDULD+3* |
| DIR("B" | SCHEDULD+4* |
| DIR(0 | SCHEDULD+3* |
| DIROUT | SCHEDULD+1~ |
| DIRUT | SCHEDULD+1~ |
| DONE | CKPTYPE+4! |
| DT | DIV+1 |
| DTOUT | SCHEDULD+1~, SCHEDULD+4 |
| DUOUT | SCHEDULD+1~, SCHEDULD+4 |
| DUZ(2 | DIV+3 |
| I | MODE+1~, MODE+2*, MODE+4*, DEFLOC+1~, DEFLOC+2* |
| IFN | ILOC+1~, ILOC+3*, ILOC+4, ILOC+5 |
| ITYPE | ILOC+1~, ILOC+2* |
| M | MODE+1~, MODE+2*, MODE+4 |
| >> ORDG | ILOC+2 |
| >> ORDIALOG( | CKPTYPE+4!, CHNGCAT+4!, MATCH+5*, SCHEDULD+2, MODE+4, ILOC+1!, ILOC+4*, ILOC+5*, ILOC+6*, DEFLOC+1 , DEFLOC+2 |
| >> ORDIV | DEFLOC+2 |
| >> OREVENT | DIV+1, DIV+2, MATCH+1 |
| >> ORI | CKPTYPE+4 |
| >> ORL | DIV+1, MATCH+2 |
| >> ORQUIT | SCHEDULD+4* |
| >> ORTYPE | MODE+1 |
| >> ORWARD | MODE+5 |
| ORY | ILOC+1~ |
| ORY( | ILOC+3, ILOC+4, ILOC+5 |
| P | CHNGCAT+1~, CHNGCAT+2*, CHNGCAT+3, MODE+1~, MODE+3*, MODE+4 |
| >> PROMPT | CKPTYPE+4, SCHEDULD+2, ILOC+1, ILOC+4, ILOC+5, ILOC+6, DEFLOC+1, DEFLOC+2 |
| PTR | CHNGCAT+1~, CHNGCAT+3*, CHNGCAT+4 |
| PTYPE | CKPTYPE+1~*, CKPTYPE+2 |
| ROOT | VALIDWP~, VALIDWP+2, VALIDWP+5, VALIDWP+7 |
| SCREEN | MATCH+2~, MATCH+3*, MATCH+4*, MATCH+5 |
| TYPE | MATCH+2~*, MATCH+3, MATCH+4 |
| U | DIV+1, CKPTYPE+1, CKPTYPE+2, MATCH+2, ILOC+2, ILOC+4, ILOC+5, DEFLOC+2 |
| WL | VALIDWP+3~, VALIDWP+6*, VALIDWP+8*, VALIDWP+9 |
| WPFLG | VALIDWP+3~, VALIDWP+4*, VALIDWP+5, VALIDWP+9, VALIDWP+11*, VALIDWP+12 |
| X | VALIDWP+3~, VALIDWP+4*, VALIDWP+5*, VALIDWP+7, SCHEDULD+1~, DEFLOC+1~*, DEFLOC+2*, DEFLOC+3 |
| Y | DIV+1~*, DIV+2*, DIV+3*, DIVQ, CKPTYPE+2, VALIDWP+3~, VALIDWP+7*, VALIDWP+8, VALIDWP+10, MATCH+2~* , MATCH+5*, MATCH+6, SCHEDULD+1~, SCHEDULD+5, MODE+4*, MODE+5*, MODE+6, ILOC+6* |
| Z | VALIDWP+3~, VALIDWP+9*, VALIDWP+10 |