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  (,FILE)^DIE  CLEAN^DILF  EN1^DIP  $$GET1^DIQ  ^DIR  
Integrated Billing 2 ^IBCAMS  $$BILLREJ2^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: 13

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

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**1,21,57,97,143,107,173,321,342,349,446**;Mar 20, 1995;Build 15
AUDITB(PRCABN,PRAUTOA,LOOP,RTYPES) ;
; 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
; RTYPES = Array of rate types to display (if not defined, show all rate types) (PRCA*4.5*349)
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
    ; Changed for PRCA*4.5*349 to only return 1 if there any reject messages with
    ; uncompleted reviews instead of if there were any reject messages at all
    ; 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 ASK, ASK1, ASK2, ASK3
    ^DIE DIE+2
    FILE^DIE SIG+10, SIG1+5
    CLEAN^DILF END+1
    EN1^DIP DISPL+2
    $$GET1^DIQ AUDITB+18, CKSITE+2, BILLREJ+7
    ^DIR V+3, V+10, PAUSE+7
    ^IBCAMS SEGMT
    $$BILLREJ2^IBJTU6 BILLREJ+8
    $$ACCK^PRCAACC AUDITB+51, DIE+1
    EN^PRCACPV AUDITB+52
    SEGMT^PRCAEOL UPSEG+2
    EN^PRCAFBD AUDITB+51
    CPLK^PRCAFUT DIE+1
    DISPLACC^PRCAFUT AUDITB+39, ASK1+2
    M1^PRCAMESG ASK+1
    M2^PRCAMESG ASK1+1
    EN^PRCASIG SIG1
    SIG^PRCASIG SIG+2
    CAUSED^PRCAUDT1 AUDITB+47
    RETN^PRCAUDT1 AUDITB+65
    THIRD^PRCAUDT1 AUDITB+46
    UPBALN^PRCAUDT1 AUDITB+50
    WOBIL^PRCAUDT1 DISPL+2
    UPSTATS^PRCAUT2 AUDITB+61
    COMMENTS^PRCAUT3 AUDITB+48
    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: !!,"Select rate types to loop through, or hit 'Enter' for all rate types.",!
    • Line Location: V+7
    Function Call: WRITE
    • Prompt: !!,"*** Loop Done ***",!!
    • Line Location: AUDITB+11
    Function Call: WRITE
    • Prompt: *7,!!,Z,!,?10,Z0,!!,Z1,!!
    • Line Location: AUDITB+58
    Function Call: WRITE
    • Prompt: !,PRCA("MESG")
    • Line Location: AUDITB+63
    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
    • DIE
    • Line Location:
      • SIG+10
      • SIG1+5
    Routine Call
    • DIR
    • Line Location:
      • V+3
      • V+10
      • 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+11, AUDITB+14, AUDITB+24, AUDITB+25, AUDITB+32, AUDITB+35*, AUDITB+37*, AUDITB+47, END, SIG1
    , UPSEG+1, MTCHK+1, AUDITX+3, BILL+1
    ^PRCA(430.2 - [#430.2] AUDITB+34, AUDITB+35, AUDITB+36, AUDITB+37
    ^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+12, AUDITB+33, AUDITB+36, BULL+8, MTCHK+7, AUDITX+3
    $$BILLREJ AUDITB+23, AUDITB+29
    ASK AUDITB+43, ASK+1, ASK1+2
    ASK1 ASK1+1
    ASK2 ASK2+1
    ASK3 ASK3+1
    AUDITB V+15, AUDITX+4
    BULL AUDITX+6
    CKSITE AUDITB+13
    DIC AUDITB+28
    DIE ASK1+2
    DISPL AUDITB+39, ASK1+2
    END V+3, V+13, AUDITB+33, AUDITB+36, AUDITB+43, AUDITB+44, AUDITB+54, AUDITB+64, AUDITB+66, AUDITB+67
    MESSG AUDITB+41
    MTCHK AUDITB+45
    PAUSE AUDITB+30
    SEGMT AUDITB+35
    SETERR AUDITB+33, AUDITB+36, AUDITB+60, MTCHK+7, AUDITX+3
    SIG AUDITB+49
    SIG1 AUDITB+63
    UPSEG AUDITB+50

    Naked Globals

    Name Field # of Occurrence
    ^( BULL+6, MTCHK+1
    ^(0 AUDITB+24, AUDITB+25, AUDITB+32, AUDITB+35, AUDITB+36, AUDITB+37, 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+9
    BILLNO BILLREJ+6~, BILLREJ+7*, BILLREJ+8
    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+27*
    DIC(0 DIC*, CKSITE+2*
    DIE END!, DIE*, DIE+2!
    >> DILOCKTM AUDITX+3
    DIR V+2~, V+3!, V+6~, END!, PAUSE+3~
    DIR("A" V+3*, V+9*, PAUSE+6*
    DIR("B" V+3*
    DIR(0 V+3*, V+9*, PAUSE+5*
    DIROUT END!, PAUSE+3~
    DIRUT V+3, END!, PAUSE+3~
    DR END!, DIE+2*!
    DTOUT V+5, V+8, V+13, PAUSE+3~
    DUOUT V+5, V+8, V+13, END!, PAUSE+3~
    DUZ SIG+7, SIG1
    ERR AUDITB+51, AUDITB+52, AUDITB+54, AUDITB+56, END!
    FDA SIG+5~, SIG1+2~
    FDA(430 SIG+7*, SIG+8*, SIG+9*, SIG1+4*
    FLDS DISPL+1~, DISPL+2*
    FR DISPL+1~, DISPL+2*
    IENS SIG+5~, SIG+6*, SIG+7, SIG+8, SIG+9, SIG1+2~, SIG1+3*, SIG1+4
    IO(0 DISPL+2
    IOP DISPL+1~, DISPL+2*
    J END!
    L DISPL+1~, DISPL+2*
    LOOP V+2~, V+3*, V+5, V+15, AUDITB~, AUDITB+11, AUDITB+14, AUDITB+16, AUDITB+22
    MSG PAUSE~, PAUSE+4
    PRAUTOA AUDITB~, AUDITB+6, AUDITB+7, AUDITB+12, AUDITB+22, AUDITB+33, AUDITB+36, AUDITB+39, AUDITB+42, AUDITB+43
    , AUDITB+57, AUDITB+63, AUDITB+65, SIG+1, SIG+2, SIG+7, MTCHK+4, AUDITX+1~
    PRC END!
    PRCA AUDITB+5~
    PRCA("APPR" AUDITB+25*
    PRCA("AUTO_AUDIT" AUDITB+6*
    PRCA("CKSITE" AUDITB+12*, AUDITB+13, CKSITE+3*
    PRCA("EXIT" AUDITB+40, AUDITB+43, AUDITB+44, AUDITB+45!, AUDITB+48, AUDITB+49!, AUDITB+53!, DIE+2, ASK*, ASK1*
    , ASK2*, ASK3*, MTCHK+8*
    PRCA("LOCK" DIE*
    PRCA("MESG" AUDITB+10*, AUDITB+52*, AUDITB+63
    PRCA("SEG" AUDITB+24*
    PRCA("SITE" AUDITB+12*, CKSITE+2*
    PRCA("STATUS" AUDITB+25*, AUDITB+61*
    PRCABN AUDITB~, AUDITB+11, AUDITB+12, AUDITB+14*, AUDITB+18, AUDITB+23, AUDITB+24, AUDITB+25, AUDITB+28, AUDITB+29
    , AUDITB+32, AUDITB+33, AUDITB+35, AUDITB+36, AUDITB+37, AUDITB+47, AUDITB+51, AUDITB+52, END, BULL~
    , BULL+8, DIE, DIE+1, DISPL+1, DISPL+2, SIG+2, SIG+6, SIG1, SIG1+3, SEGMT
    , UPSEG+1, MTCHK+1, MTCHK+7, AUDITX~, AUDITX+3, AUDITX+4, AUDITX+6, BILL~, BILL+1, BILLREJ~
    , BILLREJ+7
    PRCABT AUDITB+8!
    PRCADUZ SIG~, SIG+1*, SIG+7
    PRCAE BULL+2~
    PRCAE( BULL+4*, BULL+5*, BULL+6*
    PRCAI MTCHK~, MTCHK+1*
    PRCAKT AUDITB+32*, AUDITB+33, AUDITB+35, AUDITB+36, AUDITB+37!, AUDITB+51, AUDITB+52, END!, DIE+1
    PRCAMT MTCHK~, MTCHK+1*
    PRCAMT1 MTCHK~, MTCHK+1*, MTCHK+2, MTCHK+3
    PRCANM END!, SIG+1*, SIG+3, SIG+8, SIG1*, SIG1+4
    PRCAOK AUDITB+42*, AUDITB+44, AUDITB+47, END!, ASK+2*
    PRCARETN AUDITB+42*, AUDITB+65, END!, ASK3+2*
    PRCARI AUDITB+34*, AUDITB+35, END!
    PRCASEG AUDITB+5~, AUDITB+35*
    PRCASIG AUDITB+49*, END!, SIG+11*
    PRCAT AUDITB+12!, AUDITB+13!, AUDITB+36*, AUDITB+46, END!, UPSEG+1*
    PRCAT("C" AUDITB+37*
    PRCATY AUDITB+24*, END!
    PREND AUDITB+5~, AUDITB+6*, AUDITB+7, AUDITB+11*, AUDITB+13*, AUDITB+14*, AUDITB+26, AUDITB+28*, AUDITB+39, AUDITB+40*
    , AUDITB+43*
    PRQUIT AUDITB+5~, AUDITB+9*, AUDITB+16, AUDITB+19*, AUDITB+20*, AUDITB+22, AUDITB+23*, AUDITB+26, AUDITB+29*
    RATETYPE AUDITB+17~, AUDITB+18*, AUDITB+19, AUDITB+20
    RETURN BILLREJ+6~, BILLREJ+8*, BILLREJ+9
    RTYPES V+2~, V+15, AUDITB~, AUDITB+16
    RTYPES( V+12*, AUDITB+20
    TEXT SETERR~, SETERR+1
    TO DISPL+1~, DISPL+2*
    U V+12, AUDITB+24, AUDITB+25, AUDITB+32, AUDITB+35, AUDITB+36, AUDITB+37, AUDITB+47, AUDITB+56, SIG1
    , UPSEG+1, BILL+1
    X V+2~, V+6~, V+8, V+11, AUDITB+5~, AUDITB+35*, 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+5~
    Y V+2~, V+3, V+6~, V+12, AUDITB+5~, AUDITB+35*, SEGMT*, CKSITE+2, PAUSE+3~
    Z AUDITB+55~, AUDITB+56*, AUDITB+58, AUDITB+60, BULL+2~, BULL+5*, BULL+6*, MTCHK~, MTCHK+3*, MTCHK+5
    , MTCHK+7
    Z0 AUDITB+37*!, AUDITB+55~, AUDITB+56*, AUDITB+58, AUDITB+60, END!, MTCHK~, MTCHK+3*, MTCHK+5, MTCHK+7
    Z1 AUDITB+55~, AUDITB+56*, AUDITB+58, AUDITB+60
    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