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

Package: VA FileMan

Routine: DIALOGZ


Information

DIALOGZ ;O-OIFO/GFT - CREATE AND USE FOREIGN-LANGUAGE ADDITIONS TO THE DATA DICTIONARY ;1JUNE2016

Source Information

Source file <DIALOGZ.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 6 $$EZBLD^DIALOG  ^DIC  (EARLY,LATEST)^DICATTD1  D^DICRW  $$UP^DILIBF  ^DIR  

Caller Graph

Caller Graph Total: 105

Package Total Caller Graph
Integrated Billing 42 IBXS1  IBXS11  IBXS12  IBXS21  IBXS3  IBXS36  IBXS39  IBXS4  
IBXS41  IBXS42  IBXS43  IBXS44  IBXS5  IBXS51  IBXS52  IBXS53  
IBXS54  IBXS6  IBXS63  IBXS64  IBXS7  IBXS71  IBXS73  IBXS74  
IBXS8  IBXS81  IBXS91  IBXSA  IBXSA2  IBXSA21  IBXSA22  IBXSA25  
IBXSA26  IBXSA27  IBXSA28  IBXSAH  IBXSAH1  IBXSAH10  IBXSAH2  IBXSAH5  
IBXSAH6  IBXSAH9  
VA FileMan 41 DDGFFM  DDMAP1  DDS0  DDS41  DDSR1  DDSRP  DDSWP  DIA  
DIC1  DICA1  DICM3  DICN  DICN1  DICOMPW  DICQ  DICQ1  
DICUIX  DIE  DIE2  DIE3  DIED  DIEFU  DIEH  DIEQ  
DIEVK1  DIH  DIL0  DIL1  DIO0  DIP  DIP0  DIP12  
DIP22  DIP3  DIQ  DIQ1  DIR  DIR1  DIR2  DIVR  
DIVRPTR  
Radiology Nuclear Medicine 17 RACTOE  RACTOE1  RACTOE2  RACTOE5  RACTOE6  RACTQE  RACTQE1  RACTQE2  
RACTRG  RACTRG1  RACTRG2  RACTRG3  RACTRG4  RACTRG5  RACTRG6  RACTRG7  
RACTRG8  
Scheduling 5 SDBT  SDBT1  SDBT2  SDBT3  SDBT4  

Entry Points

Name Comments DBIA/ICR reference
LANG(LANG) ;
SL(S) ;
GOODLANG(Y)
EXT
FILE
ENGLISH ;
LABEL(FILE,FIELD) ;Called many places to return the foreign-language FIELD NAME
SET
FIELDS
3
SPANISH ;
DIR(LN)
FINNISH ;
GERMAN ;
SETIN() ;NAKED REFERENCE Builds the SET STRING user sees, with 1,2,3...
DICW(FILE) ;
FILENAME(FILE) ;
Y
ARABIC ;
PORTUG ;
YESORNO(Y) ;TRY TO TURN YES OR NO INTO 'SI', WHATEVER
HLP
HELP(FILE,FIELD) ;
SETOUT() ;NAKED REFERENCE Builds the SET STRING that converts INTERNAL to user's EXTERNAL

External References

Name Field # of Occurrence
$$EZBLD^DIALOG EXT+3, EXT+8, EXT+10
^DIC FIELDS+3
EARLY^DICATTD1 EXT+2
LATEST^DICATTD1 EXT+2
D^DICRW LANG+5
$$UP^DILIBF YESORNO+2, YESORNO+3
^DIR DIR+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " <DELETED!>"
  • Line Location: FILE+3
Function Call: WRITE
  • Prompt: " <DELETED!>"
  • Line Location: FIELDS+10
Function Call: WRITE
  • Prompt: DIF,": "
  • Line Location: HLP+1
Function Call: WRITE
  • Prompt: ^(3)
  • Line Location: HLP+2
Function Call: WRITE
  • Prompt: " <DELETED!>"
  • Line Location: HLP+6
Function Call: WRITE
  • Prompt: !?2
  • Condition for execution: $X+$L(SET)>75
  • Line Location: SET+3
Function Call: WRITE
  • Prompt: SET
  • Line Location: SET+3
Function Call: WRITE
  • Prompt: " <DELETED!>"
  • Line Location: SET+8
Function Call: WRITE
  • Prompt: !!!
  • Line Location: SET+9
Function Call: WRITE
  • Prompt: Y_" is not an ID NUMBER of a language in the Language file."
  • Line Location: GOODLANG+4
Function Call: WRITE
  • Prompt: $P(Y(0),U)_" is not a living language. Translating is prohibited."
  • Line Location: GOODLANG+5
Routine Call
  • DIALOG
  • Line Location:
    • EXT+3
    • EXT+8
    • EXT+10
Routine Call
  • DIC
  • Line Location:
    • FIELDS+3
Routine Call
  • DIR
  • Line Location:
    • DIR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( FIELDS+7, FIELDS+9*, FIELDS+11, HLP, HLP+5*, SET, SET+7*, FILENAME+6, LABEL+2, LABEL+3
, HELP+1, HELP+2, HELP+4, EXT+11*, 3
^DI( LANG+2, EXT, YESORNO+2, YESORNO+3
^DIC - [#1] FILE, FILE+3!, FILE+4*, FILENAME+3
^DIC("ALANG" FILE+2!, FILE+4*

Label References

Name Line Occurrences
$$GOODLANG LANG+4
$$LABEL FILENAME+6, LABEL+3
$$SL SET+2, SET+5
$$YESORNO SETIN+7, SETOUT+5
3 HELP+1
DICW FIELDS+2
DIR FILE+1, FIELDS+8, HLP+4, SET+6
LANG DIALOGZ+10, ENGLISH+1, GERMAN+1, SPANISH+1, FINNISH+1, PORTUG+1, ARABIC+1
Y EXT

Naked Globals

Name Field # of Occurrence
^( HLP+3, SET+4, LABEL+4, SETIN+3, SETOUT+3
^("ALANG" FILENAME+5
^("UP" LABEL+3
^(0 FILE, FIELDS+7, FIELDS+10!, FIELDS+11, HLP+3, HLP+6!, SET+2, SET+4, SET+8!, FILENAME+4
, FILENAME+5, LABEL+3, LABEL+4, HELP+2, HELP+4, SETIN+2, SETIN+4, SETOUT+2, SETOUT+4, YESORNO+2
, YESORNO+3
^(3 HLP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C SETIN+1~, SETIN+2*, SETIN+4*, SETIN+7, SETIN+8*, SETIN+9, SETOUT+1~, SETOUT+2*, SETOUT+4*, SETOUT+5*
, SETOUT+6
DA LANG+1~
DIAL LANG+1~, LANG+3*, LANG+4*, DIR
DIALDD LANG+1~, FIELDS+6*, FIELDS+7, FIELDS+9, FIELDS+11, HLP, HLP+5, SET, SET+7
DIALFILE LANG+1~, FILE*, FILE+2, FILE+3, FILE+4, FIELDS+2, FIELDS+4, FIELDS+5*, FIELDS+7, FIELDS+9
, FIELDS+11*, HLP, HLP+5, SET, SET+7
DIC LANG+1~, FIELDS+1*
DIC("W" DICW+1*, DICW+2*, DICW+3*
DIC(0 FIELDS+1*
DICATT2 HELP+3~, HELP+4*, EXT, EXT+1, EXT+4, EXT+9
DICATT5 HELP+3~, HELP+4*, EXT+5, EXT+6, EXT+7, EXT+8, EXT+10
DIE LANG+1~
DIF LANG+1~, FILE*, FIELDS+6*, HLP+1*, SET+2*, SET+3, DIR
DIR LANG+1~, FILE+5!, FIELDS+6!, FIELDS+8!, HLP+5!, SET+7!
DIR("?" SET+5*
DIR("A" DIR*
DIR("B" FILE*, FILE+2, FIELDS+7*, HLP+3*, SET+4*
DIR(0 DIR*
DLAYGO LANG+1~
DR LANG+1~
DSTART LANG+1~, FILE*, FIELDS, FIELDS+4!, FIELDS+5
DUOUT LANG+1~, FILE+1, FIELDS+6!, FIELDS+8, HLP, HLP+4, SET+6, DIR+1!
DUZ HLP+3~
DUZ("LANG" DIALOGZ+10, HLP+3*, FILENAME+5, LABEL+4, HELP+1, HELP+2, EXT+11, DICW+2, SETIN+3, SETOUT+3
, YESORNO+1, YESORNO+2, YESORNO+3
F FILENAME+1~, FILENAME+3, FILENAME+4*, FILENAME+5*, FILENAME+6*
FIELD LABEL~, LABEL+2, HELP~, HELP+1, HELP+2, HELP+4, EXT+11, 3
FILE FILENAME~, FILENAME+2, FILENAME+3, FILENAME+6, LABEL~, LABEL+2, LABEL+3, HELP~, HELP+1, HELP+2
, HELP+4, EXT+11, 3, DICW~, DICW+2
LANG LANG~, LANG+2, LANG+4, FILE, FILE+2, FILE+3, FILE+4, FIELDS+7, FIELDS+9, HLP+3
, HLP+5, SET+4, SET+7
LANG(0 LANG+2*, LANG+3, LANG+4
LN DIR~
N FILENAME+1~, FILENAME+6*, LABEL+1~, LABEL+2*, LABEL+5
O SETIN+6~, SETIN+7*
OUT SETIN+6~, SETIN+7*
P HELP+3~, EXT+3, EXT+8, EXT+10, SETIN+1~, SETIN+4*, SETIN+7*, SETOUT+1~, SETOUT+4*, SETOUT+5*
P(1 EXT+2*, EXT+3, EXT+5*, EXT+10*
P(2 EXT+2*, EXT+3, EXT+6*, EXT+10*
P(3 EXT+7*
S SL~, SL+1*, SL+2
SET SET+1~, SET+2*, SET+3, SET+5
TRY SETIN+6~, SETIN+7*!, SETIN+8
U LANG+2*, LANG+3, LANG+4, FILE, FIELDS+6, FIELDS+11, SET, SET+2, HELP+4, SETIN+2
, SETOUT+2, YESORNO+2, YESORNO+3, GOODLANG+5
V SETOUT+1~, SETOUT+4*, SETOUT+5*
>> X FILE+1, FIELDS+8, HLP+4, SET+6
Y LANG+1~, LANG+5, FILE, FILE+3, FILE+4, FIELDS+3, FIELDS+6, FIELDS+9, FIELDS+10, FIELDS+11*
, HLP+5, HLP+6, SET+7, SET+8, HELP+3~, EXT*, EXT+2, EXT+3!*, EXT+8*, EXT+10*
, EXT+11, Y, YESORNO~, YESORNO+1, YESORNO+2, YESORNO+3, YESORNO+4, GOODLANG~, GOODLANG+4
Y(0 GOODLANG+4, GOODLANG+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All