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

Package: Prosthetics

Routine: RMPR4C2


Information

RMPR4C2 ;;HINES-OI/HNC - PURCHASE CARD VERIFY PC# FOR RECONCILIATION;10/29/2001

Source Information

Source file <RMPR4C2.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry Point
PCRD ;ask purchase card number
PCRDN
PRINT
CK ;set tmp of list to compare with 440.6
COMP ;Enter RETURN to continue or '^' to exit:
ST ;continue if user didn't want out, or time out
HDR ;header
EXIT ;Common Exit

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?5,"Verify and Repair Purchase Card Number Associated with the"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,?5,"ORACLE Document for Reconciliation"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,?5,"You Must Be the Card Holder of both OLD and NEW Cards!",!!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,$C(7),"Invalid Date Range Selection!!"
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"Try Later!"
  • Line Location: PCRD+4
Function Call: WRITE
  • Prompt: !,"Must be 16-Digit Number."
  • Line Location: PCRD+5
Function Call: WRITE
  • Prompt: !,$C(7),$C(7),"Try Later!"
  • Line Location: PCRDN+3
Function Call: WRITE
  • Prompt: !,"Must be 16-Digit Number."
  • Line Location: PCRDN+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !!,"*** NO DATA TO PRINT ***",!!
  • Line Location: ST+2
Function Call: WRITE
  • Prompt: ?63,"|"
  • Line Location: ST+7
Function Call: WRITE
  • Prompt: ?65,"Okay"
  • Line Location: ST+36
Function Call: WRITE
  • Prompt: ?65,"Diff Card #"
  • Line Location: ST+41
Function Call: WRITE
  • Prompt: !,"Record in use by another user. Try Later!"
  • Line Location: ST+47
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,RMPRX_"-",RMPRY," Verify PC# "_RMPRPCRD_" STA "_$$STA^RMPRUTIL,?72,"PAGE ",PAGE,!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Order Date",?14,"Order Number",?28,"|",?30,"ORACLE PC #",?50,"VISA II",?63,"|",?65,"Record Status",!,RMPR("L")
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: EXIT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCH(440.6 - [#440.6] Classic Fileman Calls,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call