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 |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: PRCHT2

Package: IFCAP

Routine: PRCHT2


Information

PRCHT2 ; GENERATED FROM 'PRCHPUSH' INPUT TEMPLATE(#749), FILE 442;10/27/00

Source Information

Source file <PRCHT2.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
VA FileMan 11 ^%DT  ^DIC  E^DIE0  (,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17  Z^DIE2  ^DIE3  (AST,NOSCR)^DIED  QQ^DIEQ  
$$GETTMP^DIKC1  ^DIR  RW^DIR2  
IFCAP 3 (EN1,EN3)^PRCHNPO5  EN1^PRCHNPO6  ^PRCHT21  

Entry Points

Name Comments DBIA/ICR reference
DE
W
O
TR
A
B
RE
N
RD
T
P
V
Z
X
QS
D
Y
PR
R
RP
I
SET
SAVEVALS
NKEY
KEYCHK()
BEGIN
1
X1
2
C2
C2S
X2
3
C3
C3S
X3
4
X4
5
X5
6
C6
C6S
X6
7
X7
8
C8
C8S
X8
9
X9
10
X10
11
C11
C11S
X11
12
13
X13
14
15
X15
16
17
X17
18
X18
19
X19
20

External References

Name Field # of Occurrence
^%DT X3
^DIC X9X19
E^DIE0 I+1, 2+5, 4+4, 5+4
^DIE17 RD
F^DIE17 13478910121314
15161820
FIREREC^DIE17 17101318
M^DIE17 T
N^DIE17 RP2+5, 4+4, 5+4
OUT^DIE17 17101318
UNIQFERR^DIE17 Z
Z^DIE17 X
Z^DIE2 RD+1
^DIE3 T
AST^DIED P
NOSCR^DIED P
QQ^DIEQ QS
$$GETTMP^DIKC1 BEGIN+1
^DIR SET+2
RW^DIR2 O+1
EN1^PRCHNPO5 X11
EN3^PRCHNPO5 X6
EN1^PRCHNPO6 X3
^PRCHT21 20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !?DL+DL-2,DLB_": "
  • Line Location: W+0
Function Call: WRITE
  • Prompt: W
  • Line Location: O+0
Function Call: WRITE
  • Prompt: Y
  • Line Location: O+0
Function Call: WRITE
  • Prompt: !?9
  • Condition for execution: $X>45
  • Line Location: O+0
Function Call: WRITE
  • Prompt: " (No Editing)"
  • Line Location: O+2
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: TR+0
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TR+0
Function Call: WRITE
  • Prompt: " "_X
  • Line Location: RD+2
Function Call: WRITE
  • Prompt: *7,"No Patient Deliveries allowed from Federal Sources."
  • Line Location: X18+0
Routine Call
  • DIC
  • Line Location:
    • X9
    • X19
Routine Call
  • DIR
  • Line Location:
    • SET+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRC(411 - [#411] Classic Fileman Calls
^PRC(442 - [#442] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( TRR+1
^DD("DD" R+2
^DD("KEY" - [#.31] N
^DIE(749 BEGIN+2
^DISV( RD+2, Z*
^PRC(420 - [#420] C11S+4
^PRC(442 - [#442] DEX1C2+2!, C2S+2*, C3+2!, C3S+2*, C6+2!, C6S+2*, C8+2!, C8S+2*
X8C11+2!, C11+4*, C11S+2*, C11S+4*, X11*, X13X19
^PRCD(420.8 - [#420.8] X1X10

Label References

Name Line Occurrences
$$KEYCHK Z
@( BV
A NZYRP12+5, 4+4, 5+4, 710
1213141618
B QS
BEGIN PRCHT2+1
C11S C11
C2S C2
C3S C3
C6S C6
C8S C8
D RDRD+1, P+1, QS
DE PRCHT2+1, 134789101213
14151618
N Y
NKEY N
O YRP
P T
PR REI+1
QS RDNKEY
R RR+1
RD YII+1, 2+6, 4+5, 5+5
RE 3+2, 6+3, 8+2, 11+2, 17+1
RP PRRR+1
SAVEVALS Z
SET T
TR RE
V TP+1
W ORE
X NT+1, PY
X1 1
X10 10
X13 13
X18 18
X7 7
Y 9+4, 15+4, 19+4
Z P+1, 2+6

Naked Globals

Name Field # of Occurrence
^( RD+2, RR+1
^("F" SAVEVALS*
^(0 DE+1, RR+1, X1X10C11S+4
^(1 DE+2, X1X11
^(12.1 T
^(17 C11+4*
^(18 DE+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DE+1*, DE+2*, DE+3*, DE+4*, TR+2*, SET+2*
>> %DT X3*
%Z DE+1*, DE+2*, DE+3, DE+4*, DE+5!
>> D N, D*
>> D0 BEGIN+3*, X19
>> DA DEBEGIN+3, X1C2+2, C2S+2, C3+2, C3S+2, C6+2, C6S+2, C8+2
C8S+2, X8C11+2, C11+4, C11S+2, C11S+4, X11X13
DB DE!, C2!, C2S!, C3!, C3S!, C6!, C6S!, C8!, C8S!, C11!
, C11S!
DB( TPXSETSET+1, 2+5*, 4+4*, 5+4*
>> DC RP
DDER TT+1!, SET+2
DE DE!
DE( O+2, REZYPRRPSAVEVALSSAVEVALS+1, KEYCHK, 2+1*
2+5*, 3+1*, 4+4, 5+4, 6+1*, 8+1*, 11+1*
DE(11 DE+1*, C11C11+1, C11+3
DE(15 DE+2*
DE(17 DE+2*
DE(19 DE+2*
DE(2 DE+1*, C2C2+1
DE(3 DE+2*, C3C3+1
DE(4 DE+2*
DE(5 DE+3*
DE(6 DE+2*, C6C6+1
DE(8 DE+4*, C8C8+1
DE(9 DE+2*
DG DE!, PR*, R*, R+1*, R+2, 13478
91012131415161820
DG( Z*, C2SC2S+1, C3SC3S+1, C6SC6S+1, C8SC8S+1, C11S
C11S+1, C11S+3
DIC DE*, P*, C2+1*, C2S+1*, C3+1*, C3S+1*, C6+1*, C6S+1*, C8+1*, C8S+1*
, X9!*, C11+1*, C11+3*, C11S+1*, C11S+3*, X19*!
DIC("DR" X10!
DIC("S" T, Z!, X9*
DIC(0 P*, 1*, 7*, 10*, 13*, 18*, X19*
>> DICRREC BEGIN+2*
>> DIE DE*, PC2+1, C2S+1, C3+1, C3S+1, C6+1, C6S+1, C8+1, C8S+1
X9C11+1, C11+3, C11S+1, C11S+3
DIEBADK BEGIN+1!
DIEFIRE BEGIN+1!, 17101318
>> DIEL DE*
>> DIEZ BEGIN+3*
DIEZAR BEGIN+1~, BEGIN+2*
DIEZRXR BEGIN+1~
DIEZTMP SAVEVALSSAVEVALS+1, SAVEVALS+2, BEGIN+1~*
>> DIFLD NTDSAVEVALSSAVEVALS+1, SAVEVALS+2, 2*, 3*, 4*, 5*
, 6*, 8*, 9*, 11*, 15*, 17*, 19*
DIIENS SAVEVALSSAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*
DIQUIET SET+1~*
DIR SET~
DIR("V" SET*
DIR(0 SET*
DIXR BEGIN+1~
>> DL DE*, W
DLAYGO P*, Z!
>> DLB WRD+2, ZD, 2*, 3*, 4*, 5*, 6*, 8*
, 9*, 11*, 15*, 17*, 19*
>> DNM BEGIN*
>> DP DE*, NTSAVEVALSSAVEVALS+1, SAVEVALS+2
>> DQ O+2, A*, BRETPP+2, VXD
YPRRPSETSET+1, SAVEVALS, BEGIN*, 1*, 2+5, C2S
C2S+1, 3*, C3SC3S+1, 4*, 4+4, 5+4, C6SC6S+1, 7*
, 8*, C8SC8S+1, 9*, 10*, C11SC11S+1, C11S+3, 12*, 13*
, 14*, 15*, 16*, 18*
DQ( A!, P+2, D*, PR
>> DQ(19 19+1*
DTIME TRBEGIN+3*
>> DTOUT TR*
>> DU DE*, PDPRSET, 2*, 2+2*, 3*, 4*, 4+1*
, 5*, 5+1*, 6*, 6+2*, 8*, 9*, 9+1*, 11*, 15*, 15+1*
, 17*, 19*
DUZ RD+2, Z
>> DV O+1, O+2, NRD+2, TPP+1, ZDY
PRRPI, 2*, 2+5, 3*, 4*, 4+4, 5*, 5+4
, 6*, 8*, 9*, 11*, 15*, 17*, 19*
>> DW ZDSAVEVALS+1, KEYCHK, 1*, 2*, 2+1, 2+5, 3*, 3+1
, 4*, 5*, 6*, 6+1, 7*, 8*, 8+1, 9*, 10*, 11*
11+1, 13*, 15*, 17*, 18*, 19*
>> DZ QS*
>> PRC("APP" X11
>> PRC("FY" X11*
>> PRC("SITE" X11
>> PRCHN("MP" X1*
>> PRCHN("SC" X1*, X79+2, X10*
>> PRCHN("SFC" X1*, X13*
>> PRCHN("SVC" X1*, 15+2
>> PRCHNRQ X1*, X9
>> PRCHPUSH X9
U DE+1, DE+2, DE+3, DE+4, TRPP+2, ZDR
R+1, SETBEGIN+3*, 1X1710X10C11+4, C11S+4
X111213X13141618X19
X O+2*, TR*, NRDRD+1, RD+2*, T, P*, P+1!, P+2*
ZX+1*, QS, Y*, PR*, R*, R+1*, R+2, RP*, I+1
SET+2*, NKEY*, 1*, 2+3*, 2+4, 2+5*, 2+6, C2+1*, C2+2, C2S*
C2S+1*, C2S+2, C3+1*, C3+2, C3S*, C3S+1*, C3S+2, X3*!, 4+2*, 4+3
4+4*, 5+2*, 5+3, 5+4*, C6+1*, C6+2, C6S*, C6S+1*, C6S+2, 7*
C8+1*, C8+2, C8S*, C8S+1*, C8S+2, X8!, X8+1!, 9+2*, 9+3, X9*!
, 10*, X10C11+1*, C11+2, C11+3*, C11S*, C11S+1*, C11S+2, C11S+3*, C11S+4
, X11!, X11+1!, 13*, 15+2*, 15+3, X17!, X17+1!, 18*, X1819+2*
19+3, X19!*
>> Y OO+1, O+2, PY, PR*, R*, R+1*, R+2*, SET+2
, 1*, 2+4*, 2+5, X34+3*, 4+4, 5+3*, 5+4, 7*, X7*
9+3*, X9, 10*, 12*, 13*, 14*, 15+3*, 16*, 18*, X18*
19+3*, X19
>> Y(0 SET+2
YS V!
Z C11S+4*!
Z0 X19*!
>> ZTQUEUED XNKEY

Marked Items

Name Field # of Occurrence
$T(@(3) D
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All