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

Package: Prosthetics

Routine: RMPRPIYE


Information

RMPRPIYE ;PHX/RFM,RVD-EDIT ISSUE FROM STOCK ;3/8/05 08:04

Source Information

Source file <RMPRPIYE.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;EDIT STOCK ISSUES
INVSE
CO ;DISPLAYS STOCK ISSUE
EDX ;POST
DEL ;
EDT ;edit patient 2319
EDU
2 ;S DIC(0)="AEQM",DIC=661 S:$P(R1(0),U,6) DIC("B")=$P(^RMPR(661,$P(R1(0),U,6),0),U) S DIC("A")="ITEM: "
HCPCS ;scanning an item is mandatory.
CPT ;ask for CPT Modifier
VEN0 ;process vendor
SOURCE ;
QTY
CP
SET ;set the original variables.
SET60 ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,$C(7),"Someone else is Editing this entry!"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: @IOF,!?30,RMPRNAM,!
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EDU+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HCPCS+1

FileMan Files Accessed Via FileMan Db Call

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