Routine: GMRCCP

Package	Total	Call Graph
Consult Request Tracking	5	$$VALID^GMRCAU MSG^GMRCP EN^GMRCT GET^GMRCTIU ROLLBACK^GMRCTIU1
VA Fileman	2	FILE^DIE $$GET1^DIQ
Kernel	1	$$PATCH^XPDUTL
Uncategorized	1	$$EXTDATA^MDAPI

Package	Total	Caller Graph
Text Integration Utility	5	TIU144 TIUHL7P3 TIULP TIUPUTCN TIUPUTCP
Consult Request Tracking	2	GMRCACTM GMRCTIUE

Entry Points

Name	Comments	DBIA/ICR reference
CPLINK(PROC)	;check "AC" x-ref to see if PROC is linked to entry in 123.3 ; PROC - ien from 702.01
CPPAT(GMRCDA,GMRCDFN)	;is patient object of given request? ; Input: ; GMRCDA = ien from file 123 ; GMRCDFN = patient DFN
CPLIST(GMRCPT,GMRCPR,GMRCRET)	;return list of patient CP requests ; Input: ; GMRCPT = patient DFN (required) ; GMRCPR = ien from file 702.01 (optional) ; if just one procedure ; desired; defaults to all ; GMRCRET= global array in which to (required) ; return results
CPROC(PROC)	;is orderable procedure mapped to Clinical Procedures
CPINTERP(GMRCTIU,GMRCUSER)	;is user an interpreter for TIU doc GMRCTIU
LOADAR(IEN,GMRCAR,CNT)	;set up array and return data for given file 123 ien
CPDOC(GMRCDA,TIUDA,ACTION)	;update file 123 entry with CLIN PROC DOC ; Input: ; GMRCDA = ien from file 123 ; TIUDA = ien from file 8925 ; ACTION = 1 - associate stub record ; = 2 - partial results ready ; = 3 - retract record
CPLINKS(NAMES,PROC)	;return list of procedure names linked to a CP ; Input ; PROC - ien from PROCEDURE DEFINITION (#702.01) - (required) ; Output: ; NAMES - passed by reference ; returned as array of GMRC PROCEDUREs linked to PROC ; in format; ; NAMES(x)=GMRC PROCEDURE name^GMRC PROCEDURE ien ; NAMES(1)="EKG^21" ; NAMES(2)="EKG PORTABLE^32" ; if not currently linked, returned as: ; NAMES(1)="-1^not currently linked"
CPACTM(GMRCDA)	;return actions available for a CP request
MCCNVT(GMRCMOD,GMRCMC,GMRCTIU)	;convert MC pointer to TIU pointer in file 123

External References

Name	Field # of Occurrence
FILE^DIE	MCCNVT+20, MCCNVT+25, MCCNVT+32
$$GET1^DIQ	LOADAR+7, LOADAR+8, LOADAR+9, CPACTM+17
$$VALID^GMRCAU	CPINTERP+15
MSG^GMRCP	CPDOC+32
EN^GMRCT	CPDOC+26
GET^GMRCTIU	CPDOC+25
ROLLBACK^GMRCTIU1	CPDOC+38
$$EXTDATA^MDAPI	CPLIST+19, CPLIST+24, CPACTM+13
$$PATCH^XPDUTL	CPACTM+11

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ORD(100.01 - [#100.01]	GET1^DIQ
^ORD(101 - [#101]	GET1^DIQ
^TIU(8925 - [#8925]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123 - [#123]	CPLIST+18, CPLIST+23, CPLIST+26, LOADAR+2, LOADAR+3, LOADAR+4, LOADAR+6, CPDOC+14, CPDOC+23, CPDOC+26 , CPDOC+30, CPDOC+36, CPACTM+12, CPACTM+13, CPACTM+14, CPINTERP+11, CPINTERP+13, CPPAT+8, MCCNVT+14, MCCNVT+18 , MCCNVT+23, MCCNVT+28, MCCNVT+29
^GMR(123.3 - [#123.3]	CPROC+1, CPLINK+2, CPLINKS+14, CPLINKS+15

Label References

Name	Line Occurrences
LOADAR	CPLIST+20, CPLIST+27

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTION	CPDOC~, CPDOC+15, CPDOC+18, CPDOC+21, CPDOC+35
CNT	LOADAR~, LOADAR+10
COUNT	CPLIST+13~, CPLIST+14, CPLIST+20, CPLIST+27*
CPDOC	CPACTM+10~, CPACTM+14*, CPACTM+15, CPACTM+16, CPACTM+17
EXTDTA	CPACTM+10~, CPACTM+13*, CPACTM+15, CPACTM+16
FDA	MCCNVT+13~, MCCNVT+30!
FDA(1	MCCNVT+19, MCCNVT+24, MCCNVT+31*
GMRC	LOADAR+1~
GMRC(0	LOADAR+4*, LOADAR+5, LOADAR+8, LOADAR+9
GMRCACT	MCCNVT+13~, MCCNVT+27, MCCNVT+28, MCCNVT+29, MCCNVT+31
GMRCADUZ	CPDOC+13~, CPDOC+27, CPDOC+32
GMRCAR	LOADAR~, LOADAR+10
GMRCCP	LOADAR+1~, LOADAR+7*, LOADAR+10
GMRCCPA	CPDOC+22~, CPDOC+24*
GMRCCPI	LOADAR+1~, LOADAR+6*, LOADAR+7, LOADAR+10
GMRCDA	CPLIST+13~, CPLIST+17, CPLIST+18, CPLIST+20, CPLIST+25, CPLIST+26, CPLIST+27, CPDOC~, CPDOC+14, CPDOC+23 , CPDOC+25, CPDOC+26, CPDOC+30, CPDOC+31, CPDOC+36, CPDOC+38, CPACTM~, CPACTM+12, CPACTM+13, CPACTM+14 , CPINTERP+10~, CPINTERP+11*, CPINTERP+12, CPINTERP+13, CPPAT~, CPPAT+8
GMRCDFN	CPDOC+28~, CPDOC+30*, CPDOC+32, CPPAT~, CPPAT+8
GMRCDT	LOADAR+1~, LOADAR+5*, LOADAR+10
GMRCERR	MCCNVT+13~, MCCNVT+21, MCCNVT+30!
GMRCIEN	MCCNVT+13~, MCCNVT+14*, MCCNVT+15, MCCNVT+16, MCCNVT+18, MCCNVT+19, MCCNVT+23, MCCNVT+24, MCCNVT+28, MCCNVT+29 , MCCNVT+31, MCCNVT+34
GMRCINT	CPINTERP+10~, CPINTERP+15*, CPINTERP+16
GMRCMC	MCCNVT~, MCCNVT+12, MCCNVT+14, MCCNVT+18, MCCNVT+23, MCCNVT+29
GMRCMOD	MCCNVT~, MCCNVT+11, MCCNVT+16
GMRCPR	CPLIST~, CPLIST+16, CPLIST+18, CPLIST+19, CPLIST+22, CPLIST+23, CPLIST+24, CPLIST+26, CPLINKS+12~, CPLINKS+13* , CPLINKS+14*, CPLINKS+15
GMRCPT	CPLIST~, CPLIST+15, CPLIST+18, CPLIST+26
GMRCREF	CPDOC+28~, CPDOC+31*, CPDOC+32
GMRCRET	CPLIST~, CPLIST+15, CPLIST+20, CPLIST+27
GMRCRIEN	MCCNVT+13~, MCCNVT+18*, MCCNVT+19
GMRCSRV	CPINTERP+10~, CPINTERP+13*, CPINTERP+14, CPINTERP+15
GMRCTIU	CPINTERP~, CPINTERP+11, MCCNVT~, MCCNVT+17, MCCNVT+19, MCCNVT+31
GMRCUR	LOADAR+1~, LOADAR+8*, LOADAR+10
GMRCUSER	CPINTERP~, CPINTERP+15
I	CPLINKS+12~, CPLINKS+13, CPLINKS+15, CPLINKS+16
IEN	LOADAR~, LOADAR+2, LOADAR+3, LOADAR+4, LOADAR+6, LOADAR+10
MSG	CPDOC+28~, CPDOC+29*, CPDOC+32
NAMES	CPLINKS~
NAMES(	CPLINKS+15*
NAMES(1	CPLINKS+17*
PROC	CPROC~, CPROC+1, CPLINK~, CPLINK+2, CPLINKS~, CPLINKS+14
QVAL	CPDOC+13~, CPDOC+17, CPDOC+18, CPDOC+19, CPDOC+21, CPDOC+33, CPDOC+35, CPDOC+37, CPDOC+39*
STS	LOADAR+1~, LOADAR+9*, LOADAR+10
TIUDA	CPDOC~, CPDOC+16, CPDOC+23, CPDOC+25, CPDOC+31, CPDOC+36, CPDOC+38
U	LOADAR+5, LOADAR+8, LOADAR+9, LOADAR+10, CPROC+1, CPLINKS+15, CPDOC+26, CPDOC+30, CPINTERP+13, CPPAT+8 , MCCNVT+23, MCCNVT+29

Customize PDF page

Package: Consult Request Tracking

Routine: GMRCCP

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 7

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: