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  | All
Print Page as PDF
Routine: RMPORLP

Package: Prosthetics

Routine: RMPORLP


Information

RMPORLP ;(NG)/DG/CAP /HINES-CIOFO/HNC- HOME OXY PTS ;7/24/98

Source Information

Source file <RMPORLP.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 NOW^%DTC  EN1^DIP  ^DIR  
Kernel 1 KILL^XUSCLEAN  
Prosthetics 1 HOSITE^RMPOUTL0  
Registration 1 ^VADPT  

Entry Points

Name Comments DBIA/ICR reference
SITE ;Set up site variables.
LI ;List the sought patient. ;DW
EXIT ;
DIOEND ;
CNT ;COUNT NAMES
GET ;Get the primary item. ;DW
SSN ;GET SSN
SDT ;GET START DATE (USE INITIAL OXYGEN RX DATE)
EDT ;Expiration Date of current Rx.
EDTX ;Rx Expiration Date.
RPTHDR ;Report header

External References

Name Field # of Occurrence
NOW^%DTC LI+6, EDTX+4
EN1^DIP LI+13
^DIR LI+14
HOSITE^RMPOUTL0 SITE+1
^VADPT SSN+4
KILL^XUSCLEAN EXIT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?47,"Total Patients: ",COUNT
  • Line Location: DIOEND+2
Function Call: WRITE
  • Prompt: !,?38,"Total Deceased Patients: ",RMPRDCNT
  • Line Location: DIOEND+4
Function Call: WRITE
  • Prompt: RPTDT,?(40-($L(RA)/2)),RA,?68,"Page: "_PAGE
  • Line Location: RPTHDR+2
Function Call: WRITE
  • Prompt: !," '*' denotes deceased patient by SSN"
  • Line Location: RPTHDR+3
Function Call: WRITE
  • Prompt: !?22,"Alphabetical List Home Oxygen Patients",!?68,"Date Current",!?68,"Prescription"
  • Line Location: RPTHDR+4
Function Call: WRITE
  • Prompt: !,"Patient",?25,"SSN",?29,"Primary Item",?61,"Active",?70,"Expires"
  • Line Location: RPTHDR+5
Function Call: WRITE
  • Prompt: !,"=======================",?24,"====",?29,"==============================",?60,"======== ==========",!
  • Line Location: RPTHDR+6
Routine Call
  • DIR
  • Line Location:
    • LI+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(665 - [#665] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" LI+6
^DPT - [#2] SSN+3
^PRC(441 - [#441] GET+8
^RMPR(661 - [#661] GET+6
^RMPR(665 - [#665] GET+2, GET+4, SDT+2, EDT+2, EDT+3, EDT+6, EDTX+6, EDTX+7, EDTX+8
^TMP($J EXIT+1!

Label References

Name Line Occurrences
CNT SSN+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LI+6
>> BY LI+1*
C EDTX+2~*, EDTX+6*, EDTX+11
>> COUNT LI+5*, DIOEND+1*, DIOEND+2, CNT+1*
D EDT+1~*, EDT+2*, EDT+3, EDTX+2~*, EDTX+6*, EDTX+7
>> D0 GET+2, GET+4, SSN+3, SSN+4, SDT+2, EDT+2, EDT+3, EDT+6, EDTX+6, EDTX+7
EDTX+8
>> DASH LI+5*
>> DFN SSN+4*
>> DHD LI+8*
>> DIC LI+1*
>> DIOEND LI+10*
DIR LI+14!
DIR(0 LI+14*
>> DIS(0 LI+3*
EDT EDTX+2~*, EDTX+8*, EDTX+9
>> FLDS LI+11*
>> FLDS(2 LI+12*
>> FR LI+1*
J EDT+1~*, EDT+3*, EDTX+2~*, EDTX+7*, EDTX+8
>> L LI+1*
>> PAGE LI+2*, RPTHDR+1*, RPTHDR+2
RA GET+1~*, GET+2*, GET+4, SDT+1~, SDT+2*, SDT+3, EDT+1~*, EDT+3*, EDT+5, EDT+6
RPTHDR+1~*, RPTHDR+2
>> RMEND LI+5*, LI+14
>> RMPO("NAME" RPTHDR+1
RMPOEXP SSN+1~, SSN+2*, SSN+3*, SSN+5
>> RMPORPT LI+5*, LI+14
>> RMPOXITE SITE+1
RMPR EXIT+2~
>> RMPRDCNT LI+2*, DIOEND+3*, DIOEND+4, SSN+3*
RMPRSITE EXIT+2~
>> RPTDT LI+7*, RPTHDR+2
RR GET+1~*, GET+4*, GET+6*, GET+8*, GET+9
>> SPACE LI+5*
TD EDTX+2~, EDTX+4*
U GET+2, GET+4, GET+6, SDT+2, EDT+6, EDTX+8
VA SSN+4!
VA("PID" SSN+5
VADM SSN+4!
>> X CNT+1, GET+1*, GET+9*, SSN+2*, SSN+5*, SDT+1*, SDT+3*, EDT+1*, EDT+7*, EDTX+2*
EDTX+4*, EDTX+9*, EDTX+11*
Y LI+6*, LI+7, EDT+1~*, EDT+6*, EDT+7
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  | All