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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBOCPDS

Package: Integrated Billing

Routine: IBOCPDS


Information

IBOCPDS ;ALB/ARH - CLERK PRODUCTIVITY REPORT (SUMMARY) ;10/8/91

Source Information

Source file <IBOCPDS.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  (,$$S)^%ZTLOAD  
VA FileMan 3 DD^%DT  NOW^%DTC  ^DIR  
Integrated Billing 1 (NOTE,ORDER,RANGE)^IBOCPD  

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

Package Total Caller Graph
Integrated Billing 1 IBOCPD  

Entry Points

Name Comments DBIA/ICR reference
EN ; - Get parameters then run the report.
DEV ; - Get the device.
ENT ; - Find, save, and print the data that satisfies the search parameters
; entry for tasked jobs.
EXIT ; - Clean up and quit.
FILE ; - Save the data in sorted order in a temporary file.
FILEMRA ; Capture and file MRA data into the scratch global
; 9/9/03 - ESG - MRA Project
FMX ;
PRINT ; - Print the report from the temp sort file to the appropriate device.
LINE ; - Print all data for a particular clerk.
HDR ; - Print the report header.
PAUSE ; - Pause at end of screen if beeing displayed on a terminal.
STOP() ; - Determine if user has requested the queued report to stop.
HLP ; - "Do you want to print..." prompt.

External References

Name Field # of Occurrence
DD^%DT HDR+3
NOW^%DTC HDR+3
^%ZIS DEV+2
HOME^%ZIS EN+2
^%ZISC EXIT+8
^%ZTLOAD DEV+3
$$S^%ZTLOAD STOP+1
^DIR EN+10, PAUSE+2
NOTE^IBOCPD PRINT+14
ORDER^IBOCPD EN+1
RANGE^IBOCPD EN+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?22,IBHDR,!!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !!,"Report requires 132 columns."
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"TOTAL:",?T1,$J(+$P(IBT,U,1),L1),?T2,$J($P(IBT,U,2),L2,2),?T3,$J(+$P(IBT,U,3),L1),?T4,$J($P(IBT,U,4),L2,2),?T5,$J(+$P(IBT,U,5),L1),?T6,$J($P(IBT,U,6),L2,2),!
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,$S(IBNCLK:"CLERK #"_IBCT,1:$E(IBCLK,1,25))
  • Line Location: LINE+3
Function Call: WRITE
  • Prompt: !,"RATE TYPE TOTALS"
  • Line Location: LINE+4
Function Call: WRITE
  • Prompt: ?30,$E($P(^DGCR(399.3,IBRT,0),U,1),1,20),?T1,$J(+$P(IBT,U,1),L1),?T2,$J($P(IBT,U,2),L2,2),?T3,$J(+$P(IBT,U,3),L1),?T4,$J($P(IBT,U,4),L2,2)
  • Line Location: LINE+7
Function Call: WRITE
  • Prompt: ?T5,$J(+$P(IBT,U,5),L1),?T6,$J($P(IBT,U,6),L2,2),!
  • Line Location: LINE+8
Function Call: WRITE
  • Prompt: ?T1," -----",?T2," -----------",?T3," -----",?T4," -----------",?T5," -----",?T6," -----------"
  • Line Location: LINE+11
Function Call: WRITE
  • Prompt: !?7,DIV,?T1,$J(+$P(IBT,U,1),L1),?T2,$J($P(IBT,U,2),L2,2),?T3,$J(+$P(IBT,U,3),L1),?T4,$J($P(IBT,U,4),L2,2),?T5,$J(+$P(IBT,U,5),L1),?T6,$J($P(IBT,U,6),L2,2)
  • Line Location: LINE+17
Function Call: WRITE
  • Prompt: !
  • Line Location: LINE+20
Function Call: WRITE
  • Prompt: ?T1," -----",?T2," -----------",?T3," -----",?T4," -----------"
  • Line Location: LINE+24
Function Call: WRITE
  • Prompt: ?T5," -----",?T6," -----------"
  • Line Location: LINE+25
Function Call: WRITE
  • Prompt: !,?30,"SUBTOTAL:",?T1,$J(+$P(IBT,U,1),L1),?T2,$J($P(IBT,U,2),L2,2),?T3,$J(+$P(IBT,U,3),L1),?T4,$J($P(IBT,U,4),L2,2)
  • Line Location: LINE+27
Function Call: WRITE
  • Prompt: ?T5,$J(+$P(IBT,U,5),L1),?T6,$J($P(IBT,U,6),L2,2),!
  • Line Location: LINE+28
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "CLERK PRODUCTIVITY SUMMARY FOR BILLS ",IBH1," ",IBBEGE," - ",IBENDE
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: ?(IOM-30),IBCDT,?(IOM-8),"PAGE ",IBPGN,!
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,?T1,"---",$S(IBORDER'="A":"-",1:""),"TOTAL ",IBH2,"---",$S(IBORDER'="A":"--",1:""),?T3,"-",$S(IBORDER'="A":"-",1:""),IBH2," CANCELLED-",$S(IBORDER'="A":"--",1:"")
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: ?T5,"-----MRA REQUESTS-----"
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !,IBH1," BY",?30,"RATE TYPE",?T1,$J("COUNT",L1),?T2,$J("AMOUNT",L2),?T3,$J("COUNT",L1),?T4,$J("AMOUNT",L2)
  • Line Location: HDR+11
Function Call: WRITE
  • Prompt: ?T5,$J("COUNT",L1),?T6,$J("AMOUNT",L2),!
  • Line Location: HDR+12
Function Call: WRITE
  • Prompt: IBI,!
  • Line Location: HDR+13
Function Call: WRITE
  • Prompt: !,"***TASK STOPPED BY USER***"
  • Line Location: STOP+1
Function Call: WRITE
  • Prompt: !!,"Select: '<CR>' to print the summary with the clerks' actual names"
  • Line Location: HLP+1
Function Call: WRITE
  • Prompt: !?11,"'Y' to print the summary with an identifier ('CLERK #xxx')"
  • Line Location: HLP+2
Function Call: WRITE
  • Prompt: !?15,"in place of the clerks' names",!?11,"'^' to quit"
  • Line Location: HLP+3
Routine Call
  • DIR
  • Line Location:
    • EN+10
    • PAUSE+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2
Routine Call
  • %ZIS
  • Line Location:
    • EN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] FILE+15
^DGCR(399 - [#399] ENT+7, ENT+8, ENT+13, ENT+16, FILE+1, FILE+2, FILE+3, FILE+4, FILE+14, FILEMRA+3
, FILEMRA+4, FILEMRA+5
^DGCR(399.3 - [#399.3] LINE+7
^TMP("IB" ENT+4!, ENT+19, EXIT+1!, FILE+5, FILE+6, FILE+7, FILE+8, FILE+9, FILEMRA+9, FILEMRA+10
, FILEMRA+11, FILEMRA+12, FILEMRA+13, PRINT+11, PRINT+12, LINE+5, LINE+6, LINE+26
^VA(200 - [#200] FILE+2, FILEMRA+7

Label References

Name Line Occurrences
$$STOP ENT+7, ENT+14, HDR+2
EXIT EN+1, EN+5, EN+10, DEV+2, DEV+3
FILE ENT+8
FILEMRA ENT+16
FMX FILEMRA+3, FILEMRA+6, FILEMRA+8
HDR PRINT+11, LINE+5, LINE+14
LINE PRINT+11
PAUSE PRINT+14, LINE+5, LINE+14
PRINT ENT+19

Naked Globals

Name Field # of Occurrence
^( FILE+6*, FILE+7*, FILE+9*, FILEMRA+10*, FILEMRA+11*, FILEMRA+13*
^("~~" FILE+8*, FILEMRA+12*
^($J FILE+5*, FILEMRA+9*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HDR+3
>> %ZIS DEV+2*
>> %ZIS("A" DEV+2*
DIR EN+10!, EN+11!, PAUSE+2!
DIR("?" EN+8*
DIR("A" EN+9*
DIR("B" EN+8*
DIR(0 EN+8*, PAUSE+2*
DIROUT EN+10, EN+11!, EXIT+7!
DIRUT EN+10, EN+11!, EXIT+7!, PAUSE+3
DIV FILE+13~, FILE+14*, FILE+15*, FILE+16*, FILE+17, FILE+18, LINE+1~, LINE+12*, LINE+13*, LINE+16
, LINE+17
DTOUT EN+10, EN+11!, EXIT+7!
DUOUT EN+10, EN+11!, EXIT+7!, PAUSE+3
IBBEG ENT+5, ENT+12, EXIT+5!
IBBEGE EXIT+5!, HDR+6
IBCANC EXIT+5!, FILE+4*, FILE+5, FILE+6, FILE+7, FILE+8, FILE+9, FILE+18
IBCDT ENT+5*, ENT+7*, ENT+8, ENT+12*, ENT+13*, ENT+16, EXIT+5!, HDR+3*, HDR+8
IBCLK EXIT+5!, FILE+2*, FILE+6, FILE+7, FILE+12, FILE+17, FILE+18, PRINT+2*, PRINT+11*, LINE+3
, LINE+5, LINE+6, LINE+10, LINE+13, LINE+16, LINE+26
IBCT EXIT+5!, LINE+2*, LINE+3
IBE ENT+5*, ENT+7, ENT+12*, ENT+13, EXIT+5!
IBEND ENT+5, ENT+12, EXIT+5!
IBENDE EXIT+5!, HDR+6
IBFLD EN+4*, EXIT+6!
IBH1 PRINT+1~, HDR+1~, HDR+5*, HDR+6, HDR+7*, HDR+11
IBH2 HDR+1~, HDR+7*, HDR+9
IBHDR EN+3*, EXIT+6!
IBI EXIT+6!, HDR+13*
IBINDX ENT+6*, ENT+7, ENT+8, EXIT+6!
IBLN EXIT+6!, LINE+2*, LINE+5*, LINE+14*, LINE+29*, HDR+2*
IBMRAUSR ENT+4!, EXIT+7!
IBMRAUSR( FILE+17, FILE+18*, LINE+10, LINE+13, LINE+16
IBNCLK EN+11*, EXIT+5!, LINE+2, LINE+3
IBNODE EXIT+6!, FILE+5*, FILE+6*, FILE+7*, FILE+8*, FILE+9*, FILE+17*, FILE+18, FILEMRA+2~, FILEMRA+9*
, FILEMRA+10*, FILEMRA+11*, FILEMRA+12*, FILEMRA+13*
IBORDER EN+4, ENT+6, EXIT+6!, FILE+2, HDR+5, HDR+7, HDR+9
IBPGN EXIT+6!, PRINT+2*, HDR+2*, HDR+4, HDR+8, STOP+1
IBQUIT EN+1, EN+5, ENT+5*, ENT+7*, ENT+13, ENT+14*, ENT+19, EXIT+6!, PRINT+11, PRINT+12
, LINE+5, LINE+13, LINE+14, LINE+15, LINE+19, LINE+23, HDR+2*, PAUSE+3*
IBRT EXIT+5!, FILE+1*, FILE+7, FILE+9, FILE+17, FILE+18, FILEMRA+2~, FILEMRA+3*, FILEMRA+11, FILEMRA+13
, LINE+5*, LINE+6, LINE+7, LINE+10, LINE+13, LINE+16
IBT PRINT+1~, PRINT+12*, PRINT+13, LINE+1~, LINE+6*, LINE+7, LINE+8, LINE+16*, LINE+17, LINE+26*
, LINE+27, LINE+28
IBTD EXIT+6!, FILE+3*, FILE+5, FILE+6, FILE+7, FILE+8, FILE+9, FILE+18, FILEMRA+2~, FILEMRA+4*
, FILEMRA+9, FILEMRA+10, FILEMRA+11, FILEMRA+12, FILEMRA+13
IFN ENT+7*, ENT+8*, ENT+15*, ENT+16*, EXIT+5!, FILE+1, FILE+2, FILE+3, FILE+4, FILE+14
, FILEMRA+3, FILEMRA+4, FILEMRA+5
IO DEV+4
IO("Q" DEV+3!
IOF EN+3, HDR+4
IOM HDR+6, HDR+8, HDR+13
IOSL LINE+5, LINE+14
IOST HDR+4, PAUSE+1
L1 PRINT+1~, PRINT+3*, PRINT+13, LINE+7, LINE+8, LINE+17, LINE+27, LINE+28, HDR+11, HDR+12
L2 PRINT+1~, PRINT+4*, PRINT+13, LINE+7, LINE+8, LINE+17, LINE+27, LINE+28, HDR+11, HDR+12
MRAUSR FILEMRA+2~, FILEMRA+5*, FILEMRA+6, FILEMRA+7*, FILEMRA+8, FILEMRA+10, FILEMRA+11
>> POP DEV+2
T1 PRINT+1~, PRINT+5*, PRINT+13, LINE+7, LINE+11, LINE+17, LINE+24, LINE+27, HDR+9, HDR+11
T2 PRINT+1~, PRINT+6*, PRINT+13, LINE+7, LINE+11, LINE+17, LINE+24, LINE+27, HDR+11
T3 PRINT+1~, PRINT+7*, PRINT+13, LINE+7, LINE+11, LINE+17, LINE+24, LINE+27, HDR+9, HDR+11
T4 PRINT+1~, PRINT+8*, PRINT+13, LINE+7, LINE+11, LINE+17, LINE+24, LINE+27, HDR+11
T5 PRINT+1~, PRINT+9*, PRINT+13, LINE+8, LINE+11, LINE+17, LINE+25, LINE+28, HDR+10, HDR+12
T6 PRINT+1~, PRINT+10*, PRINT+13, LINE+8, LINE+11, LINE+17, LINE+25, LINE+28, HDR+12
U ENT+5*, FILE+1, FILE+2, FILE+3, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8, FILE+9
, FILE+14, FILE+15, FILE+18, FILEMRA+3, FILEMRA+4, FILEMRA+5, FILEMRA+7, FILEMRA+9, FILEMRA+10, FILEMRA+11
, FILEMRA+12, FILEMRA+13, PRINT+13, LINE+7, LINE+8, LINE+17, LINE+27, LINE+28
X EXIT+6!
Y EN+11, EXIT+6!, HDR+3*
>> ZTDESC DEV+3*
>> ZTQUEUED EXIT+4, STOP+1
ZTREQ STOP+1!
>> ZTRTN DEV+3*
>> ZTSAVE("IB*" DEV+3*
>> ZTSTOP STOP+1*, STOP+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All