Routine: APCDEFP

Package	Total	Call Graph
Patient Care Component	2	(WVACT,WVBB,WVCPT,WVDXP,WVHF,WVIF,WVMIC,WVNT,WVPED,WVPHN,WVPT,WVRAD,WVSK,WVTRT)^APCDEFP1 (DONE,FOOT,HEAD)^APCDEFU

Package	Total	Caller Graph
Patient Care Component	1	APCDEGPP

Entry Points

Name	Comments	DBIA/ICR reference
WVMED	;-- write out vmed
WVPOV	;-- write out v pov
WVHF	;-- write out v health factors
WVDXP	;-- write out v diagnostic procedure result
WVLAB	;-- write out v lab
WVIMM	;-- write out v immunization
PRT	;-- loop through and write the data
WVCPT	;-- write out v cpt
WVTRT	;-- write out v treatment
WVSK	;-- write out v skin test
WVNT	;-- write out v narrative text
WVBB	;-- write out v blood bank
WVPED	;-- write out v patient education
WVPRC	;-- write out v procedure
WVRAD	;-- write out v radiology
WVEYE	;-- write out v eye
WVACT	;-- write out v activity time
WVPHN	;-- write out v public health nurse
WVDEN	;-- write out v dental
WVPT	;-- write out v physical therapy
WVIF	;-- write out infant feeding
WVXAM	;-- write out v exam
WVMIC	;-- write out v microbiology
WVMSR	;-- write out v measurement
MAIN	;EP -- loop through temp and print out the data

External References

Name	Field # of Occurrence
WVACT^APCDEFP1	WVACT+2
WVBB^APCDEFP1	WVBB+2
WVCPT^APCDEFP1	WVCPT+2
WVDXP^APCDEFP1	WVDXP+2
WVHF^APCDEFP1	WVHF+2
WVIF^APCDEFP1	WVIF+2
WVMIC^APCDEFP1	WVMIC+2
WVNT^APCDEFP1	WVNT+2
WVPED^APCDEFP1	WVPED+2
WVPHN^APCDEFP1	WVPHN+2
WVPT^APCDEFP1	WVPT+2
WVRAD^APCDEFP1	WVRAD+2
WVSK^APCDEFP1	WVSK+2
WVTRT^APCDEFP1	WVTRT+2
DONE^APCDEFU	MAIN+10
FOOT^APCDEFU	MAIN+9
HEAD^APCDEFU	MAIN+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No visit information" Line Location: MAIN+7
Function Call: WRITE	Prompt: !,"Chief Complaint: ",APCDVCC Line Location: PRT+1
Function Call: WRITE	Prompt: !,APCDLN Line Location: PRT+1
Function Call: WRITE	Prompt: !,"Flag: ",APCDVFLG,?40,"Disposition: ",APCDVDP Line Location: PRT+2
Function Call: WRITE	Prompt: !,APCDLN Line Location: PRT+2
Function Call: WRITE	Prompt: !,"Measurements",! Line Location: WVMSR+3
Function Call: WRITE	Prompt: !?3,APCDTA_":"_$P($G(APCDMSR(APCDIEN)),U,2) Line Location: WVMSR+6
Function Call: WRITE	Prompt: ! Line Location: WVMSR+8
Function Call: WRITE	Prompt: ?APCDPC,APCDTA_": "_$S($L(APCDTA)=2:" ",1:"")_$P($G(APCDMSR(APCDIEN)),U,2) Line Location: WVMSR+9
Function Call: WRITE	Prompt: " ",P Line Location: WVMSR+9
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVMSR+13
Function Call: WRITE	Prompt: !,"Examinations",! Line Location: WVXAM+2
Function Call: WRITE	Prompt: !?3,APCDTA Line Location: WVXAM+4
Function Call: WRITE	Prompt: ?35,"result: ",APCDXAM(APCDTA) Line Location: WVXAM+5
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVXAM+7
Function Call: WRITE	Prompt: !,"Purpose of Visit",! Line Location: WVPOV+2
Function Call: WRITE	Prompt: !?3,$P(APCDPOV(APCDTA),U,2),?60,$P($G(APCDPOV(APCDTA)),U,1) Line Location: WVPOV+4
Function Call: WRITE	Prompt: !?5,"Stage: ",$P(APCDPOV(APCDTA),U,3) Line Location: WVPOV+5
Function Call: WRITE	Prompt: !?5,"Modifier: ",$P(APCDPOV(APCDTA),U,4),?45,"Cause of DX: ",$P(APCDPOV(APCDTA),U,5) Line Location: WVPOV+6
Function Call: WRITE	Prompt: !?5,"E Code: ",$P(APCDPOV(APCDTA),U,6),?30,"Cause: ",$P(APCDPOV(APCDTA),U,9),?60,"Cause: ",$P(APCDPOV(APCDTA),U,10) Line Location: WVPOV+7
Function Call: WRITE	Prompt: !?5,"Place of Occurrence: ",$P(APCDPOV(APCDTA),U,11),?45,"Date of Injury: ",$P(APCDPOV(APCDTA),U,8) Line Location: WVPOV+8
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVPOV+10
Function Call: WRITE	Prompt: !,"Medications Prescribed",?30,"Sig",?68,"Qty",?76,"Days",! Line Location: WVMED+2
Function Call: WRITE	Prompt: !,$E(APCDTA,1,28),?30,$E(APCDTSIG,1,35),?68,APCDTQTY,?76,APCDTDP Line Location: WVMED+7
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVMED+9
Function Call: WRITE	Prompt: !,"Eye Glass",! Line Location: WVEYE+2
Function Call: WRITE	Prompt: !,"Reading Only: ",APCDRO Line Location: WVEYE+3
Function Call: WRITE	Prompt: ?22,"DRE Sphere: ",APCDRES Line Location: WVEYE+4
Function Call: WRITE	Prompt: ?43,"DRE Cylinder: ",APCDREC Line Location: WVEYE+5
Function Call: WRITE	Prompt: ?58,"DRE Axis: ",APCDREA Line Location: WVEYE+6
Function Call: WRITE	Prompt: !,"DLE Sphere: ",APCDLES Line Location: WVEYE+7
Function Call: WRITE	Prompt: ?22,"DLE Cylinder: ",APCDLEC Line Location: WVEYE+8
Function Call: WRITE	Prompt: ?43,"DLE Axis: ",APCDLEA Line Location: WVEYE+9
Function Call: WRITE	Prompt: ?58,"Reading Add R: ",APCDRAR Line Location: WVEYE+10
Function Call: WRITE	Prompt: !,"Reading Add L: ",APCDRAL Line Location: WVEYE+11
Function Call: WRITE	Prompt: ?22,"Eye Size: ",APCDES Line Location: WVEYE+12
Function Call: WRITE	Prompt: ?43,"Bridge: ",APCDBR Line Location: WVEYE+13
Function Call: WRITE	Prompt: ?58,"Temple: ",APCDTM Line Location: WVEYE+14
Function Call: WRITE	Prompt: !,"Pupil Distance Near: ",APCDPDN Line Location: WVEYE+15
Function Call: WRITE	Prompt: ?30,"Pupil Distance Far: ",APCDPDF Line Location: WVEYE+16
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVEYE+19
Function Call: WRITE	Prompt: !,"Dental",! Line Location: WVDEN+2
Function Call: WRITE	Prompt: !,"Ada Code: ",APCDTA Line Location: WVDEN+7
Function Call: WRITE	Prompt: ?20,"Number of Units: ",APCDTNOU Line Location: WVDEN+8
Function Call: WRITE	Prompt: !,"Operative Site: ",APCDTOS Line Location: WVDEN+9
Function Call: WRITE	Prompt: ?55,"Tooth Surface: ",APCDTDTS Line Location: WVDEN+10
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVDEN+12
Function Call: WRITE	Prompt: !,"Procedures",! Line Location: WVPRC+2
Function Call: WRITE	Prompt: !,"Procedure: ",APCDTA Line Location: WVPRC+6
Function Call: WRITE	Prompt: ?51,"Procedure Date: ",APCDTPDT Line Location: WVPRC+7
Function Call: WRITE	Prompt: !,"Provider Narrative: ",APCDTPRN Line Location: WVPRC+8
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVPRC+10
Function Call: WRITE	Prompt: !,"Laboratory Tests",! Line Location: WVLAB+2
Function Call: WRITE	Prompt: !,"Lab Test: ",APCDTA Line Location: WVLAB+6
Function Call: WRITE	Prompt: ?50,"Result: ",APCDTRES Line Location: WVLAB+7
Function Call: WRITE	Prompt: ?70,$S($G(APCDTABN):"Abnormal",1:"") Line Location: WVLAB+8
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVLAB+10
Function Call: WRITE	Prompt: !,"Immunizations",! Line Location: WVIMM+2
Function Call: WRITE	Prompt: !?3,"Immunization: ",APCDTA Line Location: WVIMM+11
Function Call: WRITE	Prompt: ?60,"Series: ",APCDTSER Line Location: WVIMM+12
Function Call: WRITE	Prompt: !?3,"Lot: ",APCDTLOT,?30,"Reaction: ",APCDTREA Line Location: WVIMM+13
Function Call: WRITE	Prompt: !?3,"Dose Override: ",APCDDOSE,?40,"Injection Site: ",APCDINJ Line Location: WVIMM+15
Function Call: WRITE	Prompt: !?3,"Volume: ",APCDVOL Line Location: WVIMM+17
Function Call: WRITE	Prompt: ?20,"Date of Vaccine Information Statement: ",APCDVDAT Line Location: WVIMM+17
Function Call: WRITE	Prompt: !,APCDLN Line Location: WVIMM+19

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^XTMP(	MAIN+7

Label References

Name	Line Occurrences
@(	PRT+8
PRT	MAIN+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCDABN	WVLAB+9!
APCDADA	WVDEN+11!
>> APCDATMP	PRT+4, PRT+5
APCDBR	WVEYE+13, WVEYE+18!
>> APCDC	WVMSR+2, WVMSR+6, WVMSR+7, WVMSR+8, WVMSR+11
>> APCDDEN(	WVDEN+3, WVDEN+4, WVDEN+5, WVDEN+6
APCDDOSE	WVIMM+7*, WVIMM+14, WVIMM+15, WVIMM+18!
APCDDP	WVMED+8!
APCDES	WVEYE+12, WVEYE+18!
>> APCDFF	MAIN+5*, WVMSR+1, WVXAM+1, WVPOV+1, WVMED+1, WVEYE+1, WVDEN+1, WVPRC+1, WVLAB+1, WVIMM+1 , WVSK+1, WVTRT+1, WVPED+1, WVPT+1, WVACT+1, WVDXP+1, WVRAD+1, WVHF+1, WVMIC+1, WVBB+1 , WVPHN+1, WVNT+1, WVCPT+1, WVIF+1
>> APCDH	MAIN+7
>> APCDIEN	WVMSR+4*, WVMSR+5, WVMSR+6, WVMSR+9
APCDIMM	WVIMM+18!
APCDIMM(	WVIMM+3, WVIMM+4, WVIMM+5, WVIMM+6, WVIMM+7, WVIMM+8, WVIMM+9, WVIMM+10
APCDINJ	WVIMM+8*, WVIMM+14, WVIMM+15, WVIMM+18!
>> APCDIOSL	MAIN+1*
>> APCDJ	MAIN+7
APCDLAB	WVLAB+9!
APCDLAB(	WVLAB+3, WVLAB+4, WVLAB+5
APCDLEA	WVEYE+9, WVEYE+17!
APCDLEC	WVEYE+8, WVEYE+17!
APCDLES	WVEYE+7, WVEYE+17!
>> APCDLN	MAIN+2*, PRT+1, PRT+2, WVMSR+13, WVXAM+7, WVPOV+10, WVMED+9, WVEYE+19, WVDEN+12, WVPRC+10 , WVLAB+10, WVIMM+19
APCDLOT	WVIMM+18!
APCDMED	WVMED+8!
APCDMED(	WVMED+3, WVMED+4, WVMED+5, WVMED+6
APCDMSR	WVMSR+12!
APCDMSR(	WVMSR+4, WVMSR+5, WVMSR+6, WVMSR+9
APCDNOU	WVDEN+11!
APCDOS	WVDEN+11!
>> APCDP	PRT+6*, PRT+8
APCDPC	WVMSR+2, WVMSR+6, WVMSR+9, WVMSR+10, WVMSR+11, WVMSR+12!
>> APCDPDA	PRT+4*, PRT+5
APCDPDF	WVEYE+16, WVEYE+18!
>> APCDPDFN	PRT+5*, PRT+6
APCDPDN	WVEYE+15, WVEYE+18!
APCDPDT	WVPRC+9!
APCDPOV	WVPOV+9!
APCDPOV(	WVPOV+3, WVPOV+4, WVPOV+5, WVPOV+6, WVPOV+7, WVPOV+8
APCDPRC	WVPRC+9!
APCDPRC(	WVPRC+3, WVPRC+4, WVPRC+5
APCDPRN	WVPRC+9!
>> APCDQ	PRT+4, PRT+5, PRT+9
APCDQTY	WVMED+8!
APCDRAL	WVEYE+11, WVEYE+18!
APCDRAR	WVEYE+10, WVEYE+17!
APCDREA	WVEYE+6, WVEYE+17!, WVIMM+18!
APCDREC	WVEYE+5, WVEYE+17!
APCDRES	WVEYE+4, WVEYE+17!, WVLAB+9!
APCDRO	WVEYE+3, WVEYE+17!
APCDSER	WVIMM+18!
APCDSIG	WVMED+8!
APCDT	WVMSR+12!, WVXAM+6!
APCDTA	WVMSR+5, WVMSR+6, WVMSR+9, WVXAM+3, WVXAM+4, WVXAM+5, WVPOV+3, WVPOV+4, WVPOV+5, WVPOV+6 , WVPOV+7, WVPOV+8, WVPOV+9!, WVMED+3, WVMED+4, WVMED+5, WVMED+6, WVMED+7, WVMED+8!, WVDEN+3* , WVDEN+4, WVDEN+5, WVDEN+6, WVDEN+7, WVDEN+11!, WVPRC+3, WVPRC+4, WVPRC+5, WVPRC+6, WVPRC+9! , WVLAB+3, WVLAB+4, WVLAB+5, WVLAB+6, WVLAB+9!, WVIMM+3*, WVIMM+4, WVIMM+5, WVIMM+6, WVIMM+7 , WVIMM+8, WVIMM+9, WVIMM+10, WVIMM+11, WVIMM+18!
APCDTABN	WVLAB+5*, WVLAB+8, WVLAB+9!
APCDTDP	WVMED+6*, WVMED+7, WVMED+8!
APCDTDTS	WVDEN+6*, WVDEN+10, WVDEN+11!
APCDTLOT	WVIMM+5*, WVIMM+13, WVIMM+18!
APCDTM	WVEYE+14, WVEYE+18!
APCDTNOU	WVDEN+4*, WVDEN+8, WVDEN+11!
APCDTOS	WVDEN+5*, WVDEN+9, WVDEN+11!
APCDTPDT	WVPRC+5*, WVPRC+7, WVPRC+9!
APCDTPRN	WVPRC+4*, WVPRC+8, WVPRC+9!
APCDTQTY	WVMED+5*, WVMED+7, WVMED+8!
APCDTREA	WVIMM+6*, WVIMM+13, WVIMM+18!
APCDTRES	WVLAB+4*, WVLAB+7, WVLAB+9!
APCDTS	WVDEN+11!
APCDTSER	WVIMM+4*, WVIMM+12, WVIMM+18!
APCDTSIG	WVMED+4*, WVMED+7, WVMED+8!
APCDV	WVMSR+12!, WVXAM+6!
>> APCDVCC	PRT+1
APCDVDAT	WVIMM+10*, WVIMM+16, WVIMM+17, WVIMM+18!
>> APCDVDP	PRT+2
>> APCDVFLG	PRT+2
APCDVOL	WVIMM+9*, WVIMM+16, WVIMM+17, WVIMM+18!
APCDXAM	WVXAM+6!
APCDXAM(	WVXAM+3, WVXAM+5
>> APCLSTAR	MAIN+3*
>> APCLUS	MAIN+4*
>> I	WVMSR+9*
IOSL	MAIN+1
>> J	WVMSR+9*
>> P	WVMSR+9*
U	WVMSR+5, WVMSR+6, WVMSR+9, WVPOV+4, WVPOV+5, WVPOV+6, WVPOV+7, WVPOV+8, WVMED+4, WVMED+5 , WVMED+6, WVDEN+4, WVDEN+5, WVDEN+6, WVPRC+4, WVPRC+5, WVLAB+4, WVLAB+5, WVIMM+4, WVIMM+5 , WVIMM+6, WVIMM+7, WVIMM+8, WVIMM+9, WVIMM+10

Customize PDF page

Package: Patient Care Component

Routine: APCDEFP

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items