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 |  Local Variables |  All
Print Page as PDF
Routine: XUPSCLR

Package: Kernel

Routine: XUPSCLR


Information

XUPSCLR ;OIFO-CS/GRR/RAM/DW/PN - New Person file Cleanup Report ; 1 Jan 2004

Source Information

Source file <XUPSCLR.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZISC  ZIS^XUPSUTQ  $$ACTIVE^XUSER  
VA Fileman 3 DD^%DT  NOW^%DTC  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 2 XUPS ASSESSMENT DETAIL  XUPS ASSESSMENT STATS  

Entry Points

Name Comments DBIA/ICR reference
HEAD ; write report header
EN ; -- entry point
STATS ; -- totals only
ZZZ ; -- detailed output
XXX ;
YYY ;
DETAIL ; -- detailed report
TOTALS ;
EN1 ;
INIT ; -- initialize

External References

Name Field # of Occurrence
DD^%DT INIT+11
NOW^%DTC INIT+11
^%ZISC EN1+16
^DIR EN+10, HEAD+5, TOTALS+3, TOTALS+49, ZZZ+5
ZIS^XUPSUTQ EN+21
$$ACTIVE^XUSER XXX+4, XXX+8, XXX+12, XXX+22, XXX+28, XXX+34, XXX+40, XXX+42

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will print "_TYPE
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: " entries missing SEX, DOB, or SSN",!
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: "data in the New Person file (#200)",!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !!,"The report may be lengthy. "
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: "It is suggested to queue the report."
  • Line Location: EN+20
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+8
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+11
Function Call: WRITE
  • Prompt: !,?1,"New Person file Assessment Report - "
  • Line Location: HEAD+13
Function Call: WRITE
  • Prompt: XUPSREC_" Persons",?55,XUPSDT
  • Line Location: HEAD+14
Function Call: WRITE
  • Prompt: !,?1,"Person Name",?31,"IEN",?40,"Missing",?48,"Missing"
  • Line Location: HEAD+15
Function Call: WRITE
  • Prompt: ?56,"Missing",?65,"Office Phone",!,?42,"SEX",?50,"DOB",?58,"SSN",!
  • Line Location: HEAD+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: TOTALS+6
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(PERSON,6,0)
  • Line Location: TOTALS+10
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(VISITOR,6,0)
  • Line Location: TOTALS+12
Function Call: WRITE
  • Prompt: !!,?(50-$L(XUPSL)),XUPSL
  • Line Location: TOTALS+14
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(PERSON-VISITOR,6,0)
  • Line Location: TOTALS+16
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(MISSING("SEX"),6,0)
  • Line Location: TOTALS+18
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(MISSING("DOB"),6,0)
  • Line Location: TOTALS+20
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(MISSING("SSN"),6,0)
  • Line Location: TOTALS+22
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(MISS(1),6,0)
  • Line Location: TOTALS+24
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(MISS(2),6,0)
  • Line Location: TOTALS+26
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(MISS(3),6,0)
  • Line Location: TOTALS+28
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(TOTAL("MISSING"),6,0)
  • Line Location: TOTALS+30
Function Call: WRITE
  • Prompt: !!,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE("TOTAL"),6,0)
  • Line Location: TOTALS+32
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE("MISSING"),6,0)
  • Line Location: TOTALS+34
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE("SEX"),6,0)
  • Line Location: TOTALS+36
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE("DOB"),6,0)
  • Line Location: TOTALS+38
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE("SSN"),6,0)
  • Line Location: TOTALS+40
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE(1),6,0)
  • Line Location: TOTALS+42
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE(2),6,0)
  • Line Location: TOTALS+44
Function Call: WRITE
  • Prompt: !,?(50-$L(XUPSL)),XUPSL,$J(ACTIVE(3),6,0)
  • Line Location: TOTALS+46
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ZZZ+7
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • HEAD+5
    • TOTALS+3
    • TOTALS+49
    • ZZZ+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J XXX+52*, INIT+2!, YYY+5, YYY+7, YYY+8
^VA(200 - [#200] EN1+8, XXX+4, XXX+16, XXX+49, XXX+51, XXX+52, YYY+13

Label References

Name Line Occurrences
EN DETAIL+6, STATS+6
HEAD YYY+3, YYY+16
INIT EN1+5
TOTALS EN1+12
XXX EN1+8
YYY ZZZ+2, ZZZ+9
ZZZ EN1+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% INIT+11~
%H INIT+11~
%I INIT+11~
ACTIVE EN1+2~, INIT+5*
ACTIVE( XXX+43*, INIT+7*, INIT+8*
ACTIVE("DOB" TOTALS+38, XXX+28*
ACTIVE("MISSING" TOTALS+34, XXX+40*, INIT+4*
ACTIVE("SEX" TOTALS+36, XXX+22*
ACTIVE("SSN" TOTALS+40, XXX+34*
ACTIVE("TOTAL" TOTALS+32, XXX+9*, INIT+4*
ACTIVE(1 TOTALS+42
ACTIVE(2 TOTALS+44
ACTIVE(3 TOTALS+46
DIR EN+2~, EN+10!, EN1+2~
DIR("?" EN+9*
DIR("A" EN+8*
DIR("B" EN+8*
DIR(0 EN+8*, HEAD+5*, TOTALS+3*, TOTALS+49*, ZZZ+5*
DIRUT EN+11, EN1+2~
DOB EN1+2~, XXX+14*, XXX+25*, XXX+50, YYY+11*, YYY+15
FLG EN1+2~, EN1+10, HEAD+3, HEAD+5*, TOTALS+2, TOTALS+4*, INIT+5*, ZZZ+2, ZZZ+3, ZZZ+6*
, YYY+3, YYY+5, YYY+7
I EN1+2~, INIT+7*, INIT+8*
IEN EN1+2~, EN1+7*, EN1+8*, XXX+4, XXX+8, XXX+12, XXX+16, XXX+22, XXX+28, XXX+34
, XXX+40, XXX+42, XXX+49, XXX+51, XXX+52, YYY+6*, YYY+7*, YYY+8, YYY+13, YYY+14
IOF EN1+14, HEAD+8, HEAD+11, TOTALS+6, ZZZ+7
IOSL YYY+16
IOST HEAD+3, HEAD+8, TOTALS+2, TOTALS+49, ZZZ+3, ZZZ+7
MISS EN1+2~
MISS( XXX+45*, INIT+7*
MISS(1 TOTALS+24
MISS(2 TOTALS+26
MISS(3 TOTALS+28
MISSING EN1+2~, XXX+15*, XXX+21*, XXX+27*, XXX+33*, XXX+36, XXX+43, XXX+45
MISSING( INIT+8*
MISSING("DOB" TOTALS+20, XXX+26*
MISSING("SEX" TOTALS+18, XXX+20*
MISSING("SSN" TOTALS+22, XXX+32*
NAME EN1+3~, HEAD+3, HEAD+8, HEAD+11, YYY+1*, YYY+5*, YYY+7, YYY+8
NODE EN1+2~, XXX+16*, XXX+18, XXX+24, XXX+30, YYY+8*, YYY+9, YYY+10, YYY+11, YYY+12
PERSON EN1+3~, EN1+14, TOTALS+10, TOTALS+16, XXX+1*, INIT+5*
PHONE EN1+2~, XXX+49*, XXX+50, YYY+9*, YYY+15
POP EN+2~, EN+22, EN1+3~
SEX EN1+3~, XXX+14*, XXX+19*, XXX+50, YYY+10*, YYY+14
SSN EN1+2~, XXX+14*, XXX+31*, XXX+50, YYY+12*, YYY+15
TOTAL EN1+3~
TOTAL("MISSING" TOTALS+30, XXX+38*, INIT+4*
TYPE DETAIL+2~, DETAIL+4*, STATS+2~, STATS+4*, EN+4, EN+16, EN+18, EN1+10, TOTALS+2, XXX+47
VISITOR EN1+3~, TOTALS+12, TOTALS+16, XXX+5*, INIT+5*
X EN+2~, EN1+3~, XXX+48~, XXX+50*, XXX+52
XUPSDT EN1+3~, HEAD+14, INIT+11*
XUPSL EN1+3~, TOTALS+10*, TOTALS+11*, TOTALS+12, TOTALS+13*, TOTALS+14, TOTALS+15*, TOTALS+16, TOTALS+17*, TOTALS+18
, TOTALS+19*, TOTALS+20, TOTALS+21*, TOTALS+22, TOTALS+23*, TOTALS+24, TOTALS+25*, TOTALS+26, TOTALS+27*, TOTALS+28
, TOTALS+29*, TOTALS+30, TOTALS+31*, TOTALS+32, TOTALS+33*, TOTALS+34, TOTALS+35*, TOTALS+36, TOTALS+37*, TOTALS+38
, TOTALS+39*, TOTALS+40, TOTALS+41*, TOTALS+42, TOTALS+43*, TOTALS+44, TOTALS+45*, TOTALS+46
XUPSREC EN1+3~, HEAD+14, XXX+9*, XXX+12*, XXX+52, ZZZ+2*, ZZZ+9*, YYY+5, YYY+7, YYY+8
Y EN+2~, EN+11, EN1+2~, HEAD+5, TOTALS+4, INIT+11*, ZZZ+6
ZTDESC EN+2~, EN+14*
ZTDTH EN+2~
ZTIO EN+2~
ZTQUEUED EN+2~, EN1+17
ZTREQ EN+2~, EN1+17*
ZTRTN EN+2~, EN+15*
ZTSAVE EN+2~
ZTSAVE("TYPE" EN+16*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All