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

Package: Accounts Receivable

Routine: PRCAUDT


Information

PRCAUDT ;SF - ISC/YJK-AUDIT A NEW BILL/EDIT INCOMPLETE AR ;10/17/96 5:33 PM

Source Information

Source file <PRCAUDT.m>

Call Graph

Call Graph

Call Graph Total: 23

Package Total Call Graph
Accounts Receivable 12 $$ACCK^PRCAACC  EN^PRCACPV  SEGMT^PRCAEOL  EN^PRCAFBD  (CPLK,DISPLACC)^PRCAFUT  (M1,M2)^PRCAMESG  (EN,SIG)^PRCASIG  (CAUSED,RETN,THIRD,UPBALN,WOBIL)^PRCAUDT1  
UPSTATS^PRCAUT2  COMMENTS^PRCAUT3  BILLN^PRCAUTL  LOCKF^PRCAWO1  
VA FileMan 8 NOW^%DTC  ^DIC  YN^DICN  ^DIE  CLEAN^DILF  EN1^DIP  $$GET1^DIQ  ^DIR  
Integrated Billing 2 ^IBCAMS  $$BILLREJ^IBJTU6  
MailMan 1 SENDMSG^XMXAPI  

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

Package Total Caller Graph
Accounts Receivable 11 PRCAA AUDIT  PRCABIL1  PRCABJ2  PRCAEIN  PRCAEOL  PRCAFBD  PRCAOLD  PRCARETN  
PRCASET  PRCAUDT1  PRCAWREA  
Integrated Billing 1 IBCEST  

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**1,21,57,97,143,107,173,321,342**;Mar 20, 1995;Build 7
AUDITB(PRCABN,PRAUTOA,LOOP) ;
; PRCABN = the ien of the entry to audit or 0 for batch entry above
; PRAUTOA = 1 for auto-audit
; LOOP = 1 if looping through bills, 0 if not
END
BULL(PRCABN) ; Send a bulletin for auto audit errors
; PRCABN = ien of bill in file 430
DIC
DIE
DISPL ;display the accounts receivable data user has entered.
ASK
ASK1
ASK2
ASK3
SIG
SIG1
MESSG
SEGMT
UPSEG ;
CKSITE ;check site parameter and user number.
MTCHK
AUDITX(PRCABN) ; Auto audit a bill
  • ICR #4043
    • Status: Active
    • Usage: Private
    SETERR(TEXT) ;
    BILL(PRCABN) ; Returns AR bill number in external format
    BILLREJ(PRCABN) ; EP Check if bill has reject messages. Added for PRCA*4.5*321
    ; Input - PRCABN - Internal Entry number from ACCOUNTS RECEIVABLE file [#430]
    ; (Note - file #399 has same IEN as file #430)
    ; Output - 1 - Reject messages 0 - No Reject messages
    PAUSE(MSG) ; Display message and pause till user responds
    ; INPUT - MSG - Message to display to user
    ; Output - None

    External References

    Name Field # of Occurrence
    NOW^%DTC SIG+3
    ^DIC CKSITE+2
    YN^DICN ASKASK1ASK2ASK3
    ^DIE DIE+2
    CLEAN^DILF END+1
    EN1^DIP DISPL+2
    $$GET1^DIQ CKSITE+2, BILLREJ+5
    ^DIR V+3, PAUSE+7
    ^IBCAMS SEGMT
    $$BILLREJ^IBJTU6 BILLREJ+6
    $$ACCK^PRCAACC AUDITB+43, DIE+1
    EN^PRCACPV AUDITB+44
    SEGMT^PRCAEOL UPSEG+2
    EN^PRCAFBD AUDITB+43
    CPLK^PRCAFUT DIE+1
    DISPLACC^PRCAFUT AUDITB+31, ASK1+2
    M1^PRCAMESG ASK+1
    M2^PRCAMESG ASK1+1
    EN^PRCASIG SIG1
    SIG^PRCASIG SIG+2
    CAUSED^PRCAUDT1 AUDITB+39
    RETN^PRCAUDT1 AUDITB+57
    THIRD^PRCAUDT1 AUDITB+38
    UPBALN^PRCAUDT1 AUDITB+42
    WOBIL^PRCAUDT1 DISPL+2
    UPSTATS^PRCAUT2 AUDITB+53
    COMMENTS^PRCAUT3 AUDITB+40
    BILLN^PRCAUTL DIC
    LOCKF^PRCAWO1 DIE
    SENDMSG^XMXAPI BULL+8

    Interaction Calls

    Name Line Occurrences
    Function Call: WRITE
    • Prompt: !
    • Line Location: V+3
    Function Call: WRITE
    • Prompt: !!,"*** Loop Done ***",!!
    • Line Location: AUDITB+10
    Function Call: WRITE
    • Prompt: *7,!!,Z,!,?10,Z0,!!,Z1,!!
    • Line Location: AUDITB+50
    Function Call: WRITE
    • Prompt: !,PRCA("MESG")
    • Line Location: AUDITB+55
    Function Call: WRITE
    • Prompt: !
    • Line Location: DIE+0
    Function Call: WRITE
    • Prompt: !,"IS THIS DATA CORRECT"
    • Line Location: ASK+0
    Function Call: WRITE
    • Prompt: !!,"Do you want to edit this information "
    • Line Location: ASK1+0
    Function Call: WRITE
    • Prompt: !!,"Then do you want to return this bill to the service"
    • Line Location: ASK2+0
    Function Call: WRITE
    • Prompt: !,"Answer 'Y' (YES) or 'N' (NO)"
    • Line Location: ASK2+1
    Function Call: WRITE
    • Prompt: !,"Are you sure you want to return"
    • Line Location: ASK3+0
    Function Call: WRITE
    • Prompt: "Answer 'Y' (YES) if you want to return this bill to the service that originated it. If not, answer 'N' (NO)."
    • Line Location: ASK3+1
    Function Call: WRITE
    • Prompt: !!,?3,Z,?3,Z0,!
    • Line Location: MTCHK+5
    Function Call: WRITE
    • Prompt: !!,MSG,!
    • Line Location: PAUSE+4
    Routine Call
    • DIC
    • Line Location:
      • CKSITE+2
    Routine Call
    • DIE
    • Line Location:
      • DIE+2
    Routine Call
    • DIR
    • Line Location:
      • V+3
      • PAUSE+7

    FileMan Files Accessed Via FileMan Db Call

    FileNo Call Tags
    ^DGCR(399 - [#399] GET1^DIQ
    ^DIC(4 - [#4] Classic Fileman Calls,  GET1^DIQ
    ^PRCA(430 - [#430] Classic Fileman Calls

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DGCR(399 - [#399] SEGMT
    ^PRCA(430 - [#430] AUDITB+10, AUDITB+13, AUDITB+16, AUDITB+17, AUDITB+24, AUDITB+27*, AUDITB+29*, AUDITB+39, ENDSIG+3*
    , SIG1*, UPSEG+1, MTCHK+1, AUDITX+3, BILL+1
    ^PRCA(430.2 - [#430.2] AUDITB+26, AUDITB+27, AUDITB+28, AUDITB+29
    ^RC(342 - [#342] CKSITE+2
    ^TMP($J BULL+6, AUDITX+2!, AUDITX+4, AUDITX+6, AUDITX+7!, SETERR+1*
    ^VA(200 - [#200] SIG+1, SIG1

    Label References

    Name Line Occurrences
    $$BILL AUDITB+11, AUDITB+25, AUDITB+28, BULL+8, MTCHK+7, AUDITX+3
    $$BILLREJ AUDITB+15, AUDITB+21
    ASK AUDITB+35, ASK+1, ASK1+2
    ASK1 ASK1+1
    ASK2 ASK2+1
    ASK3 ASK3+1
    AUDITB V+4, AUDITX+4
    BULL AUDITX+6
    CKSITE AUDITB+12
    DIC AUDITB+20
    DIE ASK1+2
    DISPL AUDITB+31, ASK1+2
    END V+3, AUDITB+25, AUDITB+28, AUDITB+35, AUDITB+36, AUDITB+46, AUDITB+56, AUDITB+58, AUDITB+59
    MESSG AUDITB+33
    MTCHK AUDITB+37
    PAUSE AUDITB+22
    SEGMT AUDITB+27
    SETERR AUDITB+25, AUDITB+28, AUDITB+52, MTCHK+7, AUDITX+3
    SIG AUDITB+41
    SIG1 AUDITB+55
    UPSEG AUDITB+42

    Naked Globals

    Name Field # of Occurrence
    ^( BULL+6, MTCHK+1
    ^(0 AUDITB+16, AUDITB+17, AUDITB+24, AUDITB+27, AUDITB+28, AUDITB+29, UPSEG+1*

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    % END!, ASK*, ASK+1, ASK+2, ASK1*, ASK1+1, ASK1+2, ASK2*, ASK2+1, ASK3*
    ASK3+1, ASK3+2, SIG+3
    BILLNO BILLREJ+4~, BILLREJ+5*, BILLREJ+6
    BY DISPL+1~, DISPL+2*
    CT BULL+2~, BULL+3*, BULL+4*, BULL+5*, BULL+6*
    D0 END!
    DA END!, DIE*, SIG+2*
    DI END!
    DIC END!, DIC*, DIE*, DISPL+1~, DISPL+2*, CKSITE+1~, CKSITE+2*
    DIC("A" CKSITE+2*
    DIC("B" CKSITE+2*
    DIC("S" AUDITB+19*
    DIC(0 DIC*, CKSITE+2*
    DIE END!, DIE*, DIE+2!
    DILOCKTM AUDITX+3
    DIR V+2~, V+3!, END!, PAUSE+3~
    DIR("A" V+3*, PAUSE+6*
    DIR("B" V+3*
    DIR(0 V+3*, PAUSE+5*
    DIROUT END!, PAUSE+3~
    DIRUT V+3, END!, PAUSE+3~
    DR END!, DIE+2*!
    DTOUT PAUSE+3~
    DUOUT END!, PAUSE+3~
    DUZ SIG+3, SIG1
    ERR AUDITB+43, AUDITB+44, AUDITB+46, AUDITB+48, END!
    FLDS DISPL+1~, DISPL+2*
    FR DISPL+1~, DISPL+2*
    IO(0 DISPL+2
    IOP DISPL+1~, DISPL+2*
    J END!
    L DISPL+1~, DISPL+2*
    LOOP V+2~, V+3*, V+4, AUDITB~, AUDITB+10, AUDITB+13, AUDITB+14
    MSG PAUSE~, PAUSE+4
    PRAUTOA AUDITB~, AUDITB+5, AUDITB+6, AUDITB+11, AUDITB+14, AUDITB+25, AUDITB+28, AUDITB+31, AUDITB+34, AUDITB+35
    , AUDITB+49, AUDITB+55, AUDITB+57, SIG+1, SIG+2, SIG+3, MTCHK+4, AUDITX+1~
    PRC END!
    PRCA AUDITB+4~
    PRCA("APPR" AUDITB+17*
    PRCA("AUTO_AUDIT" AUDITB+5*
    PRCA("CKSITE" AUDITB+11*, AUDITB+12, CKSITE+3*
    PRCA("EXIT" AUDITB+32, AUDITB+35, AUDITB+36, AUDITB+37!, AUDITB+40, AUDITB+41!, AUDITB+45!, DIE+2, ASK*, ASK1*
    , ASK2*, ASK3*, MTCHK+8*
    PRCA("LOCK" DIE*
    PRCA("MESG" AUDITB+9*, AUDITB+44*, AUDITB+55
    PRCA("SEG" AUDITB+16*
    PRCA("SITE" AUDITB+11*, CKSITE+2*
    PRCA("STATUS" AUDITB+17*, AUDITB+53*
    PRCABN AUDITB~, AUDITB+10, AUDITB+11, AUDITB+13*, AUDITB+15, AUDITB+16, AUDITB+17, AUDITB+20, AUDITB+21, AUDITB+24
    , AUDITB+25, AUDITB+27, AUDITB+28, AUDITB+29, AUDITB+39, AUDITB+43, AUDITB+44, END, BULL~, BULL+8
    DIEDIE+1, DISPL+1, DISPL+2, SIG+2, SIG+3, SIG1SEGMTUPSEG+1, MTCHK+1
    MTCHK+7, AUDITX~, AUDITX+3, AUDITX+4, AUDITX+6, BILL~, BILL+1, BILLREJ~, BILLREJ+5
    PRCABT AUDITB+7!
    PRCADUZ SIG~, SIG+1*, SIG+3
    PRCAE BULL+2~
    PRCAE( BULL+4*, BULL+5*, BULL+6*
    PRCAI MTCHK~, MTCHK+1*
    PRCAKT AUDITB+24*, AUDITB+25, AUDITB+27, AUDITB+28, AUDITB+29!, AUDITB+43, AUDITB+44, END!, DIE+1
    PRCAMT MTCHK~, MTCHK+1*
    PRCAMT1 MTCHK~, MTCHK+1*, MTCHK+2, MTCHK+3
    PRCANM END!, SIG+1*, SIG+3, SIG1*
    PRCAOK AUDITB+34*, AUDITB+36, AUDITB+39, END!, ASK+2*
    PRCARETN AUDITB+34*, AUDITB+57, END!, ASK3+2*
    PRCARI AUDITB+26*, AUDITB+27, END!
    PRCASEG AUDITB+4~, AUDITB+27*
    PRCASIG AUDITB+41*, END!, SIG+3*
    PRCAT AUDITB+11!, AUDITB+12!, AUDITB+28*, AUDITB+38, END!, UPSEG+1*
    PRCAT("C" AUDITB+29*
    PRCATY AUDITB+16*, END!
    PREND AUDITB+4~, AUDITB+5*, AUDITB+6, AUDITB+10*, AUDITB+12*, AUDITB+13*, AUDITB+18, AUDITB+20*, AUDITB+31, AUDITB+32*
    , AUDITB+35*
    PRQUIT AUDITB+4~, AUDITB+8*, AUDITB+14, AUDITB+15*, AUDITB+18, AUDITB+21*
    RETURN BILLREJ+4~, BILLREJ+6*, BILLREJ+7
    TEXT SETERR~, SETERR+1
    TO DISPL+1~, DISPL+2*
    U AUDITB+16, AUDITB+17, AUDITB+24, AUDITB+27, AUDITB+28, AUDITB+29, AUDITB+39, AUDITB+48, SIG+3, SIG1
    UPSEG+1, BILL+1
    X V+2~, AUDITB+4~, AUDITB+27*, PAUSE+3~
    XMB BULL+2~
    XMBODY BULL+2~, BULL+7*, BULL+8
    XMERR BULL+2~
    XMFULL BULL+2~
    XMINSTR BULL+2~
    XMTO BULL+2~, BULL+8
    XMTO("I:G.RCD PE PAYMENTS" , BULL+3*
    XMTYPE BULL+2~
    XMZ BULL+2~
    XX AUDITB+4~
    Y V+2~, V+3, AUDITB+4~, AUDITB+27*, SEGMT*, CKSITE+2, PAUSE+3~
    Z AUDITB+47~, AUDITB+48*, AUDITB+50, AUDITB+52, BULL+2~, BULL+5*, BULL+6*, MTCHK~, MTCHK+3*, MTCHK+5
    MTCHK+7
    Z0 AUDITB+29*!, AUDITB+47~, AUDITB+48*, AUDITB+50, AUDITB+52, END!, MTCHK~, MTCHK+3*, MTCHK+5, MTCHK+7
    Z1 AUDITB+47~, AUDITB+48*, AUDITB+50, AUDITB+52
    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