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 |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

Name Comments DBIA/ICR reference
V ;;4.5;Accounts Receivable;**1,21,57,97,143,107,173,321,342,349**;Mar 20, 1995;Build 44
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

    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

    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
    Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call