Routine: MCPOS04

Package	Total	Call Graph
VA Fileman	3	^%DT FILE^DICN ^DIE
Kernel	2	^%ZTLOAD MES^XPDUTL
Medicine	1	^MCPOS04A

Entry Points

Name	Comments	DBIA/ICR reference
TASK	;
EXIT	;
MAIN	;

External References

Name	Field # of Occurrence
^%DT	MAIN+50
^%ZTLOAD	MCPOS04+36
FILE^DICN	MAIN+18
^DIE	MAIN+56
^MCPOS04A	MAIN+58
MES^XPDUTL	MCPOS04+19

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Moving the Consult data from the Endoscopy/Consult" Line Location: MCPOS04+22
Function Call: WRITE	Prompt: !,"file (#699) to the Generalized Procedure/Consult" Line Location: MCPOS04+23
Function Call: WRITE	Prompt: !,"file (#699.5)." Line Location: MCPOS04+24
Function Call: WRITE	Prompt: !!,"The CONSULT entry was not found in the" Line Location: MCPOS04+27
Function Call: WRITE	Prompt: !,"PROCEDURE/SPECIALTY file (#697.2), data cannot" Line Location: MCPOS04+28
Function Call: WRITE	Prompt: !,"be converted without this entry being present." Line Location: MCPOS04+29
Function Call: WRITE	Prompt: ! Line Location: MCPOS04+36
Function Call: WRITE	Prompt: !,"Task # ",ZTSK,"." Line Location: MCPOS04+38
Routine Call	DIE Line Location: MAIN+56

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^MCAR(699.5 - [#699.5]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	MAIN+33
^GMR(123 - [#123]	MAIN+36
^MCAR(697.2 - [#697.2]	MCPOS04+3, MCPOS04+4
^MCAR(699 - [#699]	TASK+2, MAIN+3
^MCAR(699.5 - [#699.5]	MAIN+9, MAIN+10
^MCAR(699.82 - [#699.82]	MAIN+32
^OR(100 - [#100]	MAIN+35
^VA(200 - [#200]	MAIN+29, MAIN+40
^XUSEC("PROVIDER"	MAIN+29

Label References

Name	Line Occurrences
EXIT	MCPOS04+6, MCPOS04+21
MAIN	TASK+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	MAIN+50*
DA	MAIN+26!, MAIN+56*
DD	MAIN+15!
DIC	MAIN+15!, MAIN+16*, MAIN+26!
DIC("DR"	MAIN+17*
DIC(0	MAIN+16*
DIE	MAIN+26!, MAIN+56*
DINUM	MAIN+15!
>> DLAYGO	MAIN+16*
DO	MAIN+15!
DR	MAIN+26!, MAIN+27*
DR(1	MAIN+28, MAIN+29, MAIN+30, MAIN+31, MAIN+32, MAIN+33, MAIN+35, MAIN+36, MAIN+53*
>> GMRCO	MAIN+34*, MAIN+36
>> MC	MAIN+10*, MAIN+11
>> MC6995D0	MAIN+8, MAIN+9, MAIN+12, MAIN+14, MAIN+18*, MAIN+21, MAIN+56
>> MC699D0	TASK+1, TASK+2, MAIN+3
>> MCCONTYP	MAIN+23*, MAIN+32
MCDATA	MCPOS04+7!, MCPOS04+19!, MAIN+1!, MAIN+38, MAIN+40, MAIN+42, MAIN+44, MAIN+46, MAIN+47, MAIN+48 , MAIN+49, MAIN+50*, MAIN+51, MAIN+52, MAIN+53
MCDATA(	MAIN+3*, MAIN+22, MAIN+23
MCDATA("ES"	MAIN+38
MCDATA("OR"	MAIN+34
MCDATA("PCC"	MAIN+33
MCDATA("PROV"	MAIN+25
MCDATA(0	MAIN+5, MAIN+6, MAIN+7, MAIN+22, MAIN+24
MCDATA(1	MCPOS04+8*
MCDATA(15	MAIN+23
MCDATA(2	MCPOS04+9*
MCDATA(3	MCPOS04+10*
MCDATA(4	MCPOS04+11*
MCDATA(5	MCPOS04+14*
MCDATA(6	MCPOS04+15*
MCDATA(7	MCPOS04+16*
MCDATA(8	MCPOS04+17*
>> MCDATE	MAIN+6*, MAIN+9, MAIN+18
>> MCDFN	MAIN+6*, MAIN+12, MAIN+17
>> MCDRNUM	MAIN+26, MAIN+28, MAIN+29, MAIN+30, MAIN+31, MAIN+32, MAIN+33, MAIN+35, MAIN+36, MAIN+53 , MAIN+54
>> MCFOUND	MCPOS04+4*, MCPOS04+6, MCPOS04+13, MCPOS04+26
>> MCIEN	MAIN+8, MAIN+9, MAIN+10, MAIN+12
>> MCINDCOM	MAIN+22*, MAIN+28
>> MCNEWDFN	MAIN+11*, MAIN+12
>> MCNEWPRC	MAIN+11*, MAIN+12
>> MCNODE	MAIN+2*, MAIN+3
>> MCONSULT	MCPOS04+3*, MCPOS04+4, TASK+2, MAIN+5
>> MCPIECE	MAIN+37*, MAIN+38, MAIN+40, MAIN+41, MAIN+42, MAIN+44, MAIN+46, MAIN+47, MAIN+48, MAIN+49 , MAIN+50, MAIN+51, MAIN+52, MAIN+53
>> MCPRC	MAIN+7*, MAIN+12, MAIN+17
>> MCPRCSUM	MAIN+23*, MAIN+31
>> MCPROVID	MAIN+24, MAIN+25, MAIN+29
>> MCSLASH	MAIN+39, MAIN+40, MAIN+43*, MAIN+53
>> MCSUMMRY	MAIN+22*, MAIN+30
>> MCVALCOD(	MAIN+42*
>> ORIFN	MAIN+34*, MAIN+35
U	MCPOS04+4, MAIN+5, MAIN+6, MAIN+7, MAIN+11, MAIN+22, MAIN+23, MAIN+24, MAIN+25, MAIN+29 , MAIN+30, MAIN+32, MAIN+33, MAIN+34, MAIN+35, MAIN+36, MAIN+38, MAIN+40, MAIN+41, MAIN+46 , MAIN+51
>> X	MAIN+18, MAIN+50
>> XPDNM	MCPOS04+6, EXIT+1
>> Y	MAIN+18, MAIN+50
>> ZTDESC	MCPOS04+33*
>> ZTIO	MCPOS04+35*
>> ZTQUEUED	EXIT+1
>> ZTREQ	EXIT+1*
>> ZTRTN	MCPOS04+32*
>> ZTSAVE("MCONSULT"	MCPOS04+34*
>> ZTSK	MCPOS04+37, MCPOS04+38

Customize PDF page

Package: Medicine

Routine: MCPOS04

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: