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

Package: Prosthetics

Routine: RMPR5N3


Information

RMPR5N3 ;HIN/RVD-PRINT INVENTORY BALANCE BY HCPCS ;3/17/03 13:19

Source Information

Source file <RMPR5N3.m>

Entry Points

Name Comments DBIA/ICR reference
EN
EN1
SEL
CONT
PRINT
WRI
TOTAL
HEAD
HEAD1
ALL ;process all items
EXIT
EXIT1
NONE

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Enter 'ALL' for all HCPCS or 'RETURN' to select individual HCPCS: "
  • Variable: RMENTER
  • Timeout: DTIME
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: $C(7)," ??",?40,"..Duplicate HCPCS"
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: !!,"Processing report......."
  • Line Location: PRINT+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WRI+11
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: WRI+12
Function Call: WRITE
  • Prompt: !,?71,"-------",!,?45,"Total ",RSA," balance = ",?71,$J(RMTOBAL,7),!,RMPR("L")
  • Line Location: TOTAL+0
Function Call: WRITE
  • Prompt: !,"*** PROSTHETICS INVENTORY BALANCE BY HCPCS ***",?68,"PAGE: ",RMPAGE,!,"Run Date: ",RMDAT,?30,"station: ",$E($P($G(^DIC(4,RS,0)),U,1),1,20)
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD1+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD1+1
Function Call: WRITE
  • Prompt: !,RMPR("L")
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !,?54,"UNIT",?60,"RE-"
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !,?55,"OF",?59,"ORDER",?68,"AVG",?75,"CUR"
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: !,"HCPCS",?9,"ITEM",?29,"SRC",?33,"LOCATION",?42,"VENDOR",?53,"ISSUE",?59,"LEVEL",?68,"COST",?75,"BAL"
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: !,"-----",?9,"----",?29,"---",?33,"--------",?42,"------",?53,"-----",?59,"-----",?68,"----",?75,"---"
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: !!,"NO DATA !!!!!"
  • Line Location: NONE+0

FileMan Files Accessed Via FileMan Db Call

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