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

Package: IFCAP

Routine: PRCH7D


Information

PRCH7D ;WISC/PLT - PURCHASE CARD HOME OXYGEN ORDER (BILLING) INTERFACE ; 8/23/99 2:45pm

Source Information

Source file <PRCH7D.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
IFCAP 13 (DCLOCK,EDIT,ICLOCK)^PRC0B  ADD^PRC0B1  $$DATE^PRC0C  DUZ^PRCFSITE  C2237^PRCH442A  (AMENDNO,INFO)^PRCHAMU  (EN2,EN8)^PRCHAMXB  LCK1^PRCHE  
$$VERIFY^PRCHES5  (CAN1,ENC)^PRCHMA  (,PROS)^PRCHNPO  Q^PRCHNPO4  ENPO^PRCHUTL  
VA FileMan 1 ^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
Prosthetics 3 RMPOBILU  RMPOPST1  RMPOPST2  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
ADD(PRCA) ;add new order
  • ICR #2897
    • Status: Active
    • Usage: Private
    ADDEX
    EDITIC(PRCA,PRCB,PRCC) ;edit order with patient and patient amount
  • ICR #2897
    • Status: Active
    • Usage: Private
    OBL(X,PRCA,PRCB,PRCC) ;obligate order, prca="" not in use, prcb=ri of file 442, prcc=monthly total amount of home oxygen bill
  • ICR #2897
    • Status: Active
    • Usage: Private
    CANIC(PRCA) ;cancel order, prca=ien of file 442
    CAN(X,PRCA,PRCB,PRCC) ;cancel home oxygen billing order
    CANEX
    PRC(X) ;x = ien of file 442, return PRC local array for site, bbfy, fy, qtr

    External References

    Name Field # of Occurrence
    ^DIE OBL+9, OBL+16
    DCLOCK^PRC0B CAN+14
    EDIT^PRC0B EDITIC+6, CANIC+3
    ICLOCK^PRC0B CAN+13
    ADD^PRC0B1 ADDEX+4, EDITIC+11
    $$DATE^PRC0C PRC+1
    DUZ^PRCFSITE ADD+4, OBL+4, CAN+7, PRC+3
    C2237^PRCH442A CANIC+4
    AMENDNO^PRCHAMU CAN+14
    INFO^PRCHAMU CAN+15
    EN2^PRCHAMXB CAN+16
    EN8^PRCHAMXB CAN+17, CAN+19
    LCK1^PRCHE ADD+8
    $$VERIFY^PRCHES5 CAN+12
    CAN1^PRCHMA CAN+19
    ENC^PRCHMA CAN+19
    ^PRCHNPO ADD+8
    PROS^PRCHNPO OBL+18
    Q^PRCHNPO4 ADDEX+8
    ENPO^PRCHUTL ADD+8

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,?5,"This purchase order has been tampered with.",!,?5,"Please notify IFCAP APPLICATION COORDINATOR.",!
    • Line Location: CAN+12
    Routine Call
    • DIE
    • Line Location:
      • OBL+9
      • OBL+16

    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)
    ^DD(442 OBL+11
    ^PRC(411 - [#411] ADD+6, PRC+3
    ^PRC(440.5 - [#440.5] OBL+8
    ^PRC(442 - [#442] ADD+8, ADDEX, OBL+8, OBL+10, OBL+11*, CAN+11, PRC+1
    ^PRC(443.6 - [#443.6] CAN+16, CAN+18

    Label References

    Name Line Occurrences
    ADDEX ADD+8
    CANEX CAN+12, CAN+14, CAN+15, CAN+19
    CANIC ADDEX+6, OBL+19
    PRC EDITIC+5, OBL+4

    Naked Globals

    Name Field # of Occurrence
    ^(0 CAN+18
    ^(1 PRC+1
    ^(23 ADDEX, PRC+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % CANIC+4!, CAN+5~
    %A CANIC+4!, CAN+5~
    %B CANIC+4!, CAN+5~
    A ADD+3~, ADDEX*, ADDEX+2*, ADDEX+4, EDITIC+1~, EDITIC+9*, EDITIC+11, OBL+1~, OBL+8*, CANIC+1~
    , CAN+4~, CAN+11*
    B ADD+3~, EDITIC+1~, OBL+1~, CANIC+1~, CAN+4~, CAN+13*
    CAN CAN+3~, CAN+8*, CAN+18*, CAN+19
    D0 CAN+5~
    D1 CAN+5~
    DA ADD+3~, ADD+8, ADDEXADDEX+6, EDITIC+1~, OBL+9*, OBL+12*, CANIC+4*!, CAN+17*, CAN+19*
    DA(1 OBL+12*, CAN+17*, CAN+19*
    DEL CAN+20!
    DELIVER CAN+4~
    DIC CAN+6~
    DIE OBL+1~, OBL+9*, OBL+12*
    DR OBL+9*!, OBL+13*
    DR(1 OBL+14*, OBL+15*
    ER CAN+4~, CAN+15, CAN+19
    FIS CAN+4~, CAN+20!
    FL CAN+4~, CAN+15*
    FLG1 EDITIC+3~*
    I CAN+6~
    J CAN+5~
    LCNT CAN+4~
    N OBL+2~
    NET OBL+2~
    NOCAN CAN+3~, CAN+19
    OUT ADD+2~, CAN+3~
    PO OBL+2~
    PODIEPRC OBL+2~
    PRC ADD+1~, EDITIC+1~, OBL+2~, CAN+1~
    PRC("BBFY" PRC+1*
    PRC("FY" PRC+2*
    PRC("PARAM" ADD+6*, PRC+3*
    PRC("QTR" PRC+2*
    PRC("SITE" ADD+5*, ADD+6, CAN+11*, PRC+1*, PRC+3
    PRCA ADD~, ADD+5, ADDEX*, ADDEX+1, ADDEX+6*, ADDEX+8~, EDITIC~, EDITIC+6, OBL~, CANIC~
    , CANIC+3, CANIC+4, CAN~
    PRCB EDITIC~, EDITIC+5, EDITIC+6, OBL~, OBL+4, OBL+6, CAN~, CAN+10
    PRCC EDITIC~, EDITIC+8, EDITIC+10, OBL~, OBL+7, CAN~
    PRCF CAN+3~
    PRCHAM CAN+3~, CAN+14, CAN+17, CAN+18, CAN+19
    PRCHAMDA CAN+4~, CAN+17*, CAN+19*
    PRCHAMT CAN+6~, CAN+15*
    PRCHAREC CAN+6~
    PRCHAU CAN+3~
    PRCHAUTH CAN+1~, CAN+9*
    PRCHAV CAN+4~, CAN+15
    PRCHBOC1 ADD+2~, EDITIC+2~, OBL+3~, OBL+8*
    PRCHBOCC OBL+3~
    PRCHCC ADD+2~, EDITIC+2~
    PRCHCD ADD+2~, EDITIC+2~, OBL+2~
    PRCHCDF ADD+2~, EDITIC+2~
    PRCHCDFT ADD+2~, EDITIC+2~
    PRCHCDNO ADD+2~, EDITIC+2~
    PRCHCI OBL+2~
    PRCHCPO OBL+2~
    PRCHDLOC ADD+2~, EDITIC+2~
    PRCHEDI CAN+6~
    PRCHER CAN+3~
    PRCHFCP EDITIC+2~
    PRCHHLDR ADD+2~, EDITIC+2~
    PRCHIEN ADD+2~, EDITIC+2~
    PRCHII ADD+2~, EDITIC+2~
    PRCHIMP CAN+5~
    PRCHL1 CAN+4~
    PRCHL2 CAN+6~
    PRCHLN CAN+4~
    PRCHLOG EDITIC+2~
    PRCHN EDITIC+2~, OBL+3~, CAN+6~
    PRCHN("SFC" OBL+10*
    PRCHNEW CAN+3~, CAN+8*, CAN+17
    PRCHNN ADD+2~, EDITIC+2~
    PRCHNORE CAN+5~, CAN+8*
    PRCHNRQ CAN+5~
    PRCHO CAN+6~
    PRCHOBL OBL+2~
    PRCHOM EDITIC+1~, EDITIC+4*
    PRCHON CAN+3~
    PRCHP CAN+5~
    PRCHP0 ADD+2~, EDITIC+2~
    PRCHPC ADD+1~, ADD+7*, EDITIC+1~, EDITIC+4*, OBL+1~, OBL+5*, CANIC+1~, CANIC+2*
    PRCHPO ADD+8, EDITIC+2~, OBL+3~, OBL+7*, OBL+9, OBL+11, OBL+12, CAN+3~, CAN+5~, CAN+10*
    , CAN+12, CAN+13, CAN+14, CAN+16, CAN+17, CAN+18, CAN+19
    PRCHPOMT OBL+2~
    PRCHPONO EDITIC+2~
    PRCHRET CAN+4~
    PRCHSP OBL+2~
    PRCHSTN EDITIC+2~
    PRCHTOT EDITIC+2~, OBL+3~, OBL+7*, OBL+9
    PRCHVEN ADD+2~, EDITIC+2~
    PRCHX CAN+5~, CAN+17*, CAN+19*
    PRCHXXX ADD+2~, EDITIC+2~
    PRCPROST ADD+1~, ADD+7*, ADDEX, EDITIC+1~, EDITIC+4*, OBL+1~, OBL+5*, OBL+19, CANIC+1~, CANIC+2*
    , CAN+1~, CAN+9*, CANEX
    PRCRI ADD+1~, EDITIC+1~, EDITIC+8*, OBL+1~, CAN+1~
    PRCRI(420 ADD+5*
    PRCRI(440 ADD+5*
    PRCRI(442 ADDEX*, ADDEX+2, EDITIC+6*, EDITIC+9, OBL+6*, OBL+7, OBL+8, OBL+10, OBL+19, CAN+10*
    , CAN+11
    PRCSINV OBL+2~
    PRCY ADD+2~, EDITIC+2~
    RECORD1 OBL+2~
    RECORD10 OBL+2~
    RECORD2 OBL+2~
    RECORD3 OBL+2~
    RECORD4 OBL+2~
    REPO CAN+5~, CAN+20!
    RETURN CAN+3~
    ROU CAN+6~
    SFUND CAN+6~
    SHPGBOC OBL+2~
    STA OBL+2~
    STR1 ADD+2~, EDITIC+2~
    U OBL+8, OBL+10, OBL+11, CAN+16, CAN+18
    X ADD+3~, ADD+6*, ADDEX+3*, ADDEX+4, EDITIC+6, EDITIC+8, EDITIC+10*, EDITIC+11, OBL~, OBL+19*
    , CANIC+1~, CANIC+3, CAN~, CAN+16*, CAN+17*, CAN+19*, CANEX*, PRC~, PRC+1*, PRC+2
    X1 OBL+2~
    Y ADD+3~, ADDEX+4, EDITIC+11, OBL+1~, OBL+18, CANIC+1~, CAN+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