Routine: ORCMEDT8

Package	Total	Call Graph
Order Entry Results Reporting	4	$$CRC4ARRY^ORCRC CHK94^ORWDPS1 LOADRSP^ORWDX FORMID^ORWDXM
VA FileMan	1	^DIE

Package	Total	Caller Graph
Order Entry Results Reporting	2	ORCMEDT1 ORWDXQ

Entry Points

Name	Comments	DBIA/ICR reference
UPDQNAME(ORIEN)	; Rename personal quick order name if needed
ENSURNEW(NAME)	; Ensures the name is a new entry
RAWCRC(ORIEN)	; Get a raw CRC value to determine if a record has changed
RWQ
CRC4QCK(ORIEN)	; Get CRC for a personal quick order
EXT
PARSE	; Parse Data
SORTDATA	; Sorts data by fields according to FormID
GETLINE	;
FORMINFO(FORMINFO,IDINFO,NEXTFORM)	; populates FORMINFO,IDINFO and NEXTFORM arrays
HASCODE(CODE)	; scans data for code
SUBID	; SubID codes are used to change the form ID depending on depending on data ; Data below is FormID;SubID.list of ID codes in order of use ; SubID's are used to change the FormID depending on data values.
SUBID01	; Generic Meds dialog
SUBID02	; IV Meds
SUBID03	; Delphi code adds URGENCY prompt that does not exist in dialog on M side
SUBID04	; Blood Bank will probably be wrong - quick orders not working in v26
SUBID05	; Diet
FORMTBL	; Form Table - Forms allowing personal quick orders, as of CPRS GUI v26 (OR3215)
IDTABLE	; ID table - returns codes used in the form table IDINFO("LONGNAME")=SHORNAME

Name	Field # of Occurrence
^DIE	UPDQNAME+8
$$CRC4ARRY^ORCRC	PARSE+27, PARSE+31
CHK94^ORWDPS1	CRC4QCK+17
LOADRSP^ORWDX	RAWCRC+5, CRC4QCK+9
FORMID^ORWDXM	CRC4QCK+15

FileNo	Call Tags
^ORD(101.41 - [#101.41]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ORD(100.98 - [#100.98]	CRC4QCK+14
^ORD(101.41 - [#101.41]	UPDQNAME+2, UPDQNAME+3, ENSURNEW+4, RAWCRC+3, RAWCRC+4, CRC4QCK+5, CRC4QCK+6, CRC4QCK+7, CRC4QCK+13

Name	Line Occurrences
$$CRC4QCK	UPDQNAME+5
$$ENSURNEW	UPDQNAME+7
$$HASCODE	SUBID01+2, SUBID03+1
@(	SORTDATA+4
EXT	CRC4QCK+5, CRC4QCK+6
FORMINFO	CRC4QCK+18
GETLINE	PARSE+3, PARSE+12
PARSE	RAWCRC+6, CRC4QCK+21
RWQ	RAWCRC+3, RAWCRC+4
SORTDATA	CRC4QCK+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABC	ENSURNEW+1~, ENSURNEW+3, ENSURNEW+5, ENSURNEW+6
ADDCRLF	RAWCRC+1~, CRC4QCK+1~, PARSE+8, PARSE+10, PARSE+11*, PARSE+20, PARSE+25
BASENAME	ENSURNEW+1~, ENSURNEW+3, ENSURNEW+5, ENSURNEW+6
CODE	PARSE+1~, PARSE+13, PARSE+14, SORTDATA+1~, SORTDATA+9, SORTDATA+10, SORTDATA+13, SORTDATA+16, GETLINE+4, FORMINFO+1~ , FORMINFO+4, FORMINFO+5, FORMINFO+6, FORMINFO+10, FORMINFO+11, HASCODE~, HASCODE+6
COMPLEX	SUBID01+1~, SUBID01+2*, SUBID01+4, SUBID01+6
CRCDATA	PARSE+1~, PARSE+27, PARSE+31
CRCDATA(	PARSE+6, PARSE+13, PARSE+24, PARSE+30
DA	UPDQNAME+1~, UPDQNAME+8*
DATA	SORTDATA+1~
DATA(	SORTDATA+25*, SORTDATA+29, SORTDATA+30, SORTDATA+32
DATAIDX	PARSE+1~, PARSE+2, GETLINE+2, GETLINE+3, GETLINE+4
DEFDLG	CRC4QCK+1~, CRC4QCK+14*, CRC4QCK+15
DIDEL	UPDQNAME+1~
DIE	UPDQNAME+1~, UPDQNAME+8*
DISPGRP	CRC4QCK+1~, CRC4QCK+13*, CRC4QCK+14
DONE	PARSE+1~, PARSE+2, PARSE+3, PARSE+12, PARSE+26, GETLINE+3, GETLINE+4
DR	UPDQNAME+1~, UPDQNAME+8*
END	SORTDATA+1~, SORTDATA+5, SORTDATA+17
FIRST	PARSE+1~, PARSE+7, PARSE+15
FORMDATA	CRC4QCK+1~, CRC4QCK+20, SORTDATA+3, SORTDATA+4, SORTDATA+10, SORTDATA+12, SORTDATA+15
FORMID	CRC4QCK+1~, CRC4QCK+3, CRC4QCK+8, CRC4QCK+11, CRC4QCK+12, CRC4QCK+15, CRC4QCK+16, CRC4QCK+17, CRC4QCK+19, CRC4QCK+20 , SORTDATA+3, SORTDATA+4, SORTDATA+33, SUBID01+4, SUBID01+5, SUBID01+6, SUBID05+1, SUBID05+2
FORMINFO	CRC4QCK+2~, CRC4QCK+18, FORMINFO~
FORMINFO(	SORTDATA+3, SORTDATA+4, FORMINFO+5*
FORMINFO("BBK"	SUBID04+1
FORMINFO("BBX"	SUBID04+2
FORMINFO("DLN"	SUBID05+1
FORMINFO("IVL"	SUBID02+1
FORMINFO("MDX"	SUBID01+4, SUBID01+6
FORMINFO("TBL"	SUBID05+2
ID	SORTDATA+1~, SORTDATA+9*
IDINFO	CRC4QCK+2~, CRC4QCK+18, FORMINFO~
IDINFO(	SORTDATA+9, FORMINFO+11*
IDX	ENSURNEW+1~, ENSURNEW+3, ENSURNEW+4, PARSE+1~, PARSE+2, PARSE+6, PARSE+13, PARSE+24, PARSE+25, SORTDATA+1~ , SORTDATA+5, SORTDATA+9, SORTDATA+24, SORTDATA+25, SORTDATA+26, FORMINFO+1~, FORMINFO+2, FORMINFO+7, FORMINFO+8, FORMINFO+11* , HASCODE+1~, HASCODE+2, HASCODE+3, HASCODE+6*
IN	SORTDATA+1~, SORTDATA+5, SORTDATA+6, SORTDATA+7, SORTDATA+28, SORTDATA+29, SORTDATA+30, SORTDATA+32
INDEX	SORTDATA+1~, SORTDATA+10, SORTDATA+11, SORTDATA+12, SORTDATA+13, SORTDATA+14, SORTDATA+15, SORTDATA+16, SORTDATA+17, SORTDATA+20 , SORTDATA+23, SORTDATA+28, SORTDATA+30*, SORTDATA+32
INPT	SUBID01+1~, SUBID01+2*, SUBID01+3
ISMASTER	PARSE+1~, PARSE+2, PARSE+4, PARSE+12, PARSE+26, GETLINE+4
LASTIDX	RAWCRC+1~, CRC4QCK+2~, PARSE+2, PARSE+25, PARSE+29, PARSE+30
LASTLINE	RAWCRC+1~, CRC4QCK+2~, PARSE+2, PARSE+17, PARSE+18, PARSE+23
LASTMSTR	PARSE+1~, PARSE+2, PARSE+26, GETLINE+1*
LINE	PARSE+1~, PARSE+5, PARSE+7, PARSE+13, PARSE+15, PARSE+17, PARSE+22, PARSE+23, SORTDATA+1~, SORTDATA+7* , SORTDATA+8, SORTDATA+9, SORTDATA+25, GETLINE+4, FORMINFO+1~, FORMINFO+3, FORMINFO+4, FORMINFO+5, FORMINFO+9, FORMINFO+10* , FORMINFO+11, HASCODE+1~, HASCODE+3, HASCODE+4, HASCODE+5, HASCODE+6
LK4SPACE	PARSE+1~, PARSE+8, PARSE+10, PARSE+11*, PARSE+18
NAME	ENSURNEW~, ENSURNEW+2
NEWFORM	CRC4QCK+17~
NEWNAME	UPDQNAME+1~, UPDQNAME+5, UPDQNAME+6, UPDQNAME+7, UPDQNAME+8, ENSURNEW+1~, ENSURNEW+2, ENSURNEW+3, ENSURNEW+4, ENSURNEW+5 , ENSURNEW+7
NEXT	FORMINFO+1~, FORMINFO+4*, FORMINFO+6
NEXTFORM	CRC4QCK+2~, CRC4QCK+18, FORMINFO~
NEXTFORM(	SORTDATA+33, FORMINFO+6*
NODE	SORTDATA+1~, SORTDATA+9*, SORTDATA+22
OLDCRC	RAWCRC+1~, RAWCRC+2, CRC4QCK+2~, CRC4QCK+7, CRC4QCK+8, PARSE+29
OLDNAME	UPDQNAME+1~, UPDQNAME+3*, UPDQNAME+4, UPDQNAME+6
ORDATA	RAWCRC+1~, RAWCRC+5, CRC4QCK+1~, CRC4QCK+9!, SORTDATA+27!
ORDATA(	SORTDATA+6, SORTDATA+7, SORTDATA+32, GETLINE+2, GETLINE+4, HASCODE+2, HASCODE+3, SUBID03+4
ORDATA(999999	SUBID03+3
ORIEN	UPDQNAME~, UPDQNAME+2, UPDQNAME+3, UPDQNAME+5, UPDQNAME+8, RAWCRC~, RAWCRC+3, RAWCRC+4, RAWCRC+5, CRC4QCK~ , CRC4QCK+5, CRC4QCK+6, CRC4QCK+7, CRC4QCK+9, CRC4QCK+13
OUT	SORTDATA+1~, SORTDATA+5, SORTDATA+17, SORTDATA+20, SORTDATA+22, SORTDATA+23, SORTDATA+25, SORTDATA+28, SORTDATA+31*, SORTDATA+32
OUTPUT	PARSE+1~, PARSE+5, PARSE+6, PARSE+15, PARSE+17, PARSE+18, PARSE+20, PARSE+21, PARSE+22*, PARSE+24
P3	PARSE+1~, PARSE+7*, PARSE+8, PARSE+10
RESULT	RAWCRC+1~, RAWCRC+2, RWQ, CRC4QCK+1~, CRC4QCK+3, CRC4QCK+8, EXT, PARSE+27, PARSE+29, PARSE+31 , HASCODE+1~, HASCODE+6, HASCODE+7
RTN	SORTDATA+1~, SORTDATA+4*, FORMINFO+1~
SUBFORM	SORTDATA+1~, SORTDATA+2, SORTDATA+11, SORTDATA+13, SUBID01+4, SUBID01+6, SUBID02+1, SUBID04+1, SUBID05+1, SUBID05+2*
SUBFORM2	SORTDATA+1~, SORTDATA+2, SORTDATA+14, SORTDATA+16, SUBID04+2
SUBIDX	SORTDATA+1~, SORTDATA+10, SORTDATA+13, SORTDATA+16, SORTDATA+19, SORTDATA+21, SORTDATA+22
U	UPDQNAME+2, UPDQNAME+3, UPDQNAME+4, RAWCRC+3, RAWCRC+4, CRC4QCK+5, CRC4QCK+6, CRC4QCK+7, CRC4QCK+13, CRC4QCK+14 , PARSE+5, PARSE+7, SORTDATA+9, HASCODE+5
X	SUBID03+2~, SUBID03+3*, SUBID03+4

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORCMEDT8

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(FORMTBL+IDX	FORMINFO+3
$T(IDTABLE+IDX	FORMINFO+9