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

Package: Kernel

Routine: XU8P377D


Information

XU8P377D ;BT/BP-OAK - UPDATE PERSON CLASS FILE; [3/1/2005]

Source Information

Source file <XU8P377D.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
INAC ;;
LOOP
CHCK ;
PRNT ;

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "Do you want to list active users only? NO// "
  • Variable: %
  • Timeout: 20
  • Line Location: LOOP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: CHCK+6
Function Call: WRITE
  • Prompt: !,"PERSON CLASS ID: ",XUI,?28," NAME: ",$E($P(XUV,"^",1),1,40)
  • Line Location: PRNT+4
Function Call: WRITE
  • Prompt: !," VA CODE: ",$P(XUV,"^",6),?28,"X12 CODE: ",$P(XUV,"^",7)
  • Line Location: PRNT+5
Function Call: WRITE
  • Prompt: !!,"User Name",?34,"Status"
  • Line Location: PRNT+7
Function Call: WRITE
  • Prompt: !,?2,$P($G(^TMP("XU8P377",$J,XUI,XUY)),"^"),?36,$P($G(^TMP("XU8P377",$J,XUI,XUY)),"^",2)
  • Line Location: PRNT+9
Function Call: WRITE
  • Prompt: !!,?10,"Number of users: ",XUCOUNT
  • Line Location: PRNT+11
Function Call: WRITE
  • Prompt: !,"------------------------------"
  • Line Location: PRNT+12
Info |  Source |  Entry Points |  Interaction Calls