Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(665 - [#665] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call