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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: RMPFPRE

Package: Remote Order Entry System

Routine: RMPFPRE


Information

RMPFPRE ;DDC/KAW-PRE-INIT FOR ROES V2.0 [ 06/16/95 3:06 PM ]

Source Information

Source file <RMPFPRE.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Remote Order Entry System 2 ^RMPFPRE1  ^RMPFPRE2  
VA FileMan 2 ^DIE  ^DIK  

Entry Points

Name Comments DBIA/ICR reference
CH0
CH1
CH6
CH2
CH21
CH22
CH23
CH24
CH25
CH3
CH4
CH41
CH61
CH7
CH71
EXIT
EXIT1
END
READ
REASON ;;Reasons for delay in order

External References

Name Field # of Occurrence
^DIE CH0+2, CH1+2, CH6+3, CH2+4, CH21+4, CH22+3, CH23+3, CH24+3, CH25+3, CH3+4
CH4+3, CH41+1, EXIT+10
^DIK CH7+2, CH71+1
^RMPFPRE1 EXIT1
^RMPFPRE2 CH61

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"ROES Version 2.0 PRE-INIT"
  • Line Location: RMPFPRE+2
Function Call: WRITE
  • Prompt: !!,"Changing menu name 'RMPF O/E STATION' to 'RMPF O/E STATION ASPS'."
  • Line Location: CH0+0
Function Call: WRITE
  • Prompt: !!,"Changing mail group name 'RMPF ROES UPDATES' to 'RMPF ROES UPDATES (ASPS)'."
  • Line Location: CH1+0
Function Call: WRITE
  • Prompt: !!,"Changing bulletin name 'RMPFMESSAGE' to 'RMPFMESSAGE (ASPS)'."
  • Line Location: CH6+0
Function Call: WRITE
  • Prompt: !!,"Changing order type name 'STOCK H.A. ORDER' to 'STOCK HEARING AID ORDER'"
  • Line Location: CH2+0
Function Call: WRITE
  • Prompt: !!,"Changing order type name 'H.A. REGISTRATION' to 'HEARING AID REGISTRATION'."
  • Line Location: CH21+0
Function Call: WRITE
  • Prompt: !!,"Changing order type name 'CUSTOM H.A. ORDER' to 'CUSTOM HEARING AID ORDER'."
  • Line Location: CH22+0
Function Call: WRITE
  • Prompt: !!,"Changing order type name 'LOST AID REPORT' to 'LOST HEARING AID REPORT'."
  • Line Location: CH23+0
Function Call: WRITE
  • Prompt: !!,"Changing order type name 'UNFILL AN ORDER' to 'CANCEL ORDER'."
  • Line Location: CH24+0
Function Call: WRITE
  • Prompt: !!,"Changing order type name 'MISSING AID REPORT' to 'MISSING HEARING AID REPORT'."
  • Line Location: CH25+0
Function Call: WRITE
  • Prompt: !!,"Changing order type name 'ISSUE DATE/ORDER COMPLETION' to",!," 'CUSTOM HEARING AID ISSUE'"
  • Line Location: CH3+0
Function Call: WRITE
  • Prompt: !!,"Changing the order type name 'CANCEL PATIENT ORDER' to 'CANCEL CUSTOM HEARING AID ORDER'."
  • Line Location: CH4+0
Function Call: WRITE
  • Prompt: !!,"Removing disability conditions '5163' and '6016'."
  • Line Location: CH7+0
Function Call: WRITE
  • Prompt: !!,"Deleting old order type edit fields."
  • Line Location: EXIT+5
Function Call: WRITE
  • Prompt: !!,"Setting up ORDER DELAY REASONS."
  • Line Location: EXIT+7
Function Call: WRITE
  • Prompt: !!!?10,"*** PRE-INIT COMPLETE ***"
  • Line Location: EXIT1+1
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: READ+1
Function Call: READ
  • Variable: Y
  • Timeout: 5
  • Line Location: READ+1
Routine Call
  • DIE
  • Line Location:
    • CH0+2
    • CH1+2
    • CH6+3
    • CH2+4
    • CH21+4
    • CH22+3
    • CH23+3
    • CH24+3
    • CH25+3
    • CH3+4
    • CH4+3
    • CH41+1
    • EXIT+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19 - [#19] Classic Fileman Calls
^XMB(3.6 - [#3.6] Classic Fileman Calls
^XMB(3.8 - [#3.8] Classic Fileman Calls
^RMPF(791810.1 - [#791810.1] Classic Fileman Calls
^RMPF(791810.4 - [#791810.4] Classic Fileman Calls
^RMPF(791810.6 - [#791810.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(791810 EXITEXIT+1!, EXIT+2!
^DD(791810.0101 EXIT+4!
^DIC(19 - [#19] CH0+1
^DIC(9.4 - [#9.4] RMPFPRE+3
^RMPF(791810 - [#791810] EXIT+3!
^RMPF(791810.1 - [#791810.1] CH2+1, CH21+1, CH22+1, CH23+1, CH24+1, CH25+1, CH3+1, CH4+1, CH41EXIT+6!
^RMPF(791810.4 - [#791810.4] CH7+1, CH71
^RMPF(791810.6 - [#791810.6] EXIT+8
^XMB(3.6 - [#3.6] CH6+1
^XMB(3.8 - [#3.8] CH1+1

Label References

Name Line Occurrences
CH1 CH0+1
CH2 CH6+2
CH21 CH2+2
CH22 CH21+2
CH23 CH22+1
CH24 CH23+1
CH25 CH24+1
CH3 CH25+1
CH4 CH3+2
CH41 CH4+2
CH6 CH1+1
CH61 CH41
CH71 CH7+1
END RMPFPRE+3
EXIT CH71
EXIT1 EXIT+8
READ READ+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D END!
D0 END!
DA CH0+1*, CH1+1*, CH6+1*, CH6+2, CH2+1*, CH2+2, CH21+1*, CH21+2, CH22+1*, CH23+1*
CH24+1*, CH25+1*, CH3+1*, CH3+2, CH4+1*, CH4+2, CH41*, CH7+1*, CH71*, EXIT+8*
EXIT+9*, EXIT+10*, END!
DI END!
DIC END!
DIE CH0+2*, CH1+2*, CH6+3*, CH2+3*, CH21+3*, CH22+2*, CH23+2*, CH24+2*, CH25+2*, CH3+3*
CH4+3*, CH41+1*, EXIT+10*, END!
DIK CH7+2*, CH71+1*, END!
DQ END!
DR CH0+2*, CH1+2*, CH6+3*, CH2+4*, CH21+4*, CH22+3*, CH23+3*, CH24+3*, CH25+3*, CH3+4*
CH4+3*, CH41+1*, EXIT+10*, END!
DTIME READ+1
FX END!
>> K EXIT+9*
>> RMPF( EXIT+9*, EXIT+10
>> RMPFLG RMPFPRE+3*
RMPFOUT READ!, READ+2*
RMPFQUT READ!, READ+3*
U READ+1
X CH0+2*, CH1+2*, CH6+3*, CH2+3*, CH2+4, CH21+3*, CH21+4, CH22+2*, CH22+3, CH23+2*
CH23+3, CH24+2*, CH24+3, CH25+2*, CH25+3, CH3+3*, CH3+4, CH4+3*, CH41+1*, EXIT*
EXIT+1, EXIT+6*, EXIT+9*, EXIT+10*, END!
Y END!, READ+1*, READ+2*, READ+3*

Marked Items

Name Field # of Occurrence
$T(REASON+DA EXIT+9
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All