Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: XLFNP176

Package: Kernel

Routine: XLFNP176


Information

XLFNP176 ;SFISC/MKO-FIX NEW PERSON NAMES ;3:16 PM 27 Oct 2000

Source Information

Source file <XLFNP176.m>

Entry Points

Name Comments DBIA/ICR reference
LIST ;; M D^ D D S^ PH D^ R N^ D P M^ D O^ P A^ N P^ C R N A^ L P N
FIX
MAIN ;Loop through the New person file; entry point for queued jobs
BLDCOMP(XUNAM,XUSUF,XUNEW) ;Build new name components
WRITE(XUIEN,XUNAM,XUNEW) ;Write info
FILE(XUIEN,XUNEW) ;Correct Name
W(XUSTR,XUTAB) ;Write XUSTR
EOP ;End-of-page prompt/check
HDR ;Print header
ASKFIX() ;Ask whether to file corrected New Person name
DEVSEL ;Select device
INIT ;Setup
END ;Finish up
INTRO ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?+$G(XUTAB),$G(XUSTR)
  • Line Location: W+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EOP+5
Function Call: WRITE
  • Prompt: "NEW PERSON NAMES FIXED BY FIX^XLFNP176"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: "HOW FIX^XLFNP176 WOULD FIX NEW PERSON NAMES"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?(IOM-$L(XUHLIN)-$L(XUPAGE)-1),XUHLIN_XUPAGE
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM-1)," ","-")
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKFIX+6
Function Call: WRITE
  • Prompt: !
  • Line Location: DEVSEL+3
Function Call: WRITE
  • Prompt: !,"Report queued!",!,"Task number: "_$G(ZTSK),!
  • Line Location: DEVSEL+13
Function Call: WRITE
  • Prompt: !,"Report canceled!",!
  • Line Location: DEVSEL+14
Function Call: WRITE
  • Prompt: !,"Routine XLFNP176 was released with patch XU*8*176."
  • Line Location: INTRO+2
Function Call: WRITE
  • Prompt: !!,"This entry point (FIX^XLFNP176) loops through all the entries in the New"
  • Line Location: INTRO+4
Function Call: WRITE
  • Prompt: !,"Person file (#200) and looks for names that may have been standardized and"
  • Line Location: INTRO+5
Function Call: WRITE
  • Prompt: !,"parsed incorrectly by the Name Standardization Patch XU*8*134. If a name"
  • Line Location: INTRO+6
Function Call: WRITE
  • Prompt: !,"in the New Person file prior to the installation of Patch XU*8*134"
  • Line Location: INTRO+7
Function Call: WRITE
  • Prompt: !,"contained periods within its suffix, the Post-Install Conversion of that"
  • Line Location: INTRO+8
Function Call: WRITE
  • Prompt: !,"patch converted those periods to spaces, and didn't recognize the name"
  • Line Location: INTRO+9
Function Call: WRITE
  • Prompt: !,"component as a suffix. This entry point prints a report of names that may"
  • Line Location: INTRO+10
Function Call: WRITE
  • Prompt: !,"have the problem, and optionally corrects them."
  • Line Location: INTRO+11
Function Call: WRITE
  • Prompt: !!,"NOTE: This routine should be run only after Patches XU*8*134 and XU*8*152"
  • Line Location: INTRO+13
Function Call: WRITE
  • Prompt: !,"have been installed."
  • Line Location: INTRO+14
Function Call: WRITE
  • Prompt: !!,$C(7)," It appears that the above two patches have NOT been installed on"
  • Line Location: INTRO+17
Function Call: WRITE
  • Prompt: !," your system. Exiting ...",!
  • Line Location: INTRO+18
Function Call: WRITE
  • Prompt: !!," It appears that those two patches HAVE been installed in this acccount"
  • Line Location: INTRO+21
Function Call: WRITE
  • Prompt: !
  • Line Location: INTRO+22
Function Call: WRITE
  • Prompt: !!,"Each New Person file Name will be checked to determine whether any"
  • Line Location: INTRO+24
Function Call: WRITE
  • Prompt: !,"following strings occur at the end of the Name:",!
  • Line Location: INTRO+25
Function Call: WRITE
  • Prompt: !
  • Line Location: INTRO+34
Function Call: WRITE
  • Prompt: !!," Edit the list at line tag LIST^XLFNP176.",!
  • Line Location: INTRO+36
Info |  Source |  Entry Points |  Interaction Calls