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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RMPOPAT2

Package: Prosthetics

Routine: RMPOPAT2


Information

RMPOPAT2 ;HINES CIO/RVD-DISPLAY PATIENT ITEM ACTIVITY ;9/16/02 11:16

Source Information

Source file <RMPOPAT2.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Prosthetics 2 (ASK1,ASK2)^RMPOPAT  ^RMPOPAT3  
VA FileMan 1 EN^DIQ1  

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 RMPOPAT  

Entry Points

Name Comments DBIA/ICR reference
DIS ;DISPLAY APPLIANCES OR REPAIRS
END
EXIT
PRT
OVER ;
HDR ;Print Header, Screen 4

External References

Name Field # of Occurrence
EN^DIQ1 PRT+34
ASK1^RMPOPAT EXIT+3, OVER+3, OVER+4
ASK2^RMPOPAT EXIT+4
^RMPOPAT3 OVER+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Appliances or Repairs exist for this veteran!",!!
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+2
Function Call: WRITE
  • Prompt: !,RK,". ",DATE,?13,QTY,?17
  • Line Location: PRT+22
Function Call: WRITE
  • Prompt: $E($P(^("HST"),U,1),1,10)
  • Line Location: PRT+26
Function Call: WRITE
  • Prompt: ?30,TRANS,?31,TRANS1
  • Line Location: PRT+27
Function Call: WRITE
  • Prompt: ?33,RMPRLPRO
  • Line Location: PRT+29
Function Call: WRITE
  • Prompt: ?33,$E(VEN,1,10)
  • Line Location: PRT+30
Function Call: WRITE
  • Prompt: ?50,$E(SN,1,9),?60,DEL
  • Line Location: PRT+36
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: OVER+2
Function Call: WRITE
  • Prompt: $C(7),!," Must be between 1 and ",RK," to be valid"
  • Line Location: OVER+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,$E(RMPRNAM,1,20),?23,"SSN: "
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: $E(RMPRSSN,1,3)_"-"_$E(RMPRSSN,4,5)_"-"_$E(RMPRSSN,6,10)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?42,"DOB: "
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: Y
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?61,"CLAIM# ",$G(RMPRCNUM)
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !?4,"Date",?12,"Qty",?19,"HCPCS",?28,"Type",?34,"Vendor",?45,"Sta",?50,"Serial",?58,"Delivery Date",?72,"Tot Cost"
  • Line Location: HDR+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HDR+6
^PRC(440 - [#440] PRT+18
^RMPO(665.72 - [#665.72] RMPOPAT2+48
^RMPR(660 - [#660] RMPOPAT2+12, RMPOPAT2+17, RMPOPAT2+18, RMPOPAT2+19, RMPOPAT2+37, DIS+2, PRT+4, PRT+6, PRT+16, PRT+26
, PRT+32
^RMPR(660.1 - [#660.1] PRT+19
^RMPR(661.1 - [#661.1] RMPOPAT2+20, PRT+23
^TMP($J RMPOPAT2+11!, RMPOPAT2+12*, RMPOPAT2+14, RMPOPAT2+16, RMPOPAT2+23*, RMPOPAT2+25, RMPOPAT2+27, RMPOPAT2+29*, RMPOPAT2+32, RMPOPAT2+36
, RMPOPAT2+39!, RMPOPAT2+40!, RMPOPAT2+41*, RMPOPAT2+42!, RMPOPAT2+43!, RMPOPAT2+45, RMPOPAT2+47, RMPOPAT2+50, RMPOPAT2+53!
^UTILITY("DIQ1" RMPOPAT2+10!, EXIT!

Label References

Name Line Occurrences
DIS DIS+2, END+2
END RMPOPAT2+55
EXIT DIS+2, END
HDR RMPOPAT2+9, OVER+5
OVER DIS+2, END+2, OVER+7
PRT DIS+2

Naked Globals

Name Field # of Occurrence
^("HST" PRT+26, PRT+32
^("LB" PRT+6
^(0 PRT+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AMIS PRT+18*, PRT+19*, PRT+23
>> AN RMPOPAT2+11*, DIS+2*, PRT+4, PRT+6, PRT+16, PRT+19, OVER+8*
ANS RMPOPAT2+11*, DIS+2, OVER+1~, OVER+2*, OVER+3*, OVER+4, OVER+5, OVER+6, OVER+7, OVER+8
, OVER+9
B RMPOPAT2+13*, RMPOPAT2+14*, RMPOPAT2+16, RMPOPAT2+23, RMPOPAT2+24*, RMPOPAT2+25*, RMPOPAT2+27, RMPOPAT2+29, RMPOPAT2+44*, RMPOPAT2+45*
, RMPOPAT2+47, RMPOPAT2+50, RMPOPAT2+53!
>> BC RMPOPAT2+15*, RMPOPAT2+16*, RMPOPAT2+17, RMPOPAT2+18, RMPOPAT2+19, RMPOPAT2+22, RMPOPAT2+23, RMPOPAT2+26*, RMPOPAT2+27*, RMPOPAT2+28
BDC RMPOPAT2+35*, RMPOPAT2+36*, RMPOPAT2+38, RMPOPAT2+39, RMPOPAT2+43!
>> CST PRT+4*, PRT+37*, PRT+38
>> DA PRT+34*
>> DATE PRT+1*, PRT+15*, PRT+22
>> DEL PRT+3*, PRT+21*, PRT+36
DIC RMPOPAT2+10~, PRT+34*
DIQ RMPOPAT2+10~, EXIT!, PRT+34*
DIQ(0 PRT+34*
>> DR PRT+34*
DTIME OVER+2
>> DTOUT DIS+2, EXIT+3
>> DUOUT DIS+2, EXIT+3
>> FL EXIT+4*
>> FRM PRT+14*
>> GN RMPOPAT2+18*, RMPOPAT2+22*, RMPOPAT2+23
GTCST RMPOPAT2+30*, RMPOPAT2+37*, RMPOPAT2+41, RMPOPAT2+42!
>> HC RMPOPAT2+30*, RMPOPAT2+32*, RMPOPAT2+36, RMPOPAT2+38, RMPOPAT2+39, RMPOPAT2+40
>> HCC RMPOPAT2+33*, RMPOPAT2+36*, RMPOPAT2+37, RMPOPAT2+38, RMPOPAT2+39, RMPOPAT2+40
HCC1 RMPOPAT2+31!, RMPOPAT2+38*, RMPOPAT2+41!
I EXIT!
IOF HDR+1
IOSL DIS+2
IT RMPOPAT2+11!, RMPOPAT2+55, EXIT!
IT( RMPOPAT2+49*, RMPOPAT2+50*, DIS+2, END+2, PRT+26, PRT+32, PRT+37, PRT+40*, OVER+5, OVER+9
J EXIT!
L EXIT!
>> ND RMPOPAT2+19*, RMPOPAT2+20*, RMPOPAT2+21*, RMPOPAT2+23
>> PAGE HDR+2*
>> QTY PRT+1*, PRT+22
R0 EXIT!
RA RMPOPAT2+11*, EXIT!
>> RC RMPOPAT2+44*, RMPOPAT2+49, RMPOPAT2+50, RMPOPAT2+51*, DIS+1*, DIS+2, END, END+2, OVER+5
>> REM PRT+14*, PRT+39
>> RK RMPOPAT2+11*, RMPOPAT2+46*, RMPOPAT2+47*, RMPOPAT2+48, RMPOPAT2+49, RMPOPAT2+50, RMPOPAT2+52*, DIS+1*, DIS+2*, END+2
, PRT+22, PRT+26, PRT+32, PRT+37, PRT+40, OVER+2, OVER+5, OVER+7, OVER+8, OVER+9*
>> RMPR("STA" RMPOPAT2+17
>> RMPRCNUM HDR+7
>> RMPRDFN RMPOPAT2+12, EXIT+1
>> RMPRDOB HDR+6
RMPRLPRO PRT+6*, PRT+7*, PRT+8*, PRT+9*, PRT+10*, PRT+11*, PRT+12*, PRT+29, PRT+30, PRT+31!
>> RMPRNAM HDR+3
>> RMPRSSN HDR+4
RMPRSTN EXIT!
RMPRSTN(4 PRT+35
RMYSAV EXIT!, PRT*, PRT+38
>> RZ RMPOPAT2+11*, RMPOPAT2+52*, PRT+40, OVER+2*, OVER+8*
>> SN PRT+2*, PRT+36
>> STA PRT+2*, PRT+33, PRT+34, PRT+35
>> TRANS PRT+2*, PRT+20*, PRT+27
>> TRANS1 PRT+20*, PRT+27
>> TYPE PRT+1*, PRT+16*, PRT+23, PRT+26
U RMPOPAT2+17, RMPOPAT2+18, RMPOPAT2+19, RMPOPAT2+20, RMPOPAT2+37, RMPOPAT2+41, RMPOPAT2+50, DIS+2, PRT+1, PRT+2
, PRT+3, PRT+4, PRT+6, PRT+14, PRT+16, PRT+18, PRT+19, PRT+23, PRT+26, PRT+32
, PRT+37, PRT+38, PRT+40, OVER+9
>> VEN PRT+2*, PRT+18*, PRT+30
Y DIS+2*, PRT, PRT+1, PRT+2, PRT+3, PRT+4, PRT+14, PRT+18, PRT+23, HDR+6*!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All