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

Package: IFCAP

Routine: PRCSPC


Information

PRCSPC ;WISC/KMB-PURCHASE CARD UPDATE CP FILES ;2/17/98 @ 1:02 PM

Source Information

Source file <PRCSPC.m>

Entry Points

Name Comments DBIA/ICR reference
COMM(DA,SDATE) ; set committed balance for PC order with no 2237
  • ICR #6651
    • Status: Active
    • Usage: Private
    UPDATE ;
    LOOK ; lookup for purchase card orders
    TESTL ;
    SET
    ARR
    LOOK1 ;
    REF ;Stop users atempting to enter a past date and clean up the P.O. DATE

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !,"Contact your Site manager for an electronic signature code"
    • Line Location: UPDATE+10
    Function Call: WRITE
    • Prompt: !,"PURCHASE CARD NAME: ",$P($G(^PRC(440.5,VALUE1,0)),"^",11),$S(VALUE1=0:"",1:"//")
    • Line Location: LOOK+8
    Function Call: WRITE
    • Prompt: " ",$P($G(^PRC(440.5,VALUE1,0)),"^",11)
    • Line Location: LOOK+9
    Function Call: WRITE
    • Prompt: " ",$P($G(^PRC(440.5,VALUE1,0)),"^",11)
    • Line Location: LOOK+10
    Function Call: WRITE
    • Prompt: !!,?5,"No card selected...",$C(7)
    • Line Location: LOOK+13
    Function Call: WRITE
    • Prompt: !!,?5,"Card selection interrupted...",$C(7)
    • Line Location: LOOK+14
    Function Call: WRITE
    • Prompt: !,"You are not a purchase card holder."
    • Line Location: LOOK+15
    Function Call: WRITE
    • Prompt: "??"
    • Line Location: LOOK+16
    Function Call: WRITE
    • Prompt: "??"
    • Line Location: TESTL+1
    Function Call: WRITE
    • Prompt: " ??"
    • Line Location: TESTL+9
    Function Call: WRITE
    • Prompt: " ??"
    • Line Location: TESTL+10
    Function Call: WRITE
    • Prompt: "??"
    • Line Location: TESTL+11
    Function Call: WRITE
    • Prompt: ?50,"Inactive Purchase Card.",!
    • Line Location: SET+3
    Function Call: WRITE
    • Prompt: !,I,?5,$P(AA(DUZ,I),"^",2)
    • Line Location: LOOK1+7
    Function Call: READ
    • Variable: XXZ
    • Timeout: DTIME
    • Line Location: LOOK1+9
    Function Call: WRITE
    • Prompt: !,I,?5,$P(AA(DUZ,I),"^",2)
    • Line Location: LOOK1+14
    Function Call: READ
    • Variable: XXZ
    • Timeout: DTIME
    • Line Location: LOOK1+16
    Function Call: WRITE
    • Prompt: !,"CHOOSE ",STA,"-",FIN,": "
    • Line Location: LOOK1+16
    Info |  Source |  Entry Points |  Interaction Calls