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

Package: Prosthetics

Routine: RMPR124P


Information

RMPR124P ;VMP/RB - FIX FIELD LENGTH PROBLEMS FOR FILES #660/664 ;01/13/06

Source Information

Source file <RMPR124P.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 4 DD^%DT  NOW^%DTC  YN^DICN  ^DIR  
Kernel 2 ^%ZTLOAD  $$FMADD^XLFDT  
Prosthetics 2 (BEG,ENT)^RMPRFFIX  PRINT^RMPRFPRT  
List Manager 1 CLEAR^VALM1  
MailMan 1 ^XMD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Prosthetics 1 RMPR FILE CLEANSING  

Entry Points

Name Comments DBIA/ICR reference
FIX664 ;search and correct length in errors for specified fields in files 664
F1
EN ;Entry Point.
ASKCMP ;COMPILE ASK
CMP ;COMPILE
BUILD
FIX ;FIX BY INTERNAL PTR FOR 660/664
EXIT0
EXIT
MAIL ;Send mail message when build complete.
WAIT ;

External References

Name Field # of Occurrence
DD^%DT ASKCMP+2, ASKCMP+3, MAIL+2, MAIL+3
NOW^%DTC BUILD, EXIT+2
^%ZTLOAD CMP+8
YN^DICN F1
^DIR EN+10, ASKCMP+14, WAIT+3
BEG^RMPRFFIX FIX+4
ENT^RMPRFFIX FIX+4
PRINT^RMPRFPRT EN+15
CLEAR^VALM1 CMP+3
$$FMADD^XLFDT BUILD+3
^XMD MAIL+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FIX664+1
Function Call: WRITE
  • Prompt: !,"** THIS TEMPORARY PROCESS HAS BEEN PUT IN PLACE TO SCRUB (VIA USER **"
  • Line Location: FIX664+2
Function Call: WRITE
  • Prompt: !,"** INTERACTION) ANY FIELDS IN FILE #664 AND FILE#660 THAT MAY HAVE **"
  • Line Location: FIX664+3
Function Call: WRITE
  • Prompt: !,"** A FIELD LENGTH ERROR CAUSED BY THE GUI PROSTHETICS PURCHASING **"
  • Line Location: FIX664+4
Function Call: WRITE
  • Prompt: !,"** MODULE WHICH WAS ALLOWING DATA OUTSIDE THE FIELD DEFINED LENGTH **"
  • Line Location: FIX664+5
Function Call: WRITE
  • Prompt: !,"** LIMITATIONS. **"
  • Line Location: FIX664+6
Function Call: WRITE
  • Prompt: !,"REPLY YES (Y) OR NO (N)"
  • Line Location: F1+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: F1+2
Function Call: WRITE
  • Prompt: !!,"This build contains ",+RMREM," nodes to be fixed, ",+$P(RMREM,"^",2)," field length errors",!
  • Line Location: ASKCMP+10
Function Call: WRITE
  • Prompt: !!,"There are 0 items to be fixed.",!
  • Line Location: ASKCMP+11
Function Call: WRITE
  • Prompt: !,"Request Queued!"
  • Line Location: CMP+9
Function Call: WRITE
  • Prompt: !!,"** REPAIR PROCESS TERMINATED BY USER **"
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: " < ",TFIX_" FIELD LENGTH ERRORS CORRECTED"," >"
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+3
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • ASKCMP+14
    • WAIT+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XTMP("RMPRFIX" ASKCMP+2, ASKCMP+3, ASKCMP+7, CMP+2!, BUILD+1*, BUILD+2*, BUILD+3*, EXIT+3*, EXIT+4*, MAIL+11*

Label References

Name Line Occurrences
ASKCMP EN+14
EXIT F1+1, EN+17, FIX+5
F1 F1
FIX EN+16
MAIL EXIT+5
WAIT ASKCMP+6, CMP+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % F1*, F1+1, BUILD, EXIT+2
%DT CMP+1!
ANS F1+1*, FIX+3~
DA EN+1~, EN+13!, ASKCMP+15!, FIX+2~
DA1 FIX+2~
DA1A FIX+2~
DA2 FIX+2~
DATA FIX+2~
DIE FIX+2~
DIR EN+1~, EN+13!, ASKCMP+15!, FIX+3~, WAIT+2~
DIR("?" EN+2*, EN+3*, EN+4*, EN+5*
DIR("A" ASKCMP+12*, WAIT+3*
DIR("B" ASKCMP+13*
DIR("L" EN+7*, EN+8*, EN+9*
DIR(0 EN+6*, ASKCMP+13*, WAIT+3*
DIROUT WAIT+2~
DIRUT F1+1, EN+13, ASKCMP+15, FIX+3~, WAIT+2~
DR FIX+2~
DTOUT F1*, FIX+3~, WAIT+2~
DUOUT F1+1, FIX+3~, WAIT+2~
DUZ MAIL+9, MAIL+11
END FIX+2~, FIX+5, EXIT
FILE1 FIX+2~
FILE2 FIX+2~
FLD1 FIX+1~
FLD15 FIX+1~
FLD152 FIX+1~
FLD154 FIX+1~
FLD156 FIX+1~
FLD16 FIX+2~
FLD19 FIX+1~
FLD1D FIX+2~
FLD2 FIX+1~, FIX+2~
FLD21 FIX+2~
FLD211 FIX+1~
FLD24 FIX+2~
FLD25 FIX+2~
FLD7 FIX+1~
FLD9 FIX+1~
FLD91 FIX+2~
FLD92 FIX+2~
HDT FIX+3~
HIEN FIX+3~
HSW FIX+3~
I FIX+3~
IEN0 FIX+1~
IEN4 FIX+1~
IEN42 FIX+1~
IOF FIX664+1
IWD FIX+3~
J FIX+3~
LMAX FIX+2~
LMIN FIX+2~
NUM FIX+3~
PCN FIX+3~
POP EN+1~
>> PXEND MAIL+3*, MAIL+7
>> PXSTART MAIL+2*, MAIL+7
R40 FIX+1~
R42 FIX+1~
R43 FIX+1~
R660 FIX+1~
R6601 FIX+1~
R6609 FIX+1~
R664 FIX+1~
RMCREATE ASKCMP+1~
RMEND ASKCMP+1~, ASKCMP+3*, ASKCMP+4, ASKCMP+8, ASKCMP+9, EXIT+2*, EXIT+4, MAIL+3
RMOBN FIX+3~
RMOPT EN+1~, EN+11*, EN+12, EN+14, EN+15, EN+16, FIX+4, EXIT0, EXIT, EXIT+1
RMPRCT1 FIX+3~, EXIT+3
RMPRCT2 FIX+3~, EXIT+3
RMPURGE ASKCMP+1~
RMREM ASKCMP+1~, ASKCMP+7*, ASKCMP+10, ASKCMP+11
RMSTART ASKCMP+1~, ASKCMP+2*, ASKCMP+5, BUILD*, BUILD+1, BUILD+3, MAIL+2
RMTEXT MAIL+1~
RMTEXT(1 MAIL+5*, MAIL+6*
RMTEXT(2 MAIL+7*
RMUSER FIX+3~
TFIX FIX+3~, EXIT0, EXIT
TFND FIX+3~, EXIT0
TT FIX+3~
WDA FIX+3~
WDB FIX+3~
WDC FIX+3~
WDS FIX+2~
X WAIT+2~
XMAIL MAIL+1~
XMDUZ MAIL+1~, MAIL+9*
XMMG MAIL+1~, MAIL+11
XMSUB MAIL+1~, MAIL+8*
XMTEXT MAIL+1~, MAIL+9*
XMY MAIL+1~
XMY( MAIL+9*
XMZ MAIL+1~, MAIL+11
Y EN+11, ASKCMP+2*, ASKCMP+3*, ASKCMP+16, CMP+1!, FIX+3~, MAIL+1~, MAIL+2*, MAIL+3*, WAIT+2~
ZTDESC EN+1~, CMP+6*
ZTIO EN+1~, CMP+7*
ZTQUEUED EN+1~, MAIL+4*
ZTRTN EN+1~, CMP+5*
>> ZTSAVE("RM*" CMP+7*
>> ZTSAVE("XM*" CMP+7*
ZTSK EN+1~, CMP+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All