Routine: APCDFQAC

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
VA Fileman	4	DD^%DT C^%DTC ^DIC ^DIR
Patient Care Component	3	^APCDFQA3 ^APCDFQC1 ^APCDFQCP
IHS VA Utilities	1	EN^XBVK
PCC Medical Query	1	PEP^AMQQGTX0

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
RAND	;
CLN	;
ZIS
ERR
ED	;get ending date
DRIVER	; entry point for taskman
RV	;
ICD	;
START	;
DLMVD	;RUN BY DATE LAST MODIFIED OR VISIT DATE?
GETDATES	;
XIT	;
TSKMN	;
PROV	;
SC	;
SC1	;enter sc
ZTSK	;

External References

Name	Field # of Occurrence
DD^%DT	ED+1
C^%DTC	ED+4
^%ZIS	ZIS, XIT+2
^%ZISC	XIT+1
^%ZTLOAD	TSKMN+6
PEP^AMQQGTX0	SC1+2
^APCDFQA3	ICD+6
^APCDFQC1	ZTSK+1
^APCDFQCP	ZTSK+4
^DIC	SC1+1, CLN+6, PROV+6
^DIR	DLMVD+3, BD+1, ED+1, SC+4, CLN+2, PROV+3, RV+2, ICD+3, RAND+2, RAND+5
EN^XBVK	XIT+4
$$FMTE^XLFDT	ZTSK+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",!! Line Location: START+2
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER",!! Line Location: START+3
Function Call: WRITE	Prompt: !?((80-$L(APCDLHDR))/2),APCDLHDR Line Location: START+6
Function Call: WRITE	Prompt: !!,"This report will list the purpose of visits for visits that you select." Line Location: START+7
Function Call: WRITE	Prompt: !,"The ICD code and provider narrative will be displayed so that coding" Line Location: START+8
Function Call: WRITE	Prompt: !,"can be reviewed." Line Location: START+9
Function Call: WRITE	Prompt: !,"You will be able to select visits by the following items:" Line Location: START+10
Function Call: WRITE	Prompt: !?5,"- Visit date or Date Last Modified" Line Location: START+11
Function Call: WRITE	Prompt: !?5,"- Service Category" Line Location: START+12
Function Call: WRITE	Prompt: !?5,"- Clinic" Line Location: START+13
Function Call: WRITE	Prompt: !?5,"- Operator who last marked the visit as reviewed complete" Line Location: START+14
Function Call: WRITE	Prompt: !?10,"or last modified the POV" Line Location: START+15
Function Call: WRITE	Prompt: !?5,"- Visits marked as Reviewed/Complete or All Visits" Line Location: START+16
Function Call: WRITE	Prompt: !?10,"NOTE: since Hospital, Telephone, Chart Review visits don't need" Line Location: START+17
Function Call: WRITE	Prompt: !?10,"to be marked as reviewed/complete in the coding queue, select all" Line Location: START+18
Function Call: WRITE	Prompt: !?10,"visits if you want those included." Line Location: START+19
Function Call: WRITE	Prompt: !?5,"- Visit by ICD diagnosis code" Line Location: START+20
Function Call: WRITE	Prompt: ! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: ! Line Location: SC+1
Function Call: WRITE	Prompt: ! Line Location: SC+3
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: SC1+1
Function Call: WRITE	Prompt: ! Line Location: CLN+1
Function Call: WRITE	Prompt: ! Line Location: PROV+1
Function Call: WRITE	Prompt: ! Line Location: ICD+1
Function Call: WRITE	Prompt: ! Line Location: RAND+1
Function Call: WRITE	Prompt: !! Line Location: ZIS+0
Function Call: WRITE	Prompt: $C(7),$C(7),!,"Must be a valid date and be Today or earlier. Time not allowed!" Line Location: ERR+0
Routine Call	DIC Line Location: SC1+1 CLN+6 PROV+6
Routine Call	DIR Line Location: DLMVD+3 BD+1 ED+1 SC+4 CLN+2 PROV+3 RV+2 ICD+3 RAND+2 RAND+5
Routine Call	%ZIS Line Location: ZIS XIT+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls
^DIC(40.7 - [#40.7]	Classic Fileman Calls
^AMQQ(5 - [#9009075]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTSITE(1	DLMVD+2
^XTMP("APCDFQA"	START+22!, ICD+2!, ICD+5*, ZTSK+6!

Label References

Name	Line Occurrences
BD	ED+2, SC+5
CLN	SC+6, CLN+7, PROV+4
DLMVD	BD+2
ICD	ICD+7, RAND+3
PROV	CLN+4, PROV+7, RV+3
RAND	ICD+4, ICD+5, RAND+6
RV	PROV+5
SC	SC1+3, CLN+3
TSKMN	ZIS+2
XIT	DLMVD+4, SC1+1, ZIS+1, ZTSK+7, TSKMN+6
ZIS	RAND+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	TSKMN+5*
%DT	XIT+3!
>> %ZIS	ZIS*
>> APCDBD	BD+3*, ED+1, ED+4
>> APCDBT	START+21*, START+22, ICD+2, ICD+5, ZTSK+6
>> APCDCLN	CLN+2, CLN+8
>> APCDDT	ZTSK+2*
>> APCDED	ED+3*
>> APCDJOB	START+21*, START+22, ICD+2, ICD+5, ZTSK+6
>> APCDLHDR	START+5*, START+6
>> APCDMAX	RAND+2, RAND+7
>> APCDPROC	DLMVD+5*
>> APCDPROD	DLMVD+5*, BD+1, ED+1
>> APCDPROV	PROV+2, PROV+8
>> APCDRSM	RAND+4, RAND+7
>> APCDRVC	RV+1, RV+4
APCDSC	SC+3!
APCDSCT	SC+2!, SC+3!, SC1+3, SC1+4!
APCDSCT("*"	SC1+4
>> APCDSD	ED+4*
APCDSITE	START+1, START+2!, START+3!, DLMVD+1, DLMVD+2*
APCDTABL	ICD+6!, ICD+7
>> APCDXREF	DLMVD+5*
DA	SC1+1!, CLN+6!, PROV+3!, RV+2!, ICD+2!
DIC	SC1+1!, CLN+5, CLN+6!, PROV+6*!, ICD+2!, XIT+3!
DIC("A"	CLN+5, PROV+6
DIC("S"	SC1+1*
DIC(0	SC1+1, CLN+5, PROV+6*
DIR	DLMVD+3!, BD+1!, ED+1!, SC+4!, CLN+2!, PROV+3!, RV+2!, ICD+2!, ICD+3!, RAND+2! , RAND+5!
DIR("?"	SC+4, CLN+2, ICD+3, RAND+2
DIR("A"	DLMVD+3, BD+1, ED+1, SC+3, CLN+2, PROV+3, RV+2, ICD+3, RAND+2, RAND+5
DIR("B"	DLMVD+3, ED+1, SC+3, CLN+2, PROV+3, RV+2, ICD+3, RAND+2
DIR(0	DLMVD+3, BD+1, ED+1, SC+3, CLN+2, PROV+3, RV+2, ICD+3, RAND+2, RAND+5
DIRUT	DLMVD+3, DLMVD+4, BD+1, BD+2, ED+1*, ED+2, SC+5, CLN+3, PROV+4, RV+3 , ICD+2!, ICD+4, RAND+3, RAND+6, XIT+3!
DT	ZTSK+2
DTOUT	PROV+7, ICD+2!
>> DUOUT	DLMVD+3, BD+1, ED+1
DUZ(2	START+1, START+2, START+3, DLMVD+1, DLMVD+2
IO	ZTSK+3, TSKMN+2
IO("DOC"	TSKMN+3
IO("Q"	ZIS+2, XIT+3!
IO(0	XIT+2
>> IOCPU	TSKMN+6
IOF	START+4
IOM	TSKMN+4
ION	TSKMN+2
>> IOP	XIT+2*
IOSL	TSKMN+4
IOST	TSKMN+2
POP	ZIS+1, XIT+3!
X	ED+4, SC1+1*, ICD+2!, XIT+3!
>> X1	ED+4*
>> X2	ED+4*
Y	DLMVD+5, BD+3, ED+1, ED+3, SC+6, SC1+1, SC1+2, CLN+4, CLN+7, CLN+8 , PROV+5, PROV+7, PROV+8, RV+4, ICD+2!, ICD+5, RAND+4, RAND+7, XIT+3!
>> ZTCPU	TSKMN+6*
>> ZTDESC	TSKMN+6*
>> ZTDTH	TSKMN+6*
ZTIO	TSKMN+1, TSKMN+2, TSKMN+3, TSKMN+4, XIT+3!
>> ZTQUEUED	ZTSK+5
>> ZTREQ	ZTSK+5*
>> ZTRTN	TSKMN+6*
ZTSAVE	TSKMN+5!
ZTSAVE(	TSKMN+5*
ZTSK	XIT+2, XIT+3!

Customize PDF page

Package: Patient Care Component

Routine: APCDFQAC

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: