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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PRCHMA1

Package: IFCAP

Routine: PRCHMA1


Information

PRCHMA1 ;WISC/AKS/DWA-Amendments to purchase orders and requisitions ;6/8/96 13:42

Source Information

Source file <PRCHMA1.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
IFCAP 10 EDIT^PRC0B  EN4^PRCHAMXB  EN0^PRCHAMXH  PAID^PRCHINQ  TOP^PRCHMA  MV^PRCHMA0  CAN^PRCHMA3  EN^PRCHPAT  
ENPO^PRCHUTL  $$VERIFY^PRCSC2  
VA FileMan 4 %XY^%RCR  ^DIC  WAIT^DICD  ^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: 3

Package Total Caller Graph
IFCAP 3 PRCH7C  PRCHMA  PRCHMA0  

Entry Points

Name Comments DBIA/ICR reference
EN4 ;Line Item edit
EN4A ;Called from routine PRCHMA2B for chenge vendor amendments to enable
EN4B ;Called from routine PRCHMA2C for change vendor amendments to enable
EN5 ;Source Code edit
EN6 ;Edit Mail Invoice to
EN7 ;Edit Method of Payment
EN8 ;Administrative Certification add
EN9 ;Administrative Certification delete
EN13 ;Replace P.O. Number
MVADM ;Move Administrative Certifications from file 442
ERCHK
KILL ;Kill
ERR
PCD ;PRC*5.1*79 - Check line items of Detailed PC orders with source code=6

External References

Name Field # of Occurrence
%XY^%RCR EN13+24, MVADM+3
^DIC EN4+26, EN5+5, EN8+3, EN9+3
WAIT^DICD MVADM+1
^DIE EN4A+16, EN5+6, EN6+2, EN7+2, EN9+4, EN13+28, EN13+29, EN13+32
EDIT^PRC0B EN4A+9
EN4^PRCHAMXB EN13+30
EN0^PRCHAMXH EN4B+9
PAID^PRCHINQ EN13+9
TOP^PRCHMA PCD+2
MV^PRCHMA0 EN4+25
CAN^PRCHMA3 EN13+4
EN^PRCHPAT EN13+18, EN13+19
ENPO^PRCHUTL EN13+20
$$VERIFY^PRCSC2 EN13+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN4+10
Function Call: WRITE
  • Prompt: !,?15,"****************** TAKE NOTE!! ********************"
  • Line Location: EN4+11
Function Call: WRITE
  • Prompt: !,?15,"* *"
  • Line Location: EN4+12
Function Call: WRITE
  • Prompt: !,?15,"* This order has a Receiving Report previously *"
  • Line Location: EN4+13
Function Call: WRITE
  • Prompt: !,?15,"* processed. If this amendment will alter the *"
  • Line Location: EN4+14
Function Call: WRITE
  • Prompt: !,?15,"* Total Cost of any line item on the order *"
  • Line Location: EN4+15
Function Call: WRITE
  • Prompt: !,?15,"* remember to back out the previous Receiving *"
  • Line Location: EN4+16
Function Call: WRITE
  • Prompt: !,?15,"* Report with an Adjustment Voucher, process *"
  • Line Location: EN4+17
Function Call: WRITE
  • Prompt: !,?15,"* the amendment, and rerun the Receiving *"
  • Line Location: EN4+18
Function Call: WRITE
  • Prompt: !,?15,"* Report. *"
  • Line Location: EN4+19
Function Call: WRITE
  • Prompt: !,?15,"* *"
  • Line Location: EN4+20
Function Call: WRITE
  • Prompt: !,?15,"***************************************************"
  • Line Location: EN4+21
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN4+22
Function Call: WRITE
  • Prompt: !
  • Line Location: EN4B+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EN5+6
Function Call: WRITE
  • Prompt: !
  • Line Location: EN6+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN7+2
Function Call: WRITE
  • Prompt: !
  • Line Location: EN8+4
Function Call: WRITE
  • Prompt: !?5,$S($D(PRCHREQ):"REQUISITION",1:"PURCHASE ORDER")_" HAS BEEN RECEIVED, CANNOT CANCEL !",$C(7)
  • Line Location: EN13+5
Function Call: WRITE
  • Prompt: !,?5,"THERE HAS BEEN PAYMENT MADE FOR THIS PURCHASE CARD ORDER, CANNOT CANCEL !",$C(7)
  • Line Location: EN13+10
Function Call: WRITE
  • Prompt: !!,?5,"This requisition has been tampered with.",!,?5,"Please notify IFCAP APPLICATION COORDINATOR.",!
  • Line Location: EN13+14
Function Call: WRITE
  • Prompt: !
  • Line Location: EN13+33
Function Call: WRITE
  • Prompt: !,"Line item ",+NODE0," is missing its description!",!
  • Line Location: ERCHK+2
Function Call: WRITE
  • Prompt: !,"Line item ",+NODE0," is missing BOC !",!
  • Line Location: ERCHK+3
Function Call: WRITE
  • Prompt: !,"Line item ",+NODE0," is missing NSN !",!
  • Line Location: ERCHK+4
Function Call: WRITE
  • Prompt: !,"Line item ",+NODE0," is incomplete !",!
  • Line Location: ERCHK+5
Function Call: WRITE
  • Prompt: !,"Line item ",+NODE0," does contain contract number.",!
  • Line Location: ERCHK+6
Function Call: WRITE
  • Prompt: !!?5,"To "_$S($D(PRCHREQ):$P(^PRCD(441.6,32,0),U,2),1:$P(^PRCD(442.2,32,0),U,2))_" it must be the ONLY change you",!?5,"are making on the amendment."
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !!,?5,"Line item ",+$P(PRCHLN,U)," is missing a required contract number.",$C(7)
  • Line Location: PCD+2
Routine Call
  • DIC
  • Line Location:
    • EN4+26
    • EN5+5
    • EN8+3
    • EN9+3
Routine Call
  • DIE
  • Line Location:
    • EN4A+16
    • EN5+6
    • EN6+2
    • EN7+2
    • EN9+4
    • EN13+28
    • EN13+29
    • EN13+32

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRCD(420.8 - [#420.8] Classic Fileman Calls
^PRC(443.6 - [#443.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(443.6 MVADM+4
^PRC(440 - [#440] EN4A+3
^PRC(442 - [#442] EN4+6, EN4+8, EN13+9, EN13+22, ERCHK+6, PCD+2
^PRC(443.6 - [#443.6] EN4+25, EN4A+2, EN4A+3, EN4A+4, EN4A+5, EN4A+8, EN4B+2, EN4B+4, EN4B+5, EN5+4
EN13+11, EN13+12, EN13+13, EN13+16, EN13+25!, MVADM+1, MVADM+4*, ERCHK+1, ERCHK+2, ERCHK+5
ERCHK+6, PCD+2
^PRCD(420.8 - [#420.8] EN5+4
^PRCD(441.6 - [#441.6] ERR
^PRCD(442.2 - [#442.2] ERR

Label References

Name Line Occurrences
EN4A EN4+25
EN4B EN4A+6
ERCHK EN4B+9
ERR EN13+11, EN13+12
MVADM EN8+2, EN9+2

Naked Globals

Name Field # of Occurrence
^( EN4+25
^(0 MVADM+1
^(1 EN5+4
^(18 EN13+22
^(2 EN4B+4, EN4B+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% KILL+3!
%A KILL+3!
%B KILL+3!
%X EN13+23~, EN13+24*, MVADM+2~, MVADM+3*
%Y EN13+23~, EN13+24*, MVADM+2~, MVADM+3*
A KILL+1!
AA KILL+4!
B KILL+1!
>> CAN EN13+33*
D0 KILL+3!
D1 KILL+3!
DA EN4+5~, EN4A+11*, EN5+6*, EN6+1~, EN6+2*, EN7+1~, EN7+2*, EN8+1~, EN9+1~, EN9+4*
EN13+23~, EN13+26*, EN13+28!, EN13+29*!, EN13+31*
DA(1 EN4+26*, EN8+2*, EN8+3, EN9+2*, EN9+3, EN9+4, EN13+31*
DELIVER EN4B+8*, EN13+33*, KILL+1!
DIC EN4+5~, EN4+26*, EN5+2*, EN5+5!, EN8+3*!, EN9+3*!, KILL+2!
DIC("B" EN5+4*
DIC("S" EN5+3*
DIC(0 EN4+26*, EN5+2*, EN8+3*, EN9+3*
DIE EN4+5~, EN4A+11*, EN4A+16!, EN5+1~, EN5+6*!, EN6+1~, EN6+2*, EN7+1~, EN7+2*, EN8+1~
EN9+1~, EN9+4*!, EN13+23~, EN13+26*, EN13+28!, EN13+29*!, EN13+31*
DIE("NO^" EN4A+12*
DLAYGO EN8+1~, EN8+3*
DR EN4+5~, EN4A+12*, EN4A+14*, EN4A+15*, EN5+1~, EN5+6*, EN6+1~, EN6+2*, EN7+1~, EN7+2*
EN8+1~, EN9+1~, EN9+4*, EN13+23~, EN13+27*, EN13+28!, EN13+29*!, EN13+31*
>> END PCD+2
ER EN13+1~, EN13+2*, KILL+1!
>> ERROR ERCHK+1*, ERCHK+2*, ERCHK+3*, ERCHK+4*, ERCHK+5*, ERCHK+6*
FIS KILL+1!
FL KILL+1!
I EN13+1~, EN13+2*, EN13+25*, KILL+2!
>> LCNT PCD+2
>> LNCT PCD+2*
MOP EN4+5~, EN4+6*, EN4+8, EN4+9, EN4+24!
NDOC EN13+22*, EN13+28!
>> NOCAN EN13+5
NODE0 ERCHK~, ERCHK+1*, ERCHK+2, ERCHK+3, ERCHK+4, ERCHK+5, ERCHK+6
OK EN13+1~, EN13+13*, EN13+14*
OUT KILL+1!
P2237 EN13+1~, EN13+13*, EN13+14
PAID EN13+9!
PRCF KILL+1!
>> PRCH EN13+17*, EN13+21, EN13+29, EN13+30, EN13+31, EN13+33, PCD+2
PRCH0 EN13+1~, EN13+16*, EN13+17
PRCHAM EN13+11, EN13+12, EN13+31, KILL+1!
PRCHAMDA KILL+1!
PRCHAMT EN4B+3*, KILL+2!
PRCHAREC EN4+5~, EN4B+4*, KILL+2!
>> PRCHAUTH EN4A+14, EN4A+15, EN13+9, ERCHK+4
PRCHAV KILL+2!
PRCHEDI EN4+5~, EN4A+3*, KILL+2!
PRCHER KILL+4!, PCD+2*
PRCHI EN4+5~, EN4+25*, EN4+26*, EN4A+2, EN4B+2, EN4B+4, EN4B+5, EN4B+6, EN4B+7, EN4B+10!
ERCHK+1, ERCHK+2, ERCHK+5, ERCHK+6
PRCHI1 EN4+5~, EN4+25*, EN4+26*
PRCHIMP EN13+19, KILL+3!
PRCHL1 KILL+2!
PRCHL2 KILL+2!
PRCHLN KILL+4!, PCD+2
PRCHN EN4+5~, EN4B+2*, EN4B+3, EN13+1~, EN13+22*, KILL+2!
PRCHNEW KILL+1!
PRCHNORE KILL+3!
PRCHNRQ EN13+1~, EN13+15*, EN13+18, KILL+3!
PRCHO EN4+5~, EN4A+2*, EN4B+3, EN13+1~, EN13+17*, KILL+3!
PRCHP KILL+3!
PRCHP("A" EN13+18*, EN13+19*
PRCHP("S" EN13+18*, EN13+19*
PRCHP("T" EN13+18*, EN13+19*
PRCHPO EN4+6, EN4+8, EN4+26, EN4A+2, EN4A+3, EN4A+4, EN4A+5, EN4A+11, EN4B+2, EN4B+4
EN4B+5, EN5+4, EN5+6, EN6+2, EN7+2, EN8+2, EN9+2, EN13+9, EN13+11, EN13+12
EN13+13, EN13+16, EN13+17, EN13+21*, EN13+22, EN13+25, EN13+26, EN13+30*, EN13+33*, MVADM+1
MVADM+4, ERCHK+1, ERCHK+2, ERCHK+5, ERCHK+6, KILL+1!, KILL+3!, PCD+2
PRCHPONO EN4+5~, EN4A+5*
PRCHQ KILL+4!
>> PRCHREQ EN4A+12, EN5+3, EN13+5, EN13+15, ERCHK+4, ERR
PRCHRET KILL+4!
PRCHSTN EN4+5~, EN4A+4*
PRCHU KILL+4!
PRCHVN KILL+4!
PRCHX KILL+3!
PRCHX( EN4B+6*, EN4B+7*
>> PRCPAMT EN4A+9
>> PRCPROST EN4+25, EN4A+6
>> PRCRI( EN4+25, EN4A+8*, EN4A+9
REPO EN13+33*, KILL+3!
RETURN KILL+1!
ROU KILL+2!
SSO EN4+5~, EN4+6*, EN4+7, EN4+24!
U EN4+6, EN4+8, EN4+25, EN4+26, EN4A+3, EN4A+4, EN4A+5, EN4B+4, EN4B+5, EN4B+6
EN4B+7, EN5+4, EN13+9, EN13+11, EN13+12, EN13+13, EN13+17, EN13+22, MVADM+1, MVADM+4
ERCHK+3, ERCHK+4, ERCHK+6, ERRPCD+2
X EN4+25*, EN4A+7~, EN4A+9, EN13+1~, EN13+2*, EN13+30*, KILL+2!
Y EN4+26, EN5+5, EN5+6, EN9+4, KILL+2!
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 |  Naked Globals |  Local Variables  | All