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: XU8343S

Package: Kernel

Routine: XU8343S


Information

XU8343S ;BPOIFO/DW-CONVERSION OF NEW PERSON FILE ENTRIES ;10:39 AM 10 Mar 2000

Source Information

Source file <XU8343S.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Kernel 8 $$S^%ZTLOAD  $$FMADD^XLFDT  UPDCOMP^XLFNAME2  $$FORMAT^XLFNAME7  UPDATE^XPDID  MES^XPDUTL  (NOTICE,REPORT)^XU8343R  NEWPERS^XU8343S  
VA Fileman 2 FILE^DIE  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 2 XU8343P  XU8343S  

Entry Points

Name Comments DBIA/ICR reference
CONVERT ;Convert Names
STPCHK ;Every 200 records, check whether to stop
NEWPERS(XUFLAG,XUIEN) ;Convert New Person file names
CHANGED(XUAUD,XUNAME) ;Decide if the name is convertible.
; RESULT: 2 if the name is not convertible
; 1 if the name is convertible
; 0 if the name is not changed
RCD(XUNAME,XUCHG,XUNMSP,XUIENS,XUOLD) ;Record changes & problems
POST ;The Post-Install entry point (run conversion)
UPDATE(XUFLAG,XUFIL,XUIENS,XUFLD,XUNAM,XUPTR,XUPVAL,XUNMSP,XUDEG) ;Process name field
STOP() ;Check whether to stop

External References

Name Field # of Occurrence
$$S^%ZTLOAD STPCHK+3
FILE^DIE UPDATE+25
^DIR STOP+9, CONVERT+13, CONVERT+36, CONVERT+47
$$FMADD^XLFDT NEWPERS+15
UPDCOMP^XLFNAME2 UPDATE+20
$$FORMAT^XLFNAME7 UPDATE+11
UPDATE^XPDID STPCHK+5
MES^XPDUTL NEWPERS+29, NEWPERS+37, NEWPERS+61
NOTICE^XU8343R NEWPERS+67
REPORT^XU8343R NEWPERS+69
NEWPERS^XU8343S CONVERT+50

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," NOTE: To cancel this process, type '^' at any time."
  • Line Location: NEWPERS+19
Function Call: WRITE
  • Prompt: !," Please wait..."
  • Line Location: NEWPERS+20
Function Call: WRITE
  • Prompt: !,XUMSG
  • Line Location: NEWPERS+28
Function Call: WRITE
  • Prompt: !,XUMSG
  • Line Location: NEWPERS+36
Function Call: WRITE
  • Prompt: !
  • Line Location: NEWPERS+60
Function Call: WRITE
  • Prompt: !,XUMSG(I)
  • Condition for execution: $D(XUMSG(I))#2
  • Line Location: NEWPERS+60
Function Call: WRITE
  • Prompt: "."
  • Line Location: STPCHK+4
Function Call: READ
  • Timeout: 0
  • Variable: *X
  • Line Location: STOP+3
Function Call: READ
  • Timeout: 0
  • Variable: Y
  • Line Location: STOP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: STOP+9
Function Call: WRITE
  • Prompt: !,"This routine will run the New Person Name Standardization conversion."
  • Line Location: CONVERT+4
Function Call: WRITE
  • Prompt: !!,"It will loop through the entries in the New Person file, convert "
  • Line Location: CONVERT+5
Function Call: WRITE
  • Prompt: !,"the Name field (#.01) of the New Person file to standard form, and"
  • Line Location: CONVERT+6
Function Call: WRITE
  • Prompt: !,"update the corresponding Name Component entries of converted names."
  • Line Location: CONVERT+7
Function Call: WRITE
  • Prompt: !!,"It appears that the conversion has already been performed through"
  • Line Location: CONVERT+20
Function Call: WRITE
  • Prompt: !,"record #"_XUIEN_" in the New Person file."
  • Line Location: CONVERT+21
Function Call: WRITE
  • Prompt: !!,"Do you want to continue the conversion from after this point"
  • Line Location: CONVERT+22
Function Call: WRITE
  • Prompt: !,"or convert the entries from the beginning of the file."
  • Line Location: CONVERT+23
Function Call: WRITE
  • Prompt: !!,"It appears that the conversion has already been performed on all entries"
  • Line Location: CONVERT+39
Function Call: WRITE
  • Prompt: !,"in the New person file.",!
  • Line Location: CONVERT+40
Routine Call
  • DIE
  • Line Location:
    • UPDATE+25
Routine Call
  • DIR
  • Line Location:
    • STOP+9
    • CONVERT+13
    • CONVERT+36
    • CONVERT+47

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^VA(200 - [#200] NEWPERS+26, NEWPERS+32, NEWPERS+33*, NEWPERS+41, NEWPERS+42, NEWPERS+44, NEWPERS+47, NEWPERS+48, CONVERT+19
^XTMP( NEWPERS+14!, NEWPERS+15*, NEWPERS+55*, RCD+21*, RCD+22*, POST+3, POST+5*, CONVERT+17, CONVERT+51

Label References

Name Line Occurrences
$$CHANGED UPDATE+13
$$STOP STPCHK+4
NEWPERS POST+4
RCD UPDATE+15
STPCHK NEWPERS+41
UPDATE NEWPERS+52

Naked Globals

Name Field # of Occurrence
^( NEWPERS+32
^(0 CONVERT+51*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIERR UPDATE+1~, UPDATE+25!
DIR STOP+1~, CONVERT+1~, CONVERT+13!, CONVERT+36!, CONVERT+47!
DIR("?" STOP+8*, CONVERT+10*, CONVERT+11*, CONVERT+12*, CONVERT+25*, CONVERT+26*, CONVERT+27*, CONVERT+28*, CONVERT+29*, CONVERT+30*
, CONVERT+31*, CONVERT+32*, CONVERT+33*, CONVERT+34*, CONVERT+35*, CONVERT+42*, CONVERT+43*, CONVERT+44*, CONVERT+45*, CONVERT+46*
DIR("A" STOP+7*, CONVERT+9*, CONVERT+41*
DIR("B" STOP+7*
DIR(0 STOP+7*, CONVERT+9*, CONVERT+24*, CONVERT+41*
DIROUT STOP+1~, CONVERT+1~
DIRUT STOP+1~, CONVERT+1~, CONVERT+13, CONVERT+18, CONVERT+36, CONVERT+47*
DT NEWPERS+15
DTOUT STOP+1~, CONVERT+1~
DUOUT STOP+1~, CONVERT+1~
I NEWPERS+9~, NEWPERS+31*, NEWPERS+32*, NEWPERS+60*
U NEWPERS+15, NEWPERS+26, NEWPERS+32, NEWPERS+33, NEWPERS+42, NEWPERS+47, NEWPERS+48, NEWPERS+55, STOP+6, POST+3
, POST+5, CONVERT+17, CONVERT+51
X STOP+1~, CONVERT+1~
XPDIDTOT NEWPERS+9~, NEWPERS+26*, NEWPERS+31*, NEWPERS+32*, NEWPERS+33, NEWPERS+65
>> XPDNM NEWPERS+18, NEWPERS+28, NEWPERS+36, NEWPERS+60, STPCHK+4, STPCHK+5
XUAUD UPDATE+1~, UPDATE+11, UPDATE+13, CHANGED~, CHANGED+6, CHANGED+7
XUCHG UPDATE+1~, UPDATE+13*, UPDATE+15, UPDATE+18, UPDATE+23, RCD~, RCD+7, RCD+11*, RCD+14, RCD+16
XUCNT NEWPERS+8~, NEWPERS+12*, NEWPERS+43*, NEWPERS+58, NEWPERS+59, NEWPERS+63, STPCHK+2, STPCHK+5
XUDA UPDATE+1~
XUDEG NEWPERS+8~, NEWPERS+48*, NEWPERS+52, UPDATE~, UPDATE+19
XUF NEWPERS+8~, NEWPERS+51*, NEWPERS+52!
XUFDA UPDATE+1~
XUFDA( UPDATE+24*
XUFIL UPDATE~, UPDATE+20, UPDATE+24
XUFLAG NEWPERS~, NEWPERS+10*, NEWPERS+14, NEWPERS+15, NEWPERS+25, NEWPERS+51, NEWPERS+55, UPDATE~, UPDATE+2*, UPDATE+7
, UPDATE+18, UPDATE+23, STOP+8
XUFLD UPDATE~, UPDATE+20, UPDATE+24
XUIEN NEWPERS~, NEWPERS+22*, NEWPERS+26, NEWPERS+31, NEWPERS+33, NEWPERS+41*, NEWPERS+42, NEWPERS+44, NEWPERS+45, NEWPERS+47
, NEWPERS+48, NEWPERS+51, NEWPERS+55, STPCHK+1, POST+1~, POST+3*, POST+4, POST+5, CONVERT+1~, CONVERT+17*
, CONVERT+18, CONVERT+19, CONVERT+21, CONVERT+24, CONVERT+26, CONVERT+37*, CONVERT+48*, CONVERT+50
XUIENL NEWPERS+8~, NEWPERS+59, NEWPERS+64, STPCHK+1*
XUIENS NEWPERS+8~, NEWPERS+45*, NEWPERS+52, UPDATE~, UPDATE+15, UPDATE+20, UPDATE+24, RCD~, RCD+4*, RCD+19
XUIN NEWPERS+9~
XUINV NEWPERS+9~, RCD+19*, RCD+21, RCD+22
XUMAX UPDATE+1~, UPDATE+7*, UPDATE+11
XUMSG NEWPERS+8~, NEWPERS+27*, NEWPERS+28, NEWPERS+29, NEWPERS+30!, NEWPERS+35*, NEWPERS+36, NEWPERS+37, NEWPERS+38!, NEWPERS+61
, UPDATE+1~, UPDATE+25!
XUMSG( NEWPERS+60
XUMSG(1 NEWPERS+57*
XUMSG(2 NEWPERS+58*
XUMSG(3 NEWPERS+59*
XUNAM NEWPERS+8~, NEWPERS+42*, NEWPERS+43, NEWPERS+44, NEWPERS+51, NEWPERS+52, UPDATE~, UPDATE+3, UPDATE+11, UPDATE+20
XUNAM("DEGREE" UPDATE+19*
XUNAME UPDATE+1~, UPDATE+11*, UPDATE+13, UPDATE+15, UPDATE+24, RCD~, RCD+4*, RCD+22, CHANGED~, CHANGED+9*
, CHANGED+10
XUNMSP NEWPERS+8~, NEWPERS+12*, NEWPERS+14, NEWPERS+15, NEWPERS+52, NEWPERS+55, UPDATE~, UPDATE+15, RCD~, RCD+21
, RCD+22, POST+1~, POST+2*, POST+3, POST+5, CONVERT+1~, CONVERT+2*, CONVERT+17, CONVERT+51
XUNODEGT NEWPERS+8~, NEWPERS+11*
XUNOSIGT NEWPERS+9~, NEWPERS+11*
XUNOTRIG NEWPERS+8~, NEWPERS+11*, UPDATE+4~*
XUOLD UPDATE+1~, UPDATE+3*, UPDATE+15, RCD~, RCD+4*, RCD+21
XUORIG UPDATE+1~
XUPTR UPDATE~, UPDATE+20
XUPVAL NEWPERS+9~, NEWPERS+47*, NEWPERS+52, UPDATE~, UPDATE+20
XUR CHANGED+4~, CHANGED+5*, CHANGED+11
XUSTOP NEWPERS+9~, NEWPERS+40*, NEWPERS+41, NEWPERS+57, NEWPERS+66, STPCHK+3*, STPCHK+4*
XUSUB RCD+9~, RCD+10*, RCD+14*, RCD+16*, RCD+21, RCD+22
XUT NEWPERS+9~, NEWPERS+67
XUT(1 NEWPERS+63*
XUT(2 NEWPERS+64*
XUT(3 NEWPERS+65*
XUT(4 NEWPERS+66*
Y STOP+1~, STOP+4*, STOP+5*, STOP+6, STOP+10, CONVERT+1~, CONVERT+13, CONVERT+37, CONVERT+47
>> ZTQUEUED NEWPERS+18, STPCHK+3, STPCHK+4, STPCHK+5
>> ZTSTOP STPCHK+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All