Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PRCOPHA

Package: IFCAP

Routine: PRCOPHA


Information

PRCOPHA ;WISC/DJM-IFCAP PHA RETRANSMIT ROUTINE ;1/14/98 17:47

Source Information

Source file <PRCOPHA.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
IFCAP 3 ^PRCFSITE  EN3^PRCHPAT  NEW^PRCOPHA1  
VA FileMan 2 YN^DICN  ^DIE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IFCAP 1 PRCO EDI RETRAN  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
START ;SELECT PO FROM FILE 442 TO RETRANSMIT
QUERY

External References

Name Field # of Occurrence
YN^DICN QUERY
^DIE QUERY
^PRCFSITE START+2
EN3^PRCHPAT START+2
NEW^PRCOPHA1 QUERY

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No P.O. selected...quitting"
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !!,"This P.O. has never been sent to Austin in a PHA transaction. It can't be",!,"sent using this option."
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"The Purchasing Agent has specified that this order not go out EDI.",!,"This P.O. can't be sent using this option."
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!,"For some reason there is no vendor listed in this P.O. This P.O. can't be",!,"processed in this option."
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !!,"This P.O. is not going to a vendor that can accept a P.O. electronically.",!,"This P.O. can't be sent in this option."
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,"Do you want to re-transmit PO "
  • Line Location: QUERY+0
Function Call: WRITE
  • Prompt: $P(AA,U)
  • Line Location: QUERY+0
Function Call: WRITE
  • Prompt: $P(AA,U)
  • Line Location: QUERY+0
Function Call: WRITE
  • Prompt: !!,"If you have an EDI TRANSACTION REPORT for a rejected PHA transaction",!,"and have corrected the P.O. answer YES to send a new PHA transaction."
  • Line Location: QUERY+1
Routine Call
  • DIE
  • Line Location:
    • QUERY

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRC(442 - [#442] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(440 - [#440] START+6
^PRC(442 - [#442] START+3, START+5, QUERY

Label References

Name Line Occurrences
QUERY QUERY+1
START QUERY

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+1~, QUERY*, QUERY+1
AA START+1~, START+3*, START+4, QUERY*
DA START+1~, QUERY*
DIE START+1~, QUERY*
DR START+1~, QUERY*
>> PRC("SITE" START+2
>> PRCF("X" START+2*
>> PRCHP("S" START+2*
PRCHPO START+1~, START+2, START+3, START+5, QUERY
U START+3, START+4, START+6, QUERY
VAR2 START+1~, QUERY*
XX START+1~, START+5*, START+6
YY START+1~, START+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All