Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ORWDXM1

Package: Order Entry Results Reporting

Routine: ORWDXM1


Information

ORWDXM1 ;SLC/KCM - Order Dialogs, Menus ;05/22/17 11:15

Source Information

Source file <ORWDXM1.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
Order Entry Results Reporting 6 ($$FTDCOMP,$$NMSP,$$PTR,$$VAL)^ORCD  $$EVT^OREVNTX  $$DRAFT^ORWDX2  (ADMTIME,VERTXT)^ORWDXM2  ($$DLGINFO,$$GETIVTYP,$$KEYVAR,$$SDRTCVER,$$VALQO,$$VERORD,BLD4CHG,CHKCOPY,CHKDSBL,CHKVACT,SETKEYV)^ORWDXM3  (SETUP,SETUPS,VBASK)^ORWDXM4  
VA FileMan 2 ^%DT  $$GET1^DIQ  
Kernel 1 ($$DT,$$NOW)^XLFDT  
Toolkit 1 $$GET^XPAR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Order Entry Results Reporting 3 ITEMS  ORWDXM1 BLDQRSP  ORWDXM1 SVRPC  

Entry Points

Name Comments DBIA/ICR reference
BLDQRSP(LST,ORIT,FLDS,ISIMO,ENCLOC) ; Build responses for an order
; LST=QuickLevel^ResponseID(ORIT;$H)^Dialog^Type^FormID^DGrp
; LST(n)=verify or reject text
; ORIT= ptr to 101.41 for quick order, 100 for copy
; 1 2 3 4 5 6 7 8 11-20
; FLDS=DFN^LOC^ORNP^INPT^SEX^AGE^EVENT^SC%^^^Key Variables...
; ORIT=+ORIT: ptr to 101.41, $E(ORIT)=C: copy $E(ORIT)=X: change
; !! SHOULD CHECK for PRE-CPRS ORDERS (treat as text?)
SETITEM(DA,PROMPT,INST,MUSTASK) ; set dflt val & return if must prompt
SUBCODE(X) ; substitute code
PTR(NAME) ; -- Returns pointer to OR GTX NAME
ISINPMED(IFN) ;
ISMED(IFN) ; return 1 if pharmacy order dlg used
SITEVAL() ;return 1 if site does want the reason for study to carry through from past orders of this ordering session
SVRPC(RET,X) ;RPC FOR SITEVAL
ISQO(IFN) ;return 1 if a non-VA medication quick order type of order dialog. p388

External References

Name Field # of Occurrence
^%DT BLDQRSP+86, BLDQRSP+92, BLDQRSP+98, BLDQRSP+105
$$GET1^DIQ ISINPMED+4
$$FTDCOMP^ORCD BLDQRSP+87, BLDQRSP+93
$$NMSP^ORCD ISMED+4
$$PTR^ORCD BLDQRSP+73, BLDQRSP+75
$$VAL^ORCD BLDQRSP+85, BLDQRSP+86, BLDQRSP+87, BLDQRSP+91, BLDQRSP+92, BLDQRSP+93, BLDQRSP+97, BLDQRSP+98, BLDQRSP+102, BLDQRSP+103
, BLDQRSP+110
$$EVT^OREVNTX BLDQRSP+66
$$DRAFT^ORWDX2 BLDQRSP+74
ADMTIME^ORWDXM2 BLDQRSP+147
VERTXT^ORWDXM2 BLDQRSP+168
$$DLGINFO^ORWDXM3 BLDQRSP+33, BLDQRSP+34, BLDQRSP+78, BLDQRSP+169
$$GETIVTYP^ORWDXM3 SETITEM+18, SETITEM+19
$$KEYVAR^ORWDXM3 BLDQRSP+56
$$SDRTCVER^ORWDXM3 BLDQRSP+149
$$VALQO^ORWDXM3 BLDQRSP+148
$$VERORD^ORWDXM3 BLDQRSP+167
BLD4CHG^ORWDXM3 BLDQRSP+32
CHKCOPY^ORWDXM3 BLDQRSP+30
CHKDSBL^ORWDXM3 BLDQRSP+26
CHKVACT^ORWDXM3 BLDQRSP+28
SETKEYV^ORWDXM3 BLDQRSP+55, BLDQRSP+57
SETUP^ORWDXM4 BLDQRSP+70
SETUPS^ORWDXM4 BLDQRSP+76
VBASK^ORWDXM4 BLDQRSP+131
$$DT^XLFDT BLDQRSP+87, BLDQRSP+93, BLDQRSP+99, BLDQRSP+107
$$NOW^XLFDT BLDQRSP+106
$$GET^XPAR SITEVAL+1

Used in RPC

RPC Name Call Tags
ORWDXM1 BLDQRSP BLDQRSP
ORWDXM1 SVRPC SVRPC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] BLDQRSP+33, BLDQRSP+34, BLDQRSP+149
^DPT - [#2] BLDQRSP+62
^OR(100 - [#100] BLDQRSP+17, BLDQRSP+63, ISINPMED+3, ISMED+3
^ORD(100.5 - [#100.5] BLDQRSP+66
^ORD(100.98 - [#100.98] BLDQRSP+63, BLDQRSP+72, BLDQRSP+165, ISQO+1
^ORD(101.41 - [#101.41] BLDQRSP+33, BLDQRSP+34, BLDQRSP+43, BLDQRSP+61, BLDQRSP+80, BLDQRSP+81, BLDQRSP+112, BLDQRSP+113, BLDQRSP+115, BLDQRSP+117
, BLDQRSP+121, BLDQRSP+123, BLDQRSP+124, BLDQRSP+125, BLDQRSP+127, BLDQRSP+135, BLDQRSP+137, BLDQRSP+138, BLDQRSP+139, BLDQRSP+149
, BLDQRSP+151, BLDQRSP+161, BLDQRSP+165, SETITEM+20, SETITEM+21, SETITEM+24, SETITEM+28, SETITEM+29, SETITEM+31, SETITEM+32
, PTR+1, ISINPMED+2, ISMED+2, ISQO+1, ISQO+2
^SC - [#44] BLDQRSP+47
^TMP("ORWDHTM" SETITEM+3, SETITEM+5, SETITEM+7, SETITEM+8, SETITEM+9
^TMP("ORWDXMQ" BLDQRSP+9!, BLDQRSP+153*, BLDQRSP+156*, BLDQRSP+158*
^TMP("ORWORD" BLDQRSP+58!, BLDQRSP+172!, SETITEM+5*, SETITEM+21*
^TMP("PSJINS" BLDQRSP+173!
^TMP("PSJMR" BLDQRSP+173!
^TMP("PSJNOUN" BLDQRSP+173!
^TMP($J BLDQRSP+8!
^VA(200 - [#200] SITEVAL+1

Label References

Name Line Occurrences
$$ISINPMED BLDQRSP+145
$$ISMED BLDQRSP+140, BLDQRSP+148, BLDQRSP+167
$$ISQO BLDQRSP+143
$$PTR BLDQRSP+88, BLDQRSP+89, BLDQRSP+142, BLDQRSP+143, SETITEM+18, SETITEM+19
$$SITEVAL SVRPC+1
$$SUBCODE SETITEM+24, SETITEM+32
SETITEM BLDQRSP+118, BLDQRSP+133

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT BLDQRSP+86*, BLDQRSP+92*, BLDQRSP+98*, BLDQRSP+105*
ADMLOC BLDQRSP+15~
AUTOACK BLDQRSP+41~, BLDQRSP+82*, BLDQRSP+119*, BLDQRSP+129*, BLDQRSP+135*, BLDQRSP+148*, BLDQRSP+149*, BLDQRSP+159, BLDQRSP+160*, BLDQRSP+161*
, BLDQRSP+163*, BLDQRSP+165*, BLDQRSP+167*, BLDQRSP+168, BLDQRSP+169
CDA BLDQRSP+122~, BLDQRSP+124*, BLDQRSP+125, BLDQRSP+127, BLDQRSP+133, BLDQRSP+135
CLINFDLG BLDQRSP+136~, BLDQRSP+138*, BLDQRSP+140
CLIVFID BLDQRSP+79~, BLDQRSP+81*, BLDQRSP+128
CPROMPT BLDQRSP+122~, BLDQRSP+125*, BLDQRSP+129, BLDQRSP+130, BLDQRSP+133
CSEQ BLDQRSP+122~, BLDQRSP+123*, BLDQRSP+124
DA BLDQRSP+79~, BLDQRSP+113*, BLDQRSP+115, BLDQRSP+117, BLDQRSP+118, SETITEM~, SETITEM+20, SETITEM+21, SETITEM+24, SETITEM+28
, SETITEM+29, SETITEM+31, SETITEM+32
DELAY BLDQRSP+15~, BLDQRSP+146*, BLDQRSP+147
DUZ SITEVAL+1
EDITONLY SETITEM+1~, SETITEM+2*, SETITEM+27
ENCLOC BLDQRSP~, BLDQRSP+147
FIRST BLDQRSP+41~, BLDQRSP+46*
FLDS BLDQRSP~, BLDQRSP+16, BLDQRSP+28, BLDQRSP+30, BLDQRSP+32, BLDQRSP+44, BLDQRSP+45, BLDQRSP+46, BLDQRSP+47, BLDQRSP+48
, BLDQRSP+49, BLDQRSP+55, BLDQRSP+63
GMRCNOAT BLDQRSP+39~
GMRCNOPD BLDQRSP+39~
GMRCREAF BLDQRSP+39~
IFN ISINPMED~, ISINPMED+2, ISINPMED+3, ISMED~, ISMED+2, ISMED+3, ISQO~, ISQO+1, ISQO+2
INST BLDQRSP+79~, BLDQRSP+122~, BLDQRSP+130*, BLDQRSP+131, BLDQRSP+133, BLDQRSP+152*, BLDQRSP+153, BLDQRSP+155, BLDQRSP+156, BLDQRSP+158
, SETITEM~, SETITEM+5, SETITEM+6, SETITEM+7, SETITEM+9, SETITEM+13, SETITEM+15, SETITEM+21, SETITEM+22, SETITEM+25
, SETITEM+29, SETITEM+30
ISIMO BLDQRSP~, BLDQRSP+18, BLDQRSP+147
ISXFER BLDQRSP+12~, BLDQRSP+19*, BLDQRSP+20*, BLDQRSP+33, BLDQRSP+34, BLDQRSP+75, BLDQRSP+78, BLDQRSP+169
IVDLG BLDQRSP+136~, BLDQRSP+137*, BLDQRSP+140
IVFID BLDQRSP+79~, BLDQRSP+80*, BLDQRSP+128
KEY BLDQRSP+79~, BLDQRSP+144*, BLDQRSP+153, BLDQRSP+156, BLDQRSP+158, BLDQRSP+169
KEYVAR BLDQRSP+40~, BLDQRSP+56*, BLDQRSP+57, BLDQRSP+78, BLDQRSP+169
LEVEL BLDQRSP+15~, BLDQRSP+146*, BLDQRSP+147
LRFDATE BLDQRSP+35~
LRFSAMP BLDQRSP+35~
LRFSCH BLDQRSP+35~
LRFSPEC BLDQRSP+35~
LRFURG BLDQRSP+35~
LRFZX BLDQRSP+35~
LST BLDQRSP~, BLDQRSP+26, BLDQRSP+28, BLDQRSP+30, BLDQRSP+32
LST(0 BLDQRSP+24*, BLDQRSP+26, BLDQRSP+28, BLDQRSP+30, BLDQRSP+33*, BLDQRSP+34*, BLDQRSP+60*, BLDQRSP+61*, BLDQRSP+70, BLDQRSP+77
, BLDQRSP+78*, BLDQRSP+146, BLDQRSP+161, BLDQRSP+169*, BLDQRSP+170*, BLDQRSP+171*, SETITEM+30, SETITEM+31
MUSTASK BLDQRSP+79~, BLDQRSP+118, BLDQRSP+119, BLDQRSP+133, BLDQRSP+135, SETITEM~, SETITEM+2*, SETITEM+34*
NAME PTR~, PTR+1
ORAGE BLDQRSP+40~, BLDQRSP+46*
ORASK BLDQRSP+131~
ORCAT BLDQRSP+41~, BLDQRSP+65*, BLDQRSP+67*, BLDQRSP+68*, BLDQRSP+69*, BLDQRSP+140
ORCOLLCT BLDQRSP+36~
ORCOMP BLDQRSP+35~
ORCOMPLX BLDQRSP+38~
ORCOPAY BLDQRSP+38~
ORDATE BLDQRSP+39~
ORDG BLDQRSP+41~, BLDQRSP+72
ORDIALOG BLDQRSP+41~, BLDQRSP+112, BLDQRSP+113, BLDQRSP+115, BLDQRSP+117, BLDQRSP+121, BLDQRSP+123, BLDQRSP+124, BLDQRSP+125, BLDQRSP+127
, BLDQRSP+128, BLDQRSP+135, BLDQRSP+140, BLDQRSP+149, BLDQRSP+151, SETITEM+3, SETITEM+5, SETITEM+7, SETITEM+20, SETITEM+21
, SETITEM+24, SETITEM+28, SETITEM+29, SETITEM+31, SETITEM+32
ORDIALOG( BLDQRSP+73!, BLDQRSP+75!, BLDQRSP+88!, BLDQRSP+89!, BLDQRSP+94!, BLDQRSP+95!, BLDQRSP+100!, BLDQRSP+108!, BLDQRSP+111!, BLDQRSP+129
, BLDQRSP+130, BLDQRSP+142!, BLDQRSP+143!, BLDQRSP+150, BLDQRSP+151!, BLDQRSP+152, BLDQRSP+155, BLDQRSP+156, BLDQRSP+158, SETITEM+4
, SETITEM+6*, SETITEM+7*, SETITEM+9*, SETITEM+13, SETITEM+15, SETITEM+20, SETITEM+22*, SETITEM+25*, SETITEM+29, SETITEM+30
ORDIALOG("B" BLDQRSP+94, BLDQRSP+95, BLDQRSP+100, BLDQRSP+108, BLDQRSP+111
ORDIV BLDQRSP+40~
ORDLOC BLDQRSP+15~, BLDQRSP+17*, BLDQRSP+147
ORDRUG BLDQRSP+38~
ORDSUP BLDQRSP+38~
OREFILLS BLDQRSP+37~
OREVENT BLDQRSP+40~, BLDQRSP+49*, BLDQRSP+50, BLDQRSP+51, BLDQRSP+52, BLDQRSP+53*, BLDQRSP+65, BLDQRSP+66, BLDQRSP+146
OREVENT("EFFECTIVE" BLDQRSP+52*
OREVENT("TS" BLDQRSP+51*
OREVNTYP BLDQRSP+42~, BLDQRSP+50*, BLDQRSP+64, BLDQRSP+65, BLDQRSP+67, BLDQRSP+68
ORIMO BLDQRSP+13~, BLDQRSP+18*, BLDQRSP+163
ORIMTIME BLDQRSP+36~
ORIMTYPE BLDQRSP+35~
ORINPT BLDQRSP+37~
ORIT BLDQRSP~, BLDQRSP+17, BLDQRSP+20, BLDQRSP+21, BLDQRSP+22, BLDQRSP+23*, BLDQRSP+26, BLDQRSP+28, BLDQRSP+30, BLDQRSP+32
, BLDQRSP+33, BLDQRSP+34, BLDQRSP+56, BLDQRSP+60, BLDQRSP+61, BLDQRSP+63, BLDQRSP+74, BLDQRSP+78, BLDQRSP+140, BLDQRSP+143
, BLDQRSP+144, BLDQRSP+145, BLDQRSP+148, BLDQRSP+149, BLDQRSP+161, BLDQRSP+165, BLDQRSP+167, BLDQRSP+169, SETITEM+8, SETITEM+9
ORL BLDQRSP+40~, BLDQRSP+45*, BLDQRSP+47
ORL(2 BLDQRSP+45*
ORLEAD BLDQRSP+41~
ORMAX BLDQRSP+36~
ORMEAL BLDQRSP+39~
ORMORE BLDQRSP+37~
ORNOUNS BLDQRSP+37~
ORNP BLDQRSP+40~, BLDQRSP+44*
ORNPO BLDQRSP+39~
ORPARAM BLDQRSP+39~
ORQTY BLDQRSP+37~, BLDQRSP+38~
ORQUIT BLDQRSP+41~, BLDQRSP+78, BLDQRSP+122~, BLDQRSP+123
ORSC BLDQRSP+40~, BLDQRSP+44*
ORSCH BLDQRSP+36~
ORSCHED BLDQRSP+37~
ORSD BLDQRSP+38~
ORSEX BLDQRSP+40~, BLDQRSP+46*
ORSMAX BLDQRSP+36~
ORSTMS BLDQRSP+36~
ORTAS BLDQRSP+35~
ORTEST BLDQRSP+36~
ORTIME BLDQRSP+36~, BLDQRSP+39~
ORTRAIL BLDQRSP+41~
ORTRAY BLDQRSP+39~
ORTYPE BLDQRSP+40~, BLDQRSP+46*
ORVP BLDQRSP+40~, BLDQRSP+44*, BLDQRSP+62
ORWARD BLDQRSP+40~, BLDQRSP+47*
ORWMODE BLDQRSP+10~, BLDQRSP+19*, BLDQRSP+20*, BLDQRSP+21*, BLDQRSP+23, BLDQRSP+26, BLDQRSP+28, BLDQRSP+30, BLDQRSP+32, BLDQRSP+33
, BLDQRSP+34, BLDQRSP+54, BLDQRSP+60, BLDQRSP+72, BLDQRSP+74, BLDQRSP+78, BLDQRSP+84, BLDQRSP+144, BLDQRSP+149, BLDQRSP+160
, BLDQRSP+161, BLDQRSP+163, BLDQRSP+169, BLDQRSP+171, SETITEM+28, SETITEM+29, SETITEM+30, SETITEM+31, ISINPMED+2, ISMED+2
ORWP94 BLDQRSP+38~, BLDQRSP+43*, BLDQRSP+71
ORWPSPIK BLDQRSP+38~
ORWPSWRG BLDQRSP+38~, BLDQRSP+82
ORXNP BLDQRSP+37~
P BLDQRSP+141~, BLDQRSP+142*
PATLOC BLDQRSP+15~, BLDQRSP+16*, BLDQRSP+147
PKG ISINPMED+1~, ISINPMED+2*, ISINPMED+3*, ISINPMED+4, ISMED+1~, ISMED+2*, ISMED+3*, ISMED+4
PROMPT BLDQRSP+79~, BLDQRSP+117*, BLDQRSP+118, BLDQRSP+121, BLDQRSP+123, BLDQRSP+124, BLDQRSP+150*, BLDQRSP+151, BLDQRSP+152, BLDQRSP+153
, BLDQRSP+155, BLDQRSP+156, BLDQRSP+158, SETITEM~, SETITEM+3, SETITEM+4, SETITEM+5, SETITEM+6, SETITEM+7, SETITEM+8
, SETITEM+9, SETITEM+13, SETITEM+15, SETITEM+18, SETITEM+19, SETITEM+20, SETITEM+21, SETITEM+22, SETITEM+25, SETITEM+29
, SETITEM+30
PSJNOPC BLDQRSP+37~
RESULT ISINPMED+1~, ISINPMED+5*, ISINPMED+6
RET SVRPC~, SVRPC+1*
RSPREF BLDQRSP+41~
SCHLOC BLDQRSP+15~
SCHTYP BLDQRSP+15~
SEQ BLDQRSP+79~, BLDQRSP+112*, BLDQRSP+113, BLDQRSP+144*, BLDQRSP+153*, BLDQRSP+156, BLDQRSP+158
SPLYDLG BLDQRSP+136~, BLDQRSP+139*, BLDQRSP+140
TEMPCAT BLDQRSP+11~, BLDQRSP+62*, BLDQRSP+63*, BLDQRSP+65, BLDQRSP+69
TEMPORIT BLDQRSP+14~, BLDQRSP+22*, BLDQRSP+63
U BLDQRSP+16, BLDQRSP+17, BLDQRSP+28, BLDQRSP+33, BLDQRSP+34, BLDQRSP+44, BLDQRSP+45, BLDQRSP+46, BLDQRSP+47, BLDQRSP+48
, BLDQRSP+49, BLDQRSP+55, BLDQRSP+61, BLDQRSP+62, BLDQRSP+63, BLDQRSP+66, BLDQRSP+94, BLDQRSP+95, BLDQRSP+100, BLDQRSP+108
, BLDQRSP+111, BLDQRSP+115, BLDQRSP+117, BLDQRSP+125, BLDQRSP+127, BLDQRSP+135, BLDQRSP+146, BLDQRSP+149, BLDQRSP+153, BLDQRSP+161
, BLDQRSP+165, BLDQRSP+169, BLDQRSP+170, BLDQRSP+171, SETITEM+28, SETITEM+29, SETITEM+31, ISINPMED+2, ISINPMED+3, ISMED+2
, ISMED+3, ISQO+1, ISQO+2
VALIV SETITEM+1~, SETITEM+2*, SETITEM+18*, SETITEM+19*, SETITEM+26
X BLDQRSP+41~, BLDQRSP+66~*, BLDQRSP+67, BLDQRSP+68, BLDQRSP+71*, BLDQRSP+73, BLDQRSP+86*, BLDQRSP+92*, BLDQRSP+98*, BLDQRSP+103*
, BLDQRSP+104, SUBCODE~, SUBCODE+1, SUBCODE+2, SUBCODE+3, SUBCODE+4, SUBCODE+5, SUBCODE+6, SUBCODE+7, SVRPC~
XCODE BLDQRSP+79~, SETITEM+1~, SETITEM+24*, SETITEM+25, SETITEM+32*, SETITEM+33
Y BLDQRSP+87, BLDQRSP+93, BLDQRSP+99, BLDQRSP+106, BLDQRSP+107, SETITEM+1~, SETITEM+25, ISINPMED+1~, ISINPMED+4*, ISINPMED+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All