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

Package: IFCAP

Routine: PRCHPAT


Information

PRCHPAT ;ID/RSD-CREATE ENTRY IN FILE 442 ;1/13/93 15:46

Source Information

Source file <PRCHPAT.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA FileMan 3 ^%DT  (,IX)^DIC  YN^DICN  
IFCAP 2 ^PRCFY  DOCID^PRCHUTL  

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

Package Total Caller Graph
IFCAP 15 PRCEOB  PRCESOE  PRCHAM5  PRCHDEP3  PRCHE  PRCHE2  PRCHEA  PRCHEB  
PRCHEC  PRCHEI  PRCHESE  PRCHMA1  PRCHREC  PRCHRPT  PRCOPHA  
Accounts Receivable 3 FISCAL YEAR  PRCAPAT  PRCATA1  

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**46,176**;Oct 20, 2000;Build 11
EN ;ENTER NEW PAT IN FILE 442;
ENPO
EN2
ENPO1
NUM
Z
CHKCNS ;check common numbering series
W1
W2
W3
ENPOQ
EN1 ;INPUT TRANSFORM FOR APPROPRIATION IN FILE 430
  • ICR #807
    • Status: Active
    • Usage: Private
    EN1Q
    EN3 ;LOOK UP PO IN FILE 442
    EN4 ;set appropriation to the flat field in the 430,AR file.

    External References

    Name Field # of Occurrence
    ^%DT ENPO1
    ^DIC ENPO1
    IX^DIC ENPO+5, EN2CHKCNS+9, CHKCNS+16, EN1+2, EN3+5
    YN^DICN Z+1
    ^PRCFY EN1+3
    DOCID^PRCHUTL ENPO1+2

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !!,"ENTER A NEW ",PRCHP("A")," OR A COMMON NUMBERING SERIES"
    • Line Location: ENPO+3
    Function Call: READ
    • Variable: X
    • Timeout: DTIME
    • Line Location: ENPO+4
    Function Call: WRITE
    • Prompt: !?3,PRCHP("A"),": "
    • Line Location: ENPO+4
    Function Call: WRITE
    • Prompt: !?3,PRCHP("A")," ",X," already exist !"
    • Line Location: EN2+3
    Function Call: WRITE
    • Prompt: !?3," Not a valid Common Numbering Series.",$C(7)
    • Line Location: CHKCNS+19
    Function Call: WRITE
    • Prompt: !?3," Common numbering series is being edited by another user, try later",$C(7)
    • Line Location: W1+0
    Function Call: WRITE
    • Prompt: !?3,"UPPER BOUND HAS BEEN EXCEEDED FOR COMMON NUMBERING SERIES ",$P(Y,U,2),$C(7)
    • Line Location: W2+0
    Function Call: WRITE
    • Prompt: " PAT Number already exist, please try again ",$C(7)
    • Line Location: W3+0
    Function Call: WRITE
    • Prompt: !!
    • Line Location: EN3+5
    Routine Call
    • DIC
    • Line Location:
      • ENPO1
    Routine Call
    • DIC
    • Line Location:
      • ENPO+5
      • EN2
      • CHKCNS+9
      • CHKCNS+16
      • EN1+2
      • EN3+5

    FileMan Files Accessed Via FileMan Db Call

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

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^PRC(442 - [#442] EN2+3, ENPO1+1*, ZEN3+5
    ^PRC(442.6 - [#442.6] NUMZ+1, Z+2*, W2
    ^PRCA(430 - [#430] EN1+1, EN1+2*, EN4+1*
    ^PRCD(442.3 - [#442.3] EN3+5
    ^PRCD(442.5 - [#442.5] EN+2

    Label References

    Name Line Occurrences
    CHKCNS EN2+2
    EN1Q EN1+2
    EN4 EN1Q
    ENPO ENPO+5, EN2EN2+2, EN2+3, ENPO1Z+1, W1+1, W2+1, W3+1
    ENPO1 Z+3
    ENPOQ ENPO+4, ENPO1+3
    NUM EN2
    W1 NUM
    W2 Z
    W3 ENPO1
    Z Z

    Naked Globals

    Name Field # of Occurrence
    ^(12 ENPO1+1*

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % Z+1*
    %DT ENPO1*, ENPOQ!
    CNS CHKCNS+2~, CHKCNS+4*, CHKCNS+5, CHKCNS+12
    >> D ENPO+5*, EN2*, CHKCNS+7*, CHKCNS+14*, EN1+2*, EN3+2*
    D0 EN3+1!
    DA EN+3!, ENPO1*, ENPO1+1, EN1+1, EN1Q*, EN3+1!, EN3+5*
    DA(1 EN1+1, EN1Q*, EN4+1
    DIC EN+3!, ENPO*, ENPO1*, CHKCNS+8*, CHKCNS+15*, ENPOQ!, EN1+2*, EN1Q!, EN3+1!*, EN3+5!
    DIC("A" EN3+3*
    DIC("S" ENPO+1*, ENPO+2*, ENPO1!, EN1+1*, EN3+3*
    DIC(0 ENPO*, EN2+3*, Z+2*, CHKCNS+6*, CHKCNS+13*, EN1+2*, EN3+1*
    >> DILOCKTM NUM
    DLAYGO EN+3!, ENPO1*, ENPOQ!
    DQ EN3+1!
    DTIME ENPO+4
    DUZ EN+2, ENPO1+1
    ERR EN+5~, EN2+2, CHKCNS+3*, CHKCNS+18*
    >> L NUM*, Z
    >> PRC("APP" EN1+3*, EN1Q!
    >> PRC("FY" EN1+3*
    >> PRC("FYI" EN1+3*, EN1Q!
    >> PRC("SITE" EN+2, EN2+3, EN3+1
    >> PRCHDELV EN3+2
    PRCHNEW EN3+1!
    PRCHP ENPOQ!, EN3+5!
    PRCHP("A" EN+3*, ENPO+3, ENPO+4, EN2+3, Z+1, EN3+3
    PRCHP("NEW" ENPO1*
    PRCHP("S" EN+4*, EN3+3
    PRCHP("S2" ENPO+2
    PRCHP("T" EN+2, ENPO1+1
    >> PRCHPC EN3+2
    PRCHPO EN+2!, ENPO1*, ENPO1+1, EN3+1!, EN3+5*
    SAVEX CHKCNS+2~, CHKCNS+3*, CHKCNS+10, CHKCNS+20
    U ENPO+4, ENPO1ENPO1+1, NUMZZ+2, W2EN1+1, EN1+2, EN1+3
    EN3+5, EN4+1
    X ENPO+4*, ENPO+5, EN2EN2+2, EN2+3*, ENPO1*, NUM*, Z*, Z+1, CHKCNS+3
    CHKCNS+4, CHKCNS+5*, CHKCNS+10*, CHKCNS+12*, CHKCNS+20*, EN1+2!*, EN1+3*, EN3+5*, EN4+1
    Y EN2ENPO1ENPO1+1, NUMZZ+1, Z+2, CHKCNS+2~, CHKCNS+10, CHKCNS+11
    CHKCNS+17, W2EN1+2, EN3+5
    Y(0 NUMZEN1+2, EN1+3
    >> Z NUM*, Z*, Z+2
    Z0 EN1+1*, EN1+2, EN1Q!, EN4+1*!
    Z1 EN1+1*, EN1+2, EN1Q!
    Z2 EN1+1*, EN1+3, EN1Q!
    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