Routine: RARTVER1

Information

RARTVER1 ;HISC/FPT AISC/MJK,RMO-On-Line Verify List/Select Reports ;11/19/97 13:49

Source Information

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Radiology Nuclear Medicine	4	RASET^RARTVER2 $$SSN^RAUTL RASET^RAUTL2 EN2^RAUTL20
VA Fileman	1	^DIR

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Radiology Nuclear Medicine	2	RARTRPV RARTVER

Entry Points

Name	Comments	DBIA/ICR reference
PARSE
STAT	;keep only rpts with order of stat
TALLY	; tally report counts by category
PV	; keep pre-verified reports (status ='draft' or 'released/not verified')
HDR
DPDRNV	; keep reports with a status of 'draft', 'problem draft' or 'released/ ; not verified"
RLTV1	; add'l reports left to be viewed
CHK
GETRPT
RPTLP
Q
SELRPT	; select reports to verify
WRT	; used when user chooses SELECTED category ; the "xref" nodes store all cases ready to be selected by user
ASK
ONERPT	; message when there is only one report to choose from
RLTV	; reports left to view

Name	Field # of Occurrence
^DIR	SELRPT+13, ONERPT+9
RASET^RARTVER2	GETRPT
$$SSN^RAUTL	GETRPT
RASET^RAUTL2	TALLY+14
EN2^RAUTL20	WRT+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?5,"Case",!,?5,"No.",?12,"Procedure",?34,"Ex Date",?44,"Name",?66,"Pt ID" Line Location: HDR+0
Function Call: WRITE	Prompt: ?74,"ST",?78,"PV" Condition for execution: $D(RASTATFG) Line Location: HDR+0
Function Call: WRITE	Prompt: !,?5,"-----",?12,"---------",?34,"--------",?44,"-----------------",?66,"-----" Line Location: HDR+1
Function Call: WRITE	Prompt: ?74,"---",?78,"--" Condition for execution: $D(RASTATFG) Line Location: HDR+1
Function Call: WRITE	Prompt: !,RACNT,?4,$S(RAPRTSET:"+",1:""),?5,RACN,?12,$E(RAPRC,1,20),?34,$E(RADTE,4,5),"-",$E(RADTE,6,7),"-",$E(RADTE,2,3),?44,$E(RANME,1,20),?66,RASSN Line Location: WRT+3
Function Call: WRITE	Prompt: ?74,"("_$E($P($G(^RARPT(RARPT,0)),U,5),1)_")" Line Location: WRT+4
Function Call: WRITE	Prompt: ?78,$S($P($G(^RARPT(RARPT,0)),U,12)]"":"Y",1:"N") Line Location: WRT+5
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASK+0
Function Call: WRITE	Prompt: !!?3,"Please enter a single number, individual numbers separated by commas,",!?3,"a range of numbers separated by a dash, or numbers separated by a",!?3,"combination of commas and dashes.",! Line Location: ASK+1
Function Call: WRITE	Prompt: !?3,*7,"Item ",RASEL," is not a valid selection.",! Line Location: CHK+1
Function Call: WRITE	Prompt: !?3,*7,"Item ",RASEL," is not a valid selection.",! Line Location: CHK+2
Function Call: WRITE	Prompt: !?3,*7,"Item ",RASEL," was already selected.",! Line Location: CHK+3
Function Call: WRITE	Prompt: !!,"Sorry, there are no Pre-Verified reports to review." Line Location: PV+6
Function Call: WRITE	Prompt: !!,"Sorry, there are no "_$S(RASTATUS="R":"RELEASED/NOT VERIFIED",RASTATUS="PD":"PROBLEM DRAFT",1:"DRAFT")_" reports to review." Line Location: DPDRNV+4
Function Call: WRITE	Prompt: !!!!!,"Select one of the following:",! Line Location: SELRPT+2
Function Call: WRITE	Prompt: !,"There is only one report ("_RASTATUS_RAPREV_") to choose from." Line Location: ONERPT+6
Function Call: WRITE	Prompt: !!,"Sorry, there are no STAT ordered reports to review." Line Location: STAT+3
Routine Call	DIR Line Location: SELRPT+13 ONERPT+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RAO(75.1 - [#75.1]	TALLY+16
^RARPT - [#74]	WRT+4, WRT+5, WRT+7, PV+3, DPDRNV+3, ONERPT+3, TALLY+7
^TMP($J	RPTLP, Q!, GETRPT, WRT+7, CHK+2, CHK+4, PV+2, PV+5!, DPDRNV+3!, ONERPT+1 , ONERPT+2, ONERPT+10!, RLTV+2, RLTV1+2, TALLY+6, TALLY+17, STAT+2

Name	Line Occurrences
ASK	WRT+7, ASK+1, PARSE+2
CHK	PARSE, PARSE+1
GETRPT	RPTLP
PARSE	PARSE+2
WRT	GETRPT

Name	Field # of Occurrence
^(	STAT+2!

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	SELRPT+1!, SELRPT+15!, ONERPT+7!, ONERPT+11!
DIR("A"	SELRPT+3, SELRPT+4, SELRPT+5, SELRPT+6, SELRPT+7, SELRPT+8, SELRPT+9, SELRPT+10, SELRPT+12, ONERPT+8
DIR("B"	ONERPT+9*
DIR(0	SELRPT+11, ONERPT+8
DIROUT	SELRPT+1!, SELRPT+15!, ONERPT+11!
DIRUT	SELRPT+1!, SELRPT+14, SELRPT+15!, ONERPT+10, ONERPT+11!
DTIME	ASK
DTOUT	SELRPT+1!, SELRPT+15!, ONERPT+11!
DUOUT	SELRPT+1!, SELRPT+15!, ONERPT+11!
I	Q!
RACN	Q!, WRT+3
RACNT	HDR, Q!, WRT+3, WRT+7, ASK
RADASH	Q!, PARSE*, PARSE+1, PARSE+2!, CHK
>> RADFN	GETRPT
>> RADTE	WRT+3
RADUP	Q!, ASK!
RADUP(	CHK+3, CHK+4*
>> RAERR	ASK, PARSE, PARSE+2, CHK, CHK+1, CHK+2, CHK+3*
RAFST	Q!
RAI	Q!, ASK, PARSE, TALLY+2*, TALLY+19!
RALST	Q!
RAMEMARR	HDR+2~, WRT+2
RANME	Q!, WRT+3
>> RANUM	ASK, CHK+4
RAOUT	HDR!, ASK*
RAPAR	Q!, PARSE*, PARSE+1, CHK
RAPRC	Q!, WRT+3
RAPREV	ONERPT+5*, ONERPT+6, ONERPT+7!
RAPREVER	TALLY+9*, TALLY+13, TALLY+19!
RAPRTSET	HDR+2~, WRT+3
>> RARLTV	RLTV+1, RLTV+2, RLTV1+1, RLTV1+2
>> RARLTV(1	RLTV+1, RLTV+2, RLTV1+1, RLTV1+2
>> RARLTV(2	RLTV+2, RLTV1+2
RARPT	Q!, GETRPT, WRT+4, WRT+5, WRT+7, PV+2, PV+3, PV+5, DPDRNV+3, ONERPT+2 , ONERPT+3, TALLY+6, TALLY+7, TALLY+14, TALLY+17, STAT+2
RARPT(0	TALLY+7*, TALLY+8, TALLY+9, TALLY+19!
RARPT0	ONERPT+3*, ONERPT+5, ONERPT+7!
RARPTX	ASK!
RARPTX(	CHK+4*
RARSEL	HDR!, RPTLP, Q!, GETRPT, ASK, CHK+4*
RARTDT	RPTLP, Q!, GETRPT, WRT+7, PV+1, PV+2, PV+5, DPDRNV+2, DPDRNV+3, ONERPT+1 , ONERPT+2, TALLY+3, TALLY+6, TALLY+17, STAT+1, STAT+2
RASEL	Q!, PARSE, PARSE+1, CHK+1, CHK+2, CHK+3, CHK+4
RASSN	Q!, GETRPT*, WRT+3
>> RASTATFG	HDR, HDR+1, WRT+4, WRT+5
RASTATUS	DPDRNV+3, DPDRNV+4, DPDRNV+5!, ONERPT+3, ONERPT+4, ONERPT+6, ONERPT+7!, TALLY+8*, TALLY+10, TALLY+11 , TALLY+12, TALLY+13, TALLY+19!
>> RATOT	WRT+7, PV+5, PV+6, DPDRNV+3, DPDRNV+4, SELRPT+7, SELRPT+8, STAT+2*, STAT+3
RATOTAL	SELRPT+15!, TALLY+1!
RATOTAL(	TALLY+2*
RATOTAL(1	SELRPT+3, TALLY+13*
RATOTAL(2	SELRPT+4, TALLY+12*
RATOTAL(3	SELRPT+5, TALLY+10*
RATOTAL(4	SELRPT+6, TALLY+11*
RATOTAL(7	SELRPT+9, TALLY+17*
U	WRT+4, WRT+5, WRT+7, PV+4, DPDRNV+3, ONERPT+3, ONERPT+5, TALLY+8, TALLY+9, TALLY+15 , TALLY+16
>> X	ASK, ASK+1, PARSE, PV+3, PV+4
>> Y	GETRPT, SELRPT+14, ONERPT+10, TALLY+14, TALLY+15*, TALLY+16

Customize PDF page

Package: Radiology Nuclear Medicine

Routine: RARTVER1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: