Routine: ORQQCN2

Information

ORQQCN2 ; slc/REV - Functions for GUI consult actions ; 02 April 2003 4:05 PM

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Consult Request Tracking	9	SERV1^GMRCASV GUI^GMRCASV1 ($$REAF,GETDEF)^GMRCDRFR RT^GMRCGUIA ($$SCH,$$SFILE,CMT)^GMRCGUIB (EN,GUI)^GMRCP5 PRNT^GMRCP5A $$ANYPENDG^GMRCTIU ($$PROVDX,PREREQ)^GMRCUTL1
Order Entry Results Reporting	3	SVCTREE^ORQQCN2 $$USID^ORWDXC ($$HFS,HFSCLOSE,HFSOPEN,IOVAR,SETITEM)^ORWRP
Toolkit	2	($$GET,ADD,CHG)^XPAR $$SCREEN^XTID
Kernel	1	$$NOW^XLFDT

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Order Entry Results Reporting	1	ORQQCN2

Entry Points

Name	Comments	DBIA/ICR reference
SVCSYN(ORROOT,ORSTRT,ORWHY,ORSYN,ORIEN)	;;return CSLT services for GUI
STATUS(Y)	; Returns a list of statuses currently in use
SHOW513(ORY,GMRCO)
SVCTREE(Y,PURPOSE)	;Returns list of consult service for current ; context, screening for inactive, groupers, and tracking ; PURPOSE: Display=0, Forward=1, Order=1
UNRSLVD(ORY,ORDFN)	;Returns true if unresolved consults for user/pt
CMT(ORERR,ORIEN,ORCOM,ORALRT,ORALTO,ORDATE)	;Add comment to existing consult without changing status
MEDRSLT(ORY,GMRCO)	;Returns Medicine results plus TIU results
PREREQ(ORY,ORSVC,ORDFN)	;Returns prequisites for ordering
SVCIEN(ORY,ORIEN)	;Given orderable item file entry, return IEN in 123.5, OR -1 IF INACTIVE IN 101.43
GETCTXT(Y,ORUSER)	; Returns current view context for user
EDITDRFR(ORY,ORSVC)	; Allow editing of reason for request?
SCH(ORERR,ORIEN,ORNP,ORDATE,ORALRT,ORALTO,ORCOM)	;Schedule consult and change status
ADMCOMPL(Y,ORIEN,ORFL,ORCOM,ORRESP,ORALRT,ORALTO,ORDATE)	; Admin users ; Administrative complete action
SAVECTXT(Y,ORCTXT)	; Save new view preferences for user
PROVDX(ORY,ORIEN)	;Return provisional dx prompting info for service
SVCLIST(ORY,FROM,DIR)	; Return a set of consult services in long list format ; .ORY=returned list, FROM=text to $O from, DIR=$O direction,
WPRT513(ORY,GMRCO,GMRCCHT)	;Print SF513 to Windows device from GUI
SIGFIND(Y,ORIEN,ORFL,ORCOM,ORALRT,ORALTO,ORDATE)	;Significant findings
PRT513(Y,GMRCO,GMRCCHT,GMRCDEV)	; Print SF513 to VistA device from GUI
DEFRFREQ(ORY,ORSVC,ORDFN,RESOLVE)	;Return default reason for request for service ; ORSVC=pointer to file 123.5 ; ORDFN=patient, if RESOLVE=1 ; RESOLVE=1 to resolve boilerplate, 0 to not resolve

External References

Name	Field # of Occurrence
SERV1^GMRCASV	SVCTREE+5
GUI^GMRCASV1	SVCSYN+14
$$REAF^GMRCDRFR	EDITDRFR+1
GETDEF^GMRCDRFR	DEFRFREQ+8
RT^GMRCGUIA	MEDRSLT+2
$$SCH^GMRCGUIB	SCH+15
$$SFILE^GMRCGUIB	SIGFIND+1, ADMCOMPL+2
CMT^GMRCGUIB	CMT+13
EN^GMRCP5	PRT513+2
GUI^GMRCP5	SHOW513+1
PRNT^GMRCP5A	WPRT513+13
$$ANYPENDG^GMRCTIU	UNRSLVD+5
$$PROVDX^GMRCUTL1	PROVDX+1
PREREQ^GMRCUTL1	PREREQ+3
SVCTREE^ORQQCN2	SVCLIST+4
$$USID^ORWDXC	SVCIEN+5
$$HFS^ORWRP	WPRT513+5
HFSCLOSE^ORWRP	WPRT513+14
HFSOPEN^ORWRP	WPRT513+6
IOVAR^ORWRP	WPRT513+9
SETITEM^ORWRP	WPRT513+8
$$NOW^XLFDT	CMT+8, SCH+10, SVCIEN+4
$$GET^XPAR	GETCTXT+1, SAVECTXT+2, UNRSLVD+6
ADD^XPAR	SAVECTXT+5
CHG^XPAR	SAVECTXT+4
$$SCREEN^XTID	STATUS+6

RPC Name	Call Tags
ORQQCN ADDCMT	CMT
ORQQCN SVCTREE	SVCTREE
ORQQCN STATUS	STATUS
ORQQCN MED RESULTS	MEDRSLT
ORQQCN SHOW SF513	SHOW513
ORQQCN PRINT SF513	PRT513
ORQQCN SIGFIND	SIGFIND
ORQQCN ADMIN COMPLETE	ADMCOMPL
ORQQCN SVCLIST	SVCLIST
ORQQCN2 GET CONTEXT	GETCTXT
ORQQCN2 SAVE CONTEXT	SAVECTXT
ORQQCN DEFAULT REQUEST REASON	DEFRFREQ
ORQQCN GET SERVICE IEN	SVCIEN
ORQQCN PROVDX	PROVDX
ORQQCN SF513 WINDOWS PRINT	WPRT513
ORQQCN EDIT DEFAULT REASON	EDITDRFR
ORQQCN2 GET PREREQUISITE	PREREQ
ORQQCN2 SCHEDULE CONSULT	SCH
ORQQCN SVC W/SYNONYMS	SVCSYN
ORQQCN UNRESOLVED	UNRSLVD

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^GMR(123 - [#123]	CMT+10, SCH+12
^GMR(123.1 - [#123.1]	STATUS+5
^ORD(100.01 - [#100.01]	STATUS+4, STATUS+7
^ORD(101.43 - [#101.43]	SVCTREE+10, SVCSYN+19, SVCIEN+2, SVCIEN+3
^TMP(	WPRT513+4
^TMP("GMRCSLIST"	SVCTREE+7, SVCTREE+8, SVCTREE+9
^TMP("ORCSLT"	SVCSYN+13
^TMP("ORPREREQ"	PREREQ+2
^TMP("ORREQ"	DEFRFREQ+6
^TMP("ORRSLT"	MEDRSLT+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNT	SVCLIST+2~, SVCLIST+3*, SVCLIST+7
DIR	SVCLIST~, SVCLIST+7
DUZ	CMT+13, SCH+11, SIGFIND+1, ADMCOMPL+2, SAVECTXT+2, SAVECTXT+4, SAVECTXT+5, UNRSLVD+5
FROM	SVCLIST~, SVCLIST+7*, SVCLIST+8
GMRCCHT	PRT513~, PRT513+2, WPRT513~, WPRT513+13
GMRCDEV	PRT513~, PRT513+2
GMRCDG	SVCTREE+3~, SVCTREE+4*
GMRCO	MEDRSLT~, MEDRSLT+2, SHOW513~, SHOW513+1, PRT513~, PRT513+2, WPRT513~, WPRT513+13
GMRCOI	SVCTREE+3~, SVCTREE+10*, SVCTREE+11
GMRCORST	STATUS+2~, STATUS+3, STATUS+4, STATUS+5, STATUS+6, STATUS+7
GMRCSVC	SVCTREE+3~, SVCTREE+6, SVCTREE+8, SVCTREE+9
GMRCTO	SVCTREE+3~, SVCTREE+4*
I	CMT+12, SCH+14, SVCTREE+8, SVCTREE+9, SVCTREE+10, SVCTREE+11, SVCSYN+9~, SVCSYN+17, SVCLIST+2~, SVCLIST+3* , SVCLIST+5, SVCLIST+6, SVCLIST+7, SVCLIST+9
IEN	SVCLIST+2~
IO	WPRT513+12
IOF	WPRT513+2~
IOM	WPRT513+2~
IOS	WPRT513+2~
IOSL	WPRT513+2~
IOST	WPRT513+2~
IOT	WPRT513+2~
OI	SVCSYN+9~, SVCSYN+19*, SVCSYN+20
ORAD	CMT+7~, CMT+8, CMT+13, SCH+9~, SCH+10, SCH+15
ORALRT	CMT~, CMT+11, SCH~, SCH+13, SIGFIND~, SIGFIND+1, ADMCOMPL~, ADMCOMPL+2
ORALTO	CMT~, CMT+12, SCH~, SCH+14, SIGFIND~, SIGFIND+1, ADMCOMPL~, ADMCOMPL+2
ORCOM	CMT~, CMT+9, CMT+13, SCH~, SCH+15, SIGFIND~, SIGFIND+1, ADMCOMPL~, ADMCOMPL+2
ORCTXT	SAVECTXT~, SAVECTXT+4, SAVECTXT+5
ORDATE	CMT~, CMT+8, SCH~, SCH+10, SIGFIND~, SIGFIND+1, ADMCOMPL~, ADMCOMPL+2
ORDFN	DEFRFREQ~, DEFRFREQ+5, DEFRFREQ+8, PREREQ~, PREREQ+1, PREREQ+3, UNRSLVD~, UNRSLVD+5
ORDUZ	CMT+7~, CMT+13, SCH+9~, SCH+15
ORDUZ(	CMT+12, SCH+14
ORERR	CMT~, CMT+8, CMT+9, CMT+10, SCH~, SCH+10, SCH+12, SCH+15
ORFL	SIGFIND~, SIGFIND+1, ADMCOMPL~, ADMCOMPL+2
ORHANDLE	WPRT513+1~, WPRT513+3*, WPRT513+6, WPRT513+14
ORHFS	WPRT513+1~, WPRT513+5*, WPRT513+6, WPRT513+14
ORIEN	CMT~, CMT+10, CMT+13, SCH~, SCH+12, SCH+15, SVCSYN~, SVCSYN+14, SIGFIND~, SIGFIND+1 , ADMCOMPL~, ADMCOMPL+2, SVCIEN~, SVCIEN+2, SVCIEN+3, SVCIEN+5, PROVDX~, PROVDX+1
ORIO	WPRT513+1~, WPRT513+3*, WPRT513+9
ORNP	CMT+7~, CMT+8, SCH~, SCH+11, SCH+15
ORRESP	ADMCOMPL~, ADMCOMPL+2
ORROOT	SVCSYN~, SVCSYN+13*, SVCSYN+14, SVCSYN+16, SVCSYN+17, SVCSYN+18, SVCSYN+20
ORSTATUS	PRT513+1~, PRT513+2, PRT513+3, WPRT513+1~
ORSTR	SVCLIST+2~, SVCLIST+8*, SVCLIST+9
ORSTRT	SVCSYN~, SVCSYN+10*, SVCSYN+14
ORSUB	WPRT513+1~, WPRT513+3*, WPRT513+4
ORSVC	SVCSYN+9~, SVCSYN+15, SVCSYN+17, SVCSYN+18, SVCSYN+20, SVCLIST+2~, SVCLIST+3, SVCLIST+5, SVCLIST+6, DEFRFREQ~ , DEFRFREQ+4, DEFRFREQ+8, EDITDRFR~, EDITDRFR+1, PREREQ~, PREREQ+1, PREREQ+3
ORSYN	SVCSYN~, SVCSYN+12*, SVCSYN+14
ORTMP	SVCLIST+2~
ORTMP(	SVCLIST+6*, SVCLIST+7, SVCLIST+8
ORUSER	GETCTXT~
ORWHY	SVCSYN~, SVCSYN+11*, SVCSYN+14
ORY	MEDRSLT~, MEDRSLT+1, MEDRSLT+2, SHOW513~, SHOW513+1, WPRT513~, WPRT513+4, SVCLIST~, DEFRFREQ~, DEFRFREQ+6* , DEFRFREQ+8, DEFRFREQ+9, EDITDRFR~, EDITDRFR+1, SVCIEN~, SVCIEN+2, SVCIEN+4, SVCIEN+5, PROVDX~, PROVDX+1* , PREREQ~, PREREQ+2, PREREQ+3, PREREQ+4, UNRSLVD~, UNRSLVD+5, UNRSLVD+6*
ORY(	SVCLIST+9*
>> POP	WPRT513+7
PURPOSE	SVCTREE~, SVCTREE+4
RESOLVE	DEFRFREQ~, DEFRFREQ+5, DEFRFREQ+7*, DEFRFREQ+8
ROOT	WPRT513+1~, WPRT513+3*, WPRT513+8
TMP	SAVECTXT+1~, SAVECTXT+2*, SAVECTXT+3
U	SVCTREE+10, SVCTREE+11, SVCSYN+19, SVCSYN+20, STATUS+7, SVCLIST+5, SVCIEN+5, UNRSLVD+5, UNRSLVD+6
X	CMT+7~, CMT+12, SCH+9~, SCH+14, SVCSYN+9~, SVCSYN+18*, SVCSYN+19, SVCSYN+20
X1	SVCIEN+1~, SVCIEN+3*, SVCIEN+4
Y	SVCTREE~, STATUS~, PRT513~, PRT513+3, SIGFIND~, SIGFIND+1, ADMCOMPL~, ADMCOMPL+2, SVCLIST+2~, SVCLIST+4 , GETCTXT~, GETCTXT+1, SAVECTXT~
Y(	SVCTREE+9, SVCTREE+10, SVCTREE+11, STATUS+7*, SVCLIST+5, SVCLIST+6
Y(1	SVCTREE+7*
Y(999	STATUS+3, STATUS+5
ZTQUEUED	WPRT513+1~

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORQQCN2

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Used in RPC

Global Variables Directly Accessed

Local Variables

Legend: