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

Package: Prosthetics

Routine: RMPRPIFD


Information

RMPRPIFD ;PHX/RFM,RGB-DELETE ISSUE FROM STOCK ;8/27/07 07:27

Source Information

Source file <RMPRPIFD.m>

Entry Points

Name Comments DBIA/ICR reference
DEL1 ;ENTRY POINT TO DELETE AN ISSUE FROM STOCK
DEL1A ;ASK IF INACTIVE ITEM
DEL1B
DEL2 ;call API for returning item to PIP
EXIT ;KILL VARIABLES AND EXIT ROUTINE

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: 4
  • Line Location: DEL1B+3
Function Call: WRITE
  • Prompt: !!," *** Scanned HCPCS has been deleted from HCPCS Item Master (ASHI). CANNOT delete previous issue."
  • Line Location: DEL1B+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DEL1B+3
Function Call: WRITE
  • Prompt: !!,"** STOCK ISSUE DELETE ABORTED",!!
  • Line Location: DEL2+3
Function Call: WRITE
  • Prompt: !!,"*** ERROR in PCE DELETE, Please notify your IRM..660 IEN = ",RMPRIEN,!!
  • Line Location: DEL2+5
Function Call: WRITE
  • Prompt: !,"*** Error in API RMPRPIU3, ERROR = ",RMCHK,!,"*** Please inform your IRM !!",!
  • Line Location: DEL2+8
Function Call: WRITE
  • Prompt: $C(7),!?10,"Deleted..."
  • Line Location: DEL2+10
Info |  Source |  Entry Points |  Interaction Calls