Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Call Graph | Entry Points | External References | Interaction Calls | FileMan Files Accessed Via FileMan Db Call | Global Variables Directly Accessed | Label References | Local Variables | All

Print Page as PDF

Routine: ORPKFIX

Package: Order Entry Results Reporting

Routine: ORPKFIX

Information

ORPKFIX ;HISC/JFR - FIX BAD PACKAGE POINTERS IN ^OR(100 11/7/95 10:00

Source Information

Source file <ORPKFIX.m>

Call Graph

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
VA FileMan	3	^DIC DT^DICRW ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
EN
DEVICE	;PRINT THE REPORT IF YOU WANT
QUIT
PRT	;SHOW THE OUTPUT
PAGE	;NEW PAGE
QUE	;QUE THE OUTPUT

External References

Name	Field # of Occurrence
^%ZIS	DEVICE+5
HOME^%ZIS	QUE+6
^%ZISC	QUIT
^%ZTLOAD	QUE+3
^DIC	EN+15, EN+16
DT^DICRW	EN
^DIR	DEVICE+3, PAGE+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"I'll check your ORDER file for bad PACKAGE file pointers.",! Line Location: EN+6
Function Call: WRITE	Prompt: !!,"Finished" Line Location: EN+18
Function Call: WRITE	Prompt: !!,ORCNT," Orders have been fixed." Line Location: EN+19
Function Call: WRITE	Prompt: !!,"You can print a list of corrections if you wish.",! Line Location: DEVICE+1
Function Call: WRITE	Prompt: !!,"You have ",ORCNT," corrections, you may want to send output to a printer!",! Line Location: DEVICE+4
Function Call: WRITE	Prompt: !,"No corrections made" Line Location: PRT+3
Function Call: WRITE	Prompt: !,"Order ",$P(ORNODE,"^")," repointed from ",$E($P(ORNODE,"^",2),1,20)," to ",$E($P(ORNODE,"^",3),1,20) Line Location: PRT+7
Function Call: WRITE	Prompt: ! Line Location: PAGE+1
Function Call: WRITE	Prompt: @IOF,"Corrections from OR2.537 ORPKFIX",?65,"Page: ",ORPAGE Line Location: PAGE+2
Function Call: WRITE	Prompt: ! Line Location: PAGE+3
Function Call: WRITE	Prompt: "-" Line Location: PAGE+3
Function Call: WRITE	Prompt: !!,"Report cancelled!",! Line Location: QUE+4
Function Call: WRITE	Prompt: !,"Report queued!" Line Location: QUE+5
Routine Call	%ZIS Line Location: DEVICE+5
Routine Call	%ZIS Line Location: QUE+6
Routine Call	DIC Line Location: EN+15 EN+16
Routine Call	DIR Line Location: DEVICE+3 PAGE+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^OR(100 - [#100]	EN+7, EN+9, EN+10, EN+11, EN+14*
^ORD(101 - [#101]	EN+10
^TMP("ORPKFIX"	EN+1, EN+17*, QUIT!, PRT+3, PRT+4, PRT+5, PRT+6

Label References

Name	Line Occurrences
PAGE	PRT+2, PRT+5
PRT	DEVICE+7
QUE	DEVICE+6
QUIT	DEVICE+3, DEVICE+5, DEVICE+6, PRT+3, PRT+4, PRT+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DEVICE+5*, QUIT!
DASH	PAGE+3*, PAGE+4!
DIC	EN+15, EN+16, EN+20!
DIC(0	EN+15, EN+16
DIR	DEVICE+3!, QUIT!, PAGE+4!
DIR("A"	DEVICE+2*
DIR("B"	DEVICE+2*
DIR(0	DEVICE+2, PAGE+1
DIROUT	QUIT!
DIRUT	DEVICE+3, QUIT!
IO	DEVICE+7
IO("Q"	DEVICE+6
IOF	PAGE+2
IOSL	PRT+5
IOST	PAGE+1
ORCNT	EN+7, EN+13, EN+19, DEVICE+4, QUIT!
ORDPK	EN+10, EN+12, EN+15, EN+17, EN+20!
ORJOB	QUIT!, PRT+4*, PRT+5, PRT+6
ORNODE	QUIT!, PRT+6*, PRT+7
ORNUM	QUIT!, PRT+5*, PRT+6
ORPAGE	QUIT!, PRT+2, PRT+4, PRT+5, PAGE+1!, PAGE+2
ORPROT	EN+9*, EN+10, EN+20!
ORPROTPK	EN+10, EN+12, EN+14, EN+16, EN+17, EN+20!
ORREC	EN+7*, EN+9, EN+10, EN+11, EN+14, EN+17, EN+20!
ORRECNT	EN+7, EN+8, EN+20!
POP	DEVICE+5, QUIT!
X	EN+15, EN+16, EN+20!
Y	EN+15, EN+16, EN+20!, DEVICE+3!, QUIT!, PAGE+1
ZTDESC	QUE+1*, QUE+7!
ZTQUEUED	QUIT!, PRT+1
ZTREQ	QUIT!, PRT+1*
ZTRTN	QUE+1*, QUE+7!
ZTSAVE	QUE+7!
ZTSAVE("^TMP(""ORPKFIX"","	QUE+2*
ZTSK	QUE+4, QUE+7!

Info | Source | Call Graph | Entry Points | External References | Interaction Calls | FileMan Files Accessed Via FileMan Db Call | Global Variables Directly Accessed | Label References | Local Variables | All