Routine: SCRPW24

Information

SCRPW24 ;RENO/KEITH - ACRP Ad Hoc Report (cont.) ;06/19/99

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
Scheduling	5	(APAC,APAP,APEM,APOTR)^SCRPW241 $$STX^SCRPW8 CLASK^SDCO2 (GETDX,GETGEN)^SDOE ($$OUTPTPR,$$OUTPTTM)^SDUTL3
VA Fileman	4	^%DTC FIELD^DID $$EXTERNAL^DILFD GETS^DIQ
DRG Grouper	1	$$ICDDX^ICDCODE
Kernel	1	$$NOW^XLFDT
Registration	1	(ADD,DEM)^VADPT

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Scheduling	4	SCRPO2 SCRPW26 SCRPW43 SCRPW59

Entry Points

Name	Comments	DBIA/ICR reference
PCPR(SDX,SDZ)	;Get primary care provider
FST(SDX,SDFI,SDFE)	;Field set transform
OECL(SDX,SDZ)	;Get classification values
CLCS(SDX)	;Get clinic service
CLCN(SDX)	;Get clinic name
ENEP(SDX,SDZ)	;Get enrollment priority
OEES(SDX)	;Get encounter status
DXAD(SDX)	;Get all diagnoses
OEOP(SDX)	;Get encounter originating process type
NX
DXGSQ(SDI)	;Set up GAF help text
PCTM(SDX,SDZ)	;Get priamry care team
DXSD(SDX)	;Get secondary diagnoses
DXPD(SDX)	;Get primary diagnosis
TSQ(DIR)	;Set up DIR array for transmission status question
CLCG(SDX)	;Get clinic group
APAP(SDX)	;Get ambulatory procedures (no E&M codes)
PDPA(SDX)	;Get patient age
OETS(SDX)	;Get transmission status
APEM(SDX)	;Get evaluation and management codes
ENSE(SDX,SDZ)	;Get enrollment source of enrollment
SUQ(DIR)	;Set up DIR() array for Scheduled/unscheduled question
OEOU(SDX)	;Get option used to create
ENES(SDX,SDZ)	;Get enrollment status
OEEE(SDX)	;Get encounter eligibility
ENROL(SDATE)
ENED(SDX,SDZ)	;Get enrollment date
CLQ(DIR,SDZ)	;Set up DIR array for classification questions
PDZC(SDX)	;Get patient zip code
OEDV(SDX)	;Get encounter division
PDPS(SDX)	;Get patient sex
APAC(SDX)	;Get all procedure codes
OEAT(SDX)	;Get encounter appointment type
OESU(SDX)	;Get scheduled/unscheduled status
ENFR(SDX,SDZ)	;Get enrollment facility received
DXOTR	;Transform diagnosis external value
OEPA(SDX)	;Get encounter patient
ENQ(SDZ)	;Set up help text for enrollment
APOTR	;Transform procedure external value
DXGS(SDX,SDZ)	;Get GAF score
ENEF(SDX,SDZ)	;Get enrollment effective date
PDSC(SDX)	;Get patient state/county

External References

Name	Field # of Occurrence
^%DTC	ENROL+6
FIELD^DID	FST+1
$$EXTERNAL^DILFD	ENES+1
GETS^DIQ	OEOU+2
$$ICDDX^ICDCODE	DXAD+1, DXOTR+9, DXPD+2, DXSD+2
APAC^SCRPW241	APAC+1
APAP^SCRPW241	APAP+1
APEM^SCRPW241	APEM+1
APOTR^SCRPW241	APOTR+1
$$STX^SCRPW8	OETS+1
CLASK^SDCO2	OECL+1
GETDX^SDOE	DXAD+1, DXPD+2, DXSD+2
GETGEN^SDOE	DXOTR+6
$$OUTPTPR^SDUTL3	PCPR+2
$$OUTPTTM^SDUTL3	PCTM+2
ADD^VADPT	PDSC+1, PDZC+1
DEM^VADPT	OEPA+1, PDPA+1, PDPS+1
$$NOW^XLFDT	DXOTR+4

FileNo	Call Tags
^DIC(19 - [#19]	GETS^DIQ
^DGEN(27.11 - [#27.11]	EXTERNAL^DILFD

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	OEOU+1
^DD("DD"	ENED+1, ENEF+1
^DG(40.8 - [#40.8]	OEDV+1
^DGEN(27.11 - [#27.11]	ENROL+3, ENROL+4, ENROL+5
^DIC(4 - [#4]	ENFR+1
^DIC(8 - [#8]	OEEE+1
^DPT - [#2]	OESU+3
^SC - [#44]	CLCG+1, CLCN+1, CLCS+1
^SD(409.1 - [#409.1]	OEAT+1
^SD(409.63 - [#409.63]	OEES+1
^SD(409.67 - [#409.67]	CLCG+1
^YSD(627.8	DXGS+1, DXGS+2

Label References

Name	Line Occurrences
$$ENROL	ENED+1, ENEF+1, ENEP+1, ENES+1, ENFR+1, ENSE+1
DXOTR	DXAD+1, DXPD+2, DXSD+2
FST	CLCS+1, ENEP+1, ENSE+1, OEOP+1
NX	APAC+2, APAP+2, APEM+2, CLCG+2, CLCN+2, CLCS+2, DXAD+2, DXGS+3, DXPD+3, DXSD+3 , ENED+2, ENEF+2, ENEP+2, ENES+2, ENFR+2, ENSE+2, OEAT+2, OEDV+2, OEEE+2, OEOP+2 , OEPA+2, OEES+2, OECL+2, OEOU+4, PCPR+3, PCTM+3, PDPA+2, PDPS+2, PDSC+2, PDZC+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%Y	ENROL+2~
>> DFN	OEPA+1, PDPA+1, PDPS+1, PDSC+1, PDZC+1*
DIR	TSQ~, TSQ+1!, CLQ~, CLQ+1!, SUQ~, SUQ+1!
DIR("?"	TSQ+1, CLQ+2, SUQ+1, SUQ+2
DIR("A"	TSQ+1, CLQ+2, SUQ+1*
DIR(0	TSQ+2, CLQ+2, SUQ+2*
DT	DXGS+1, ENED+1, ENEF+1, ENEP+1, ENES+1, ENFR+1, ENSE+1
ENCDT	DXOTR+1~, DXOTR+2, DXOTR+3, DXOTR+4, DXOTR+7*, DXOTR+9
SDAP0	OESU+1~, OESU+3*, OESU+4
SDATE	ENROL~, ENROL+3*, ENROL+6
SDFE	FST~, FST+1
SDFI	FST~, FST+1
SDI	DXAD+1~, DXGS+1~, DXGS+2, DXGSQ~, DXGSQ+2, DXGSQ+3, DXPD+2~, DXSD+2~, ENROL+2~, ENROL+3* , ENROL+4, ENROL+5, ENROL+6, FST+1~
>> SDIRQ("?"	DXGSQ+1, DXGSQ+2, DXGSQ+3, ENQ+1, ENQ+2*
>> SDOE	DXAD+1, DXOTR+4, DXOTR+6, DXPD+2, DXSD+2, OETS+1, OECL+1, OESU+4
>> SDOE0	CLCG+1, CLCN+1, CLCS+1, DXAD+1, DXOTR+2, DXGS+1, DXGS+2, DXPD+2, DXSD+2, ENED+1 , ENEF+1, ENEP+1, ENES+1, ENFR+1, ENSE+1, OEAT+1, OEDV+1, OEEE+1, OEOP+1, OEPA+1 , OEES+1, OETS+1, OEOU+1, OESU+2, OESU+3, PCPR+2, PCTM+2, PDPA+1, PDPS+1, PDSC+1 , PDZC+1, ENROL+3, ENROL+6
SDX	APAC~, APAC+1, APOTR+1, APAP~, APAP+1, APEM~, APEM+1, CLCG~, CLCG+1!, CLCN~ , CLCN+1!, CLCS~, CLCS+1!, DXAD~, DXAD+1!, DXOTR+9, DXGS~, DXGS+1!, DXGS+2, DXPD~ , DXPD+2!, DXSD~, DXSD+2!, ENED~, ENED+1!, ENEF~, ENEF+1!, ENEP~, ENEP+1!, ENES~ , ENES+1!, ENFR~, ENFR+1!, ENSE~, ENSE+1!, OEAT~, OEAT+1!, OEDV~, OEDV+1!, OEEE~ , OEEE+1!, OEOP~, OEOP+1!, OEPA~, OEPA+1!, OEES~, OEES+1!, OETS~, OETS+1!, OECL~ , OECL+1!, OEOU~, OEOU+1!, OEOU+2, OEOU+3, OESU~, OESU+1!, PCPR~, PCPR+2!, PCTM~ , PCTM+2!, PDPA~, PDPA+1!, PDPS~, PDPS+1!, PDSC~, PDSC+1!, PDZC~, PDZC+1!, NX , FST~, FST+1*
SDX(	DXAD+1, DXPD+2, DXSD+2*
SDX(1	CLCG+1, CLCN+1, CLCS+1, DXGS+2, ENED+1, ENEF+1, ENEP+1, ENES+1, ENFR+1, ENSE+1 , OEAT+1, OEDV+1, OEEE+1, OEOP+1, OEPA+1, OEES+1, OETS+1, OECL+1, OEOU+3, OESU+1 , OESU+2, OESU+5, OESU+6, PCPR+2, PCTM+2, PDPA+1, PDPS+1, PDSC+1, PDZC+1, NX*
SDY	DXAD+1~, DXOTR+5~, DXOTR+8!, DXGS+1~, DXGS+2, DXPD+2~, DXSD+2~, ENED+1~, ENEF+1~, ENEP+1~ , ENES+1~, ENFR+1~, ENSE+1~, OECL+1~, OEOU+2~, ENROL+2~, ENROL+5, FST+1~*
SDY(	DXAD+1, DXPD+2, DXSD+2, OECL+1, ENROL+5*, ENROL+6
SDY("POINTER"	FST+1
SDY(0	DXOTR+7
SDY(19	OEOU+3
SDZ	DXGS~, DXGS+1, ENED~, ENED+1, ENEF~, ENEF+1, ENEP~, ENEP+1, ENES~, ENES+1 , ENFR~, ENFR+1, ENSE~, ENSE+1, ENQ~, ENQ+1, ENQ+2, CLQ~, CLQ+1, CLQ+2 , OECL~, OECL+1, PCPR~, PCPR+2, PCTM~, PCTM+2
U	CLCG+1, CLCN+1, CLCS+1, DXAD+1, DXOTR+9, DXGS+1, DXGS+2, DXPD+2, DXSD+2, ENED+1 , ENEF+1, ENEP+1, ENES+1, ENFR+1, ENSE+1, OEAT+1, OEDV+1, OEEE+1, OEOP+1, OEPA+1 , OEES+1, OECL+1, OEOU+1, OEOU+3, OESU+2, OESU+3, OESU+4, PCPR+2, PCTM+2, PDPA+1 , PDPS+1, PDSC+1, PDZC+1, ENROL+3, ENROL+5, ENROL+6, FST+1
>> VADM(1	OEPA+1
>> VADM(4	PDPA+1
>> VADM(5	PDPS+1
>> VAPA(5	PDSC+1
>> VAPA(6	PDZC+1
>> VAPA(7	PDSC+1
X	ENROL+2~
X1	ENROL+2~, ENROL+6*
X2	ENROL+2~, ENROL+6*
>> Y	ENED+1, ENEF+1

Customize PDF page

Package: Scheduling

Routine: SCRPW24

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: