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 |  Caller 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: AZHLSCFV

Package: Local Area Programs

Routine: AZHLSCFV


Information

AZHLSCFV ; IHS/ADC/GTH:KEU - DSM QABLE FIELD VERIFIER ;

Source Information

Source file <AZHLSCFV.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 ^DIC  ALL^DIV  ^DIVR  
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
Local Area Programs 1 (BEG,FIN)^AZHLSC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Local Area Programs 1 AZHLSC  

Entry Points

Name Comments DBIA/ICR reference
Q
QEND ;EP - If error, probable for NODEV at Q+1^DIVR.
START ;EP - From TaskMan.
DIC
1
0
DEVICE
DEVEND

External References

Name Field # of Occurrence
^%ZIS DEVICE, DEVICE+4
HOME^%ZIS DEVICE+6
^%ZTLOAD DEVICE+6
BEG^AZHLSC START+2
FIN^AZHLSC QEND+2
^DIC 0+1, DIC+4
ALL^DIV DIC+3
^DIVR 1+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!!?4,$P($P($T(@"AZHLSCFV"),";",2),"-",2)," v ",$P($T(@"AZHLSCFV"+1),";",3),!
  • Line Location: 0+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: 0+1
Function Call: WRITE
  • Prompt: *7," NO ENTRIES ON FILE!"
  • Line Location: 0+5
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: DIC+2
Function Call: WRITE
  • Prompt: !,"VERIFY WHICH "_$P(^DD(A,0),U)_": "
  • Line Location: DIC+2
Function Call: WRITE
  • Prompt: !!,"Report will be QUEUE'd if device other than HOME selected.",!
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !,*7,"No device specified."
  • Line Location: DEVICE+0
Function Call: WRITE
  • Prompt: !,"Can't Q to home device."
  • Line Location: DEVICE+2
Function Call: WRITE
  • Prompt: !!,"Report being QUEUE'd to run now for you."
  • Line Location: DEVICE+3
Function Call: WRITE
  • Prompt: !!,"<<<<<<< DSM QABLE FIELD VERIFIER >>>>>>>",!,"File : ",AZHLNMSP," (",$S($D(^DIC(A,0,"GL")):^("GL"),1:A),")",!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !!,"--",$P(Y(0),U),"--"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: I
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: W
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: " ",W
  • Line Location: 1+1
Function Call: WRITE
  • Prompt: !!!,"<< DSM QABLE FIELD VERIFIER >>"
  • Line Location: QEND+2
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+6
Routine Call
  • DIC
  • Line Location:
    • 0+1
    • DIC+4
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE
    • DEVICE+4

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TRAP" START+1, QEND+1
^DD( DIC+2, START+3, START+4
^DIC - [#1] 0+1, START+2
^UTILITY("DIVR" DIC+4!

Label References

Name Line Occurrences
0 QEND+5
1 START+3
DEVICE DIC+3, DEVICE+2
DIC DIC+5, DIC+6
Q 0+1, DIC+3, DEVICE, DEVEND, QEND+4
QEND START+3
START DEVICE+4

Naked Globals

Name Field # of Occurrence
^( START+3
^("GL" START+2
^(0 0+1, 0+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS DEVICE!*
%ZIS("B" DEVICE*
A AZHLSCFV+3~, 0+1*, DIC+2, DIC+6*, START+2, START+3, START+4
AZHLFLDS AZHLSCFV+3~, DIC+3*, DIC+7*, START+3, START+4, 1+4
AZHLNMSP AZHLSCFV+3~, 0+1*, DEVICE+5, START+2
B AZHLSCFV+3~
C AZHLSCFV+3~, Q!
D AZHLSCFV+3~
D0 AZHLSCFV+3~
DA AZHLSCFV+3~, 1+2!*
DDC AZHLSCFV+3~, 1+2*
DE AZHLSCFV+3~
DG AZHLSCFV+3~
DIC AZHLSCFV+3~, 0+1*, DIC*
DIC("S" DIC+1*
DIC("W" DIC*
DIC(0 0+1*, DIC*
DIFLD AZHLSCFV+3~, 1+2*
DIR AZHLSCFV+3~, Q!
DIRUT AZHLSCFV+3~, DIC+3, Q!
DISYS AZHLSCFV+3~
DIU AZHLSCFV+3~, 0+1*, 0+4
DQ AZHLSCFV+3~
DQI AZHLSCFV+3~, DIC+4!, START+3*
DR AZHLSCFV+3~, DIC+6*, START+3*, 1
DTIME AZHLSCFV+5*, DIC+2
E AZHLSCFV+3~
F AZHLSCFV+3~
G AZHLSCFV+3~
I AZHLSCFV+3~
I( DIC+6*
I(0 0+4*
IO DEVICE+2, DEVICE+3, START+2
IO("DOC" DEVICE+1
IO("Q" DEVICE+2!, DEVICE+3*, DEVICE+4, DEVICE+6!
IO(0 DEVICE+2, DEVICE+3
IOM DEVICE+1
ION DEVICE+1
IOP DEVICE!, DEVICE+1*, DEVICE+5, DEVEND!
IOSL DEVICE+1
IOST DEVICE+1, DEVICE+2
J AZHLSCFV+3~, 0+3!
J( DIC+6*
L AZHLSCFV+3~
N AZHLSCFV+3~, Q!
P AZHLSCFV+3~, 0+4*, DIC+6*, Q!
>> POP DEVICE
Q AZHLSCFV+3~, 0+4*, DIC+6, Q!
S AZHLSCFV+3~, 0+4*, DIC+6, Q!
T AZHLSCFV+3~, 1*, 1+1
U 0+1, DIC+2, DIC+6, START+3, 1+2
V AZHLSCFV+3~, 0+4*, DIC+6*, Q!
W AZHLSCFV+3~, 1+1*
>> X DIC+2*, DIC+3, DIC+5, DIC+7, START+1*, QEND+1*
>> Y 0+1, DIC+3, DIC+5, DIC+6, START+3*, START+4*, 1+2
>> Y(0 DIC+6, START+3*, 1+2
Z AZHLSCFV+3~, 1+2*
>> ZTDESC DEVICE+5*
>> ZTDTH DEVICE+3*
>> ZTIO DEVICE+5*
>> ZTQUEUED QEND+3
>> ZTRTN DEVICE+5*
>> ZTSAVE("*" DEVICE+5*
ZTSK DEVEND!

Marked Items

Name Field # of Occurrence
$T(@"AZHLSCFV" 0
$T(@"AZHLSCFV"+1 0
Info |  Source |  Call Graph |  Caller 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