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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XBCDIC

Package: IHS VA Utilities

Routine: XBCDIC


Information

XBCDIC ; IHS/ADC/GTH - CLEAN UP ^DIC AND ^DD ; [ 02/07/97 3:02 PM ]

Source Information

Source file <XBCDIC.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS VA Utilities 6 ^XBCDIC2  ^XBCDIC3  ^XBCDICD  $$DIR^XBDIR  EN1^XBDSET  EN1^XBRESID  

Entry Points

Name Comments DBIA/ICR reference
BEGIN ;
LO ;
DTA ;
HI ;
EOJ ;
EOJ3 ;
TEST ; If you have A/R installed, uncomment the following lines for a
; demonstration.
; D INIT^BARUTL
; D ENP^XBDIQ1(200,DUZ,".01:.116","BARU(")
; S BARFORM="PW TEST"
; D EDIT^XBARRAY(.BARFORM,90053.01,1000)
; S Y=$$GEN^XBARRAY(.BARFORM,90053.01,1000,"BARFM",0,10)
; K BARFORM(BARFORM)
; Q
BCHK ;
DOCE ;

External References

Name Field # of Occurrence
^XBCDIC2 HI+8
^XBCDIC3 HI+12
^XBCDICD HI+9
$$DIR^XBDIR BEGIN+6
EN1^XBDSET HI+6, HI+11
EN1^XBRESID HI+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"THIS FUNCTIONALITY HAS BEEN INCLUDED IN THE FILEMAN"
  • Line Location: BEGIN+2
Function Call: WRITE
  • Prompt: !,"DD UTILITIES, BEGINNING WITH V 19.0. WE RECOMMEND"
  • Line Location: BEGIN+3
Function Call: WRITE
  • Prompt: !,"IT'S USE AS IT IS MORE LIKELY TO BE CURRENT."
  • Line Location: BEGIN+4
Function Call: WRITE
  • Prompt: !," 3-20-96",!!
  • Line Location: BEGIN+5
Function Call: WRITE
  • Prompt: !!,"This routine cleans up ^DIC and ^DD by a range of dictionary numbers."
  • Line Location: BEGIN+7
Function Call: WRITE
  • Prompt: !!,"*** Don't mess with files less than 2!! ***",*7
  • Line Location: HI+4
Function Call: WRITE
  • Prompt: !!,"No dictionaries were selected!"
  • Line Location: HI+7
Function Call: WRITE
  • Prompt: !!,"Now confirming ^DIC(""B"")"
  • Line Location: HI+15
Function Call: WRITE
  • Prompt: "."
  • Line Location: HI+17
Function Call: WRITE
  • Prompt: "|"
  • Line Location: HI+19
Function Call: WRITE
  • Prompt: "|"
  • Line Location: BCHK+1
Function Call: WRITE
  • Prompt: "|"
  • Line Location: BCHK+2
Function Call: WRITE
  • Prompt: !,"Package ",XBBPPRFX," has no pre-initialization routine entry!",!
  • Line Location: EOJ+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] HI+19, BCHK+1, BCHK+2
^DIC("B" HI+17, HI+19, BCHK+1!, BCHK+2!
^UTILITY("XBBPI EXEC" EOJ3+1!
^UTILITY("XBBPI" EOJ3+1!
^UTILITY("XBBPPGM" EOJ3+1!
^UTILITY("XBDSET" HI+7, EOJ+2!

Label References

Name Line Occurrences
BCHK HI+17
EOJ LO+2, HI+3, HI+4, HI+7, HI+20

Naked Globals

Name Field # of Occurrence
^( HI+19*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EOJ3+2!
%DT EOJ3+2!
DIE EOJ3+2!
DTIME LO+1, HI+1
I TEST+10~, TEST+12*, TEST+13
>> T TEST+13*, TEST+14, TEST+15
U BEGIN+1*, HI+19, BCHK+2
W TEST+10~, TEST+11*, TEST+12
>> X TEST+11, TEST+12*, TEST+13
XBBPDFN EOJ3+3!
XBBPFLE EOJ3+3!
XBBPFLG EOJ3+3!
XBBPI EOJ3+3!
XBBPL EOJ3+3!
XBBPP EOJ3+3!
XBBPPGM EOJ3+3!
XBBPPRFX EOJ+5, EOJ3+3!
XBBPX EOJ3+3!
XBBPY EOJ3+3!
XBCDFILE HI+17*, HI+18*, HI+19*, BCHK+1, BCHK+2, EOJ+1!
XBCDHI HI+1*, HI+2*, HI+3, HI+5, HI+10, HI+13, HI+17, HI+19, EOJ+1!
XBCDL HI+17*, HI+19*, EOJ+1!
XBCDLO LO+1*, LO+2, HI+2, HI+3, HI+4, HI+5, HI+10, HI+13, HI+17, HI+18
, EOJ+1!
XBCDNDIC HI+19*, EOJ+1!
XBCDUCI EOJ+1!
XBCDX HI+16*, HI+17*, BCHK+1, BCHK+2, EOJ+1!
>> XBDSHI HI+5*, HI+10*
>> XBDSLO HI+5*, HI+10*
>> XBFMT TEST+14, TEST+15
>> XBL TEST+14, TEST+15
>> XBLLINE TEST+11, TEST+13*, TEST+14, TEST+15
>> XBLWP TEST+11*, TEST+13
>> XBRHI HI+13*
>> XBRLO HI+13*
>> XBZ( TEST+14*, TEST+15*
XCN EOJ3+2!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All