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

Package: IFCAP

Routine: PRCHEA


Information

PRCHEA ;WOIFO/ID/RSD,SF-ISC/TKW-EDIT ROUTINES FOR SUPPLY SYSTEM ;3/5/98 11:05 AM

Source Information

Source file <PRCHEA.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**81**;Oct 20, 2000
EN3 ;ADD A REQUISITION
EN30
EN4 ;EDIT A REQUISITION
EN40
EN5 ;EDIT BOC IN ITEM FILE
EN6 ;AMENDMENTS
EN60
EN7 ;CANCEL UNOBLIGATED PO
EN70
EN8 ;GRAB A PO NUMBER
EN80
EN81
EN82
Q
LCK1
LCK
ST

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ??",$C(7)
  • Line Location: EN40+4
Function Call: WRITE
  • Prompt: !?3,^(I,0)
  • Line Location: EN5+1
Function Call: WRITE
  • Prompt: !
  • Line Location: EN5+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN5+2
Function Call: WRITE
  • Prompt: $C(7),!,"Amendments not allowed until after order has been Obligated!!"
  • Line Location: EN60+3
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: EN60+4
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: EN70+3
Function Call: WRITE
  • Prompt: $C(7),!!,"WARNING--2237 HAS NOT BEEN REMOVED FROM THIS ORDER!!"
  • Line Location: EN70+4
Function Call: WRITE
  • Prompt: ?40," <NOTHING CANCELLED>",$C(7)
  • Line Location: EN70+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN80+0
Function Call: WRITE
  • Prompt: !!,"How many Purchase Order numbers do you want: "
  • Line Location: EN80+0
Function Call: WRITE
  • Prompt: " ??",$C(7),!,"Enter a number between 1 and 5."
  • Line Location: EN80+0
Function Call: WRITE
  • Prompt: !?37,PRCHX(I)
  • Line Location: EN80+3
Function Call: READ
  • Formatting: !!
  • Prompt: "Press RETURN to continue"
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN80+4
Function Call: WRITE
  • Prompt: !?3,"UPPER BOUND HAS BEEN EXCEEDED FOR COMMON NUMBERING SERIES ",$P(PRCHY,U,2),$C(7)
  • Line Location: EN82+0
Function Call: WRITE
  • Prompt: !
  • Line Location: Q+0
Function Call: WRITE
  • Prompt: !,$C(7),"ANOTHER USER IS EDITING THIS ENTRY!"
  • Line Location: LCK+0

FileMan Files Accessed Via FileMan Db Call

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