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

Package: Prosthetics

Routine: RMPRPIYS


Information

RMPRPIYS ;HINCIO/ODJ - RC - PIP Receive Stock ;10/8/02 13:11

Source Information

Source file <RMPRPIYS.m>

Entry Points

Name Comments DBIA/ICR reference
PB
STN
HCPCS
HCPCS2
HCPCS3
HCPCS3A
HCPCS4
CURST
NLAB
SELP
PBX
PRINT
SELD
PNOW ;jump here if not queued.
PRINTC
PRINTX
NLABP(RMPRNLAB,RMPRMAX,RMPREXC) ;
NLABPX
NLABPH2
BARC(RMPRBARC,RMPREXC) ;
BARC1
BARCX
BARCH
SCAN
SCAN1
SCANX
SCANE
CPT(RDA) ;
CPTX
UPCASE(RMPRSTR) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: STN+1
Function Call: WRITE
  • Prompt: !!,"Print Bar code Labels for current inventory...",!
  • Line Location: HCPCS+0
Function Call: WRITE
  • Prompt: !,"** No HCPCS selected..."
  • Line Location: HCPCS2+4
Function Call: WRITE
  • Prompt: !!,"HCPCS: "_RMPR1("HCPCS")_" "_RMPR1("SHORT DESC")
  • Line Location: HCPCS4+0
Function Call: WRITE
  • Prompt: !!,"IFCAP Item: ",RMPR11("ITEM MASTER")
  • Line Location: HCPCS4+1
Function Call: WRITE
  • Prompt: !!,"PIP Item desc.: ",RMPR11("DESCRIPTION")
  • Line Location: HCPCS4+2
Function Call: WRITE
  • Prompt: !,"This item is not currently in stock.",!!
  • Line Location: CURST+6
Function Call: WRITE
  • Prompt: !
  • Line Location: NLAB+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SELD+1
Function Call: WRITE
  • Prompt: !!,"** WARNING - This is NOT a Zebra Bar Code Printer!!",!!
  • Line Location: SELD+3
Function Call: WRITE
  • Prompt: "Type in the number of bar code labels you want to print for the",!
  • Line Location: NLABPH2+0
Function Call: WRITE
  • Prompt: "inventory item you have selected.",!
  • Line Location: NLABPH2+1
Function Call: WRITE
  • Prompt: "If you have access to a bar code scanner, use it to scan the item bar code now.",!
  • Line Location: BARCH+0
Function Call: WRITE
  • Prompt: "Don't press the [Enter] key as the scanner should do this automatically.",!
  • Line Location: BARCH+1
Function Call: WRITE
  • Prompt: "If the scanner cannot read the bar code, type in the character sequence",!
  • Line Location: BARCH+2
Function Call: WRITE
  • Prompt: "immediately below the bar code.",!
  • Line Location: BARCH+3
Function Call: WRITE
  • Prompt: !,"** No HCPCS Selected due to null HCPCS entered..."
  • Line Location: SCAN1+4
Function Call: WRITE
  • Prompt: !,"** No HCPCS Selected or Unable to Select Inactive HCPCS..."
  • Line Location: SCAN1+14
Function Call: WRITE
  • Prompt: !,"*** The Item scanned is not available, please update your inventory !!!"
  • Line Location: SCAN1+19
Function Call: WRITE
  • Prompt: !,"This item is not associated with an IFCAP Item.",!
  • Line Location: SCAN1+44
Function Call: WRITE
  • Prompt: "Please use the Edit Inventory option before trying to issue this item."
  • Line Location: SCAN1+45
Function Call: WRITE
  • Prompt: !
  • Line Location: SCAN1+46
Function Call: WRITE
  • Prompt: !,"A problem has occurred with the scan, please try again.",!
  • Line Location: SCANE+0
Info |  Source |  Entry Points |  Interaction Calls