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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: ORWLRAP2

Package: Order Entry Results Reporting

Routine: ORWLRAP2


Information

ORWLRAP2 ;SLC/JNM - ANATOMIC PATHOLOGY DIALOG SUPPORT ROUTINES ;Jul 13, 2022@08:14:55

Source Information

Source file <ORWLRAP2.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 1 $$REPEAT^XLFSTR  
Order Entry Results Reporting 1 EXTNAME^ORWU  
VA FileMan 1 ^DIR  

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  OR AP DIALOG EDIT TEMPLATE  ORCMEDT1  

Entry Points

Name Comments DBIA/ICR reference
GETDLGIEN() ; Returns the 101.45 IEN for the current quick order
ASKPROMPT(PROMPTID) ; Allow prompt selection in quick order
; PROMPTID:
; OPURG:URGENCY
; OPCDT:COLLECTION DATE/TIME
; OPSSB:SPECIMEN SUBMITTED BY
; OPCTY:COLLECTION TYPE
; OPHOF:HOW OFTEN
; OPSPH:SURGEON/PROVIDER
; OPODC:ORDER COMMENT
GETPAGECODES(CODE) ;
ASKPAGE(PAGEID) ; Allow page selection in quick order
ALLOWSPEC(SPEC) ; Allow specimens
GETCOUNT(IDX) ; Get the count of the spcific prompt
SHOWCOUNT(COUNT,DESC) ; Show count line
ISINVALID() ; Validate AP Dialog quick order before saving
PROMPTINFO(TYPE) ; Returns item info from the LR OTHER LAB AP TESTS order dialog
; Return Data = AP Dlg IEN^Item Multiple IEN^Child Dlg IEN
ISTEXT(LABIEN,PROMPTIEN) ;
OK2DELETE(DEFAULT) ;
GETDEFAULT(LABIEN,PROMPTIEN) ; Used by Input Template OR AP DIALOG EDIT TEMPLATE
GETPAGEID(LABIEN,PAGEIEN) ; Used by Input Template OR AP DIALOG EDIT TEMPLATE
GETPAGENAME(LABIEN,PAGEIEN,TYPE) ; Used by Input Template OR AP DIALOG EDIT TEMPLATE

External References

Name Field # of Occurrence
^DIR OK2DELETE+6, GETDEFAULT+15, GETDEFAULT+29, GETDEFAULT+37, GETPAGEID+17
EXTNAME^ORWU GETDEFAULT+13
$$REPEAT^XLFSTR ISINVALID+13, ISINVALID+22

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " *** "_COUNT_" "_DESC_SS_" found"_ZMSG_".",?SIZE,"***",!
  • Line Location: SHOWCOUNT+3
Function Call: WRITE
  • Prompt: !,$C(7)," "_$$REPEAT^XLFSTR("*",SIZE+2),!
  • Line Location: ISINVALID+13
Function Call: WRITE
  • Prompt: " *** Anatomic Pathology Quick Order is not valid!",?SIZE,"***",!
  • Line Location: ISINVALID+14
Function Call: WRITE
  • Prompt: " ***",?SIZE,"***",!
  • Line Location: ISINVALID+15
Function Call: WRITE
  • Prompt: " ***",?SIZE,"***",!
  • Line Location: ISINVALID+19
Function Call: WRITE
  • Prompt: " *** The same number of Collection Samples, Specimens",?SIZE,"***",!
  • Line Location: ISINVALID+20
Function Call: WRITE
  • Prompt: " *** and Specimen Descriptions are required!",?SIZE,"***",!
  • Line Location: ISINVALID+21
Function Call: WRITE
  • Prompt: " "_$$REPEAT^XLFSTR("*",SIZE+2),!
  • Line Location: ISINVALID+22
Function Call: WRITE
  • Prompt: " <NOTHING DELETED>"
  • Line Location: OK2DELETE+8
Routine Call
  • DIR
  • Line Location:
    • OK2DELETE+6
    • GETDEFAULT+15
    • GETDEFAULT+29
    • GETDEFAULT+37
    • GETPAGEID+17

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ORD(101.41 - [#101.41] PROMPTINFO+5, PROMPTINFO+6, PROMPTINFO+7, PROMPTINFO+8, ISTEXT+4, GETDEFAULT+7
^ORD(101.45 - [#101.45] GETDLGIEN+3, ASKPROMPT+14, ASKPROMPT+15, ASKPAGE+7, ASKPAGE+8, ALLOWSPEC+4, ALLOWSPEC+5, ISTEXT+2, GETDEFAULT+3, GETPAGEID+2
, GETPAGEID+5, GETPAGEID+6, GETPAGENAME+2

Label References

Name Line Occurrences
$$GETCOUNT ISINVALID+8, ISINVALID+9, ISINVALID+10
$$GETDLGIEN ASKPROMPT+11, ASKPAGE+6, ALLOWSPEC+2
$$OK2DELETE GETDEFAULT+16, GETDEFAULT+30, GETDEFAULT+38
$$PROMPTINFO ISTEXT+3, GETDEFAULT+5
GETPAGECODES ASKPAGE+2, GETPAGEID+4, GETPAGENAME+4
SHOWCOUNT ISINVALID+16, ISINVALID+17, ISINVALID+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APDLG PROMPTINFO+2~, PROMPTINFO+5*, PROMPTINFO+6, PROMPTINFO+7, PROMPTINFO+8, PROMPTINFO+9, GETDEFAULT+1~, GETDEFAULT+6*, GETDEFAULT+7
APIDX GETDLGIEN+1~, GETDLGIEN+2*, GETDLGIEN+3
ASKCODE PROMPTINFO+2~, PROMPTINFO+4*, PROMPTINFO+7
CODE GETPAGECODES~, ASKPAGE+1~, ASKPAGE+2, GETPAGEID+1~, GETPAGEID+4, GETPAGENAME+1~, GETPAGENAME+4
CODE( ASKPAGE+3, ASKPAGE+4, GETPAGEID+8, GETPAGEID+9!, GETPAGEID+12, GETPAGEID+13, GETPAGEID+15, GETPAGEID+16, GETPAGEID+18, GETPAGENAME+5
, GETPAGENAME+6
CODE(1 GETPAGECODES+1*
CODE(2 GETPAGECODES+2*
CODE(3 GETPAGECODES+3*
CODE(4 GETPAGECODES+4*
CODES GETDEFAULT+20~, GETDEFAULT+21*, GETDEFAULT+23, GETDEFAULT+25, GETDEFAULT+26
COUNT GETCOUNT+1~, GETCOUNT+2*, GETCOUNT+3*, GETCOUNT+4, SHOWCOUNT~, SHOWCOUNT+1, SHOWCOUNT+2*, SHOWCOUNT+3
DA OK2DELETE+4~, GETDEFAULT+2~, GETPAGEID+1~
DATA PROMPTINFO+2~, PROMPTINFO+5*, PROMPTINFO+9*, PROMPTINFO+10
DEFAULT OK2DELETE~, OK2DELETE+3, GETDEFAULT+1~, GETDEFAULT+4*, GETDEFAULT+5, GETDEFAULT+13, GETDEFAULT+16, GETDEFAULT+17*, GETDEFAULT+18*, GETDEFAULT+22
, GETDEFAULT+23, GETDEFAULT+27*, GETDEFAULT+30, GETDEFAULT+31*, GETDEFAULT+32*, GETDEFAULT+35, GETDEFAULT+38, GETDEFAULT+39*, GETDEFAULT+40*, GETDEFAULT+41
, GETPAGEID+1~, GETPAGEID+10*, GETPAGEID+16*, GETPAGEID+18*, GETPAGEID+19
DESC SHOWCOUNT~, SHOWCOUNT+3
DESCCOUNT ISINVALID+1~, ISINVALID+10*, ISINVALID+11, ISINVALID+18
DESCIDX ISINVALID+1~, ISINVALID+5*, ISINVALID+10
DIR OK2DELETE+4~, GETDEFAULT+2~, GETPAGEID+1~
DIR("?" GETDEFAULT+9*, GETPAGEID+11*
DIR("A" OK2DELETE+5*, GETDEFAULT+8*, GETPAGEID+10*
DIR("B" GETDEFAULT+13*, GETDEFAULT+26*, GETDEFAULT+35*, GETPAGEID+16*
DIR(0 OK2DELETE+5*, GETDEFAULT+12*, GETDEFAULT+21*, GETDEFAULT+34*, GETPAGEID+10*, GETPAGEID+13*
DIRUT OK2DELETE+4~, GETDEFAULT+2~, GETDEFAULT+18, GETDEFAULT+32, GETDEFAULT+40, GETPAGEID+1~, GETPAGEID+18
DONE PROMPTINFO+2~, PROMPTINFO+6*, PROMPTINFO+7*, GETDEFAULT+2~, GETDEFAULT+14*, GETDEFAULT+16*, GETDEFAULT+17, GETDEFAULT+28*, GETDEFAULT+30*, GETDEFAULT+31
, GETDEFAULT+36*, GETDEFAULT+38*, GETDEFAULT+39, GETPAGEID+1~, GETPAGEID+8*, GETPAGEID+9*, GETPAGEID+15*, GETPAGEID+16*, GETPAGENAME+1~, GETPAGENAME+5*
, GETPAGENAME+6*
FILE GETDEFAULT+11~, GETDEFAULT+12*, GETDEFAULT+13
FIRST GETPAGEID+1~, GETPAGEID+12*, GETPAGEID+13*
FOUND ASKPAGE+1~, ASKPAGE+3*, ASKPAGE+4*, ASKPAGE+5
HELP GETDEFAULT+1~, GETDEFAULT+7*, GETDEFAULT+9
I GETCOUNT+1~, GETCOUNT+2*, GETCOUNT+3*
IDX ASKPAGE+1~, ASKPAGE+3*, ASKPAGE+4, ASKPAGE+7*, ASKPAGE+8, GETCOUNT~, GETCOUNT+3, ISINVALID+1~, PROMPTINFO+2~, PROMPTINFO+6*
, PROMPTINFO+7, PROMPTINFO+8, PROMPTINFO+9, GETDEFAULT+1~, GETDEFAULT+6*, GETDEFAULT+7, GETPAGEID+1~, GETPAGEID+8*, GETPAGEID+9, GETPAGEID+12*
, GETPAGEID+13, GETPAGEID+15*, GETPAGEID+16, GETPAGENAME+1~, GETPAGENAME+5*, GETPAGENAME+6
IEN GETDLGIEN+1~, GETDLGIEN+2*, GETDLGIEN+3*, GETDLGIEN+4, ASKPROMPT+9~, ASKPROMPT+11*, ASKPROMPT+12, ASKPROMPT+14, ASKPROMPT+15, ASKPAGE+1~
, ASKPAGE+6*, ASKPAGE+7, ASKPAGE+8, ALLOWSPEC+1~, ALLOWSPEC+2*, ALLOWSPEC+3, ALLOWSPEC+4, ALLOWSPEC+5, GETPAGEID+1~, GETPAGEID+5*
, GETPAGEID+6
INFO GETDEFAULT+1~, GETDEFAULT+5*, GETDEFAULT+6
INVALID ISINVALID+1~, ISINVALID+2*, ISINVALID+6*, ISINVALID+7, ISINVALID+12*, ISINVALID+23
ITEM PROMPTINFO+2~, PROMPTINFO+8*, PROMPTINFO+9, ISTEXT+1~, ISTEXT+3*, ISTEXT+4, GETDEFAULT+1~, GETDEFAULT+6*, GETDEFAULT+7
LABIEN ISTEXT~, ISTEXT+2, GETDEFAULT~, GETDEFAULT+3, GETPAGEID~, GETPAGEID+2, GETPAGEID+5, GETPAGEID+6, GETPAGENAME~, GETPAGENAME+2
NAME GETPAGEID+1~, GETPAGEID+3*, GETPAGENAME+1~, GETPAGENAME+2*, GETPAGENAME+3, GETPAGENAME+6*, GETPAGENAME+7
OI GETDLGIEN+1~, GETDLGIEN+3*
OK ASKPROMPT+9~, ASKPROMPT+11*, ASKPROMPT+12*, ASKPROMPT+15*, ASKPROMPT+16, ASKPAGE+1~, ASKPAGE+6*, ASKPAGE+7, ASKPAGE+9*, ASKPAGE+10
, ALLOWSPEC+1~, ALLOWSPEC+2*, ALLOWSPEC+4*, ALLOWSPEC+5*, ALLOWSPEC+6, OK2DELETE+1~, OK2DELETE+2*, OK2DELETE+7*, OK2DELETE+9
>> ORDIALOG( GETDLGIEN+3, GETCOUNT+3
>> ORDIALOG("B" GETDLGIEN+2, ISINVALID+3, ISINVALID+4, ISINVALID+5
P1 GETDEFAULT+20~, GETDEFAULT+23*, GETDEFAULT+24, GETDEFAULT+25, GETDEFAULT+26
P2 GETDEFAULT+20~, GETDEFAULT+25*, GETDEFAULT+26
PAGE ASKPAGE+1~, ASKPAGE+8*, ASKPAGE+9
PAGEID ASKPAGE~, ASKPAGE+4, ASKPAGE+9
PAGEIEN GETPAGEID~, GETPAGEID+2, GETPAGEID+5, GETPAGENAME~, GETPAGENAME+2
PIDX ASKPROMPT+9~, ASKPROMPT+14*, ASKPROMPT+15
PROMPTID ASKPROMPT~, ASKPROMPT+10, ASKPROMPT+14
PROMPTIEN ISTEXT~, ISTEXT+2, GETDEFAULT~, GETDEFAULT+3
PRTYPE GETDEFAULT+1~, GETDEFAULT+7*, GETDEFAULT+10, GETDEFAULT+19, GETDEFAULT+33
REC GETDEFAULT+1~, GETDEFAULT+3*, GETDEFAULT+4, GETPAGEID+1~, GETPAGEID+2*, GETPAGEID+3
SAMPCOUNT ISINVALID+1~, ISINVALID+8*, ISINVALID+11, ISINVALID+16
SAMPIDX ISINVALID+1~, ISINVALID+3*, ISINVALID+8
SIZE SHOWCOUNT+3, ISINVALID+1~, ISINVALID+12*, ISINVALID+13, ISINVALID+14, ISINVALID+15, ISINVALID+19, ISINVALID+20, ISINVALID+21, ISINVALID+22
SPEC ALLOWSPEC~, ALLOWSPEC+5
SPECCOUNT ISINVALID+1~, ISINVALID+9*, ISINVALID+11, ISINVALID+17
SPECIDX ISINVALID+1~, ISINVALID+4*, ISINVALID+9
SS SHOWCOUNT+1~*, SHOWCOUNT+3
TYPE PROMPTINFO~, PROMPTINFO+3, PROMPTINFO+4, ISTEXT+1~, ISTEXT+2*, ISTEXT+3, GETDEFAULT+1~, GETDEFAULT+4*, GETDEFAULT+5, GETPAGEID+1~
, GETPAGEID+3*, GETPAGEID+14, GETPAGEID+16, GETPAGENAME~, GETPAGENAME+3, GETPAGENAME+6
U GETDLGIEN+2, GETDLGIEN+3, ASKPROMPT+10, ASKPROMPT+15, ASKPAGE+4, ASKPAGE+9, ALLOWSPEC+4, ISINVALID+3, ISINVALID+4, ISINVALID+5
, PROMPTINFO+8, PROMPTINFO+9, ISTEXT+2, ISTEXT+3, ISTEXT+4, GETDEFAULT+4, GETDEFAULT+6, GETDEFAULT+7, GETDEFAULT+12, GETDEFAULT+21
, GETPAGEID+3, GETPAGEID+6, GETPAGEID+9, GETPAGEID+13, GETPAGEID+16, GETPAGEID+18, GETPAGENAME+2, GETPAGENAME+6
USEDTYPE GETPAGEID+1~, GETPAGEID+6*, GETPAGEID+7, GETPAGEID+9
VAL GETDEFAULT+11~, GETDEFAULT+13
X OK2DELETE+4~, GETDEFAULT+2~, GETDEFAULT+15, GETDEFAULT+29, GETDEFAULT+37, GETDEFAULT+40, GETPAGEID+1~
X0 PROMPTINFO+2~, PROMPTINFO+8*
X1 GETDEFAULT+1~, GETDEFAULT+7*, GETDEFAULT+12, GETDEFAULT+21
Y OK2DELETE+4~, OK2DELETE+7, GETDEFAULT+2~, GETDEFAULT+18, GETDEFAULT+32, GETDEFAULT+40, GETPAGEID+1~, GETPAGEID+18
ZMSG SHOWCOUNT+1~*, SHOWCOUNT+2*, SHOWCOUNT+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All