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 |  Local Variables  | All
Print Page as PDF
Routine: IBEMTF2

Package: Integrated Billing

Routine: IBEMTF2


Information

IBEMTF2 ;ALB/CPM - LIST NON-BILLABLE STOP CODES, DISPOSITIONS, AND CLINICS ; 05-AUG-93

Source Information

Source file <IBEMTF2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
Integrated Billing 2 ($$NBCL,$$NBCSC,$$NBDIS)^IBEFUNC  ($$DAT1,$$DAT2)^IBOUTL  
VA FileMan 2 ^%DT  ^DIR  

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

Package Total Caller Graph
Integrated Billing 3 IB MT LIST FLAGGED PARAMS  IBAMTI2  IBEMTO1  

Entry Points

Name Comments DBIA/ICR reference
EN ; Option entry point - describe output.
DQ ; Tasked entry point.
ENQ
ENQ1
HDR ; Generate a report header.
LST ; List all selected entries.
LSTQ
NBILL(IBF,IBEN,IBD) ; Is the entry not billable as of the effective date?
; Input: IBF -- Base file (#352.2, #352.3, #352.4)
; IBEN -- Internal entry number for entry
; IBD -- Effective date for non-billing
NBILLQ
VAL(IBF,IBEN) ; Return the entry name.
; Input: IBF -- Base file (#352.2, #352.3, #352.4)
; IBEN -- Internal entry number for entry
; Output: Entry name (#.01 from respective file)
VALQ
DASH() ; Return a dashed line.
PAUSE ; Page break

External References

Name Field # of Occurrence
^%DT EN+6
^%ZIS EN+9
HOME^%ZIS EN+13
^%ZISC ENQ
^%ZTLOAD EN+12
^DIR PAUSE+4
$$NBCL^IBEFUNC NBILL+8
$$NBCSC^IBEFUNC NBILL+7
$$NBDIS^IBEFUNC NBILL+6
$$DAT1^IBOUTL HDR+3, HDR+4
$$DAT2^IBOUTL EN+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"This report may be used to generate a list of all clinic stop codes,"
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !?5,"dispositions, and clinics where Means Test billing will be ignored.",!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"This job has been queued. The task number is "_ZTSK_".",1:"Unable to queue this job.")
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: @IOF,*13
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: $$DASH(),!?(80-$L(IBT)\2),IBT,!?33,"As Of: ",$$DAT1^IBOUTL(IBDAT)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?64,"Page: ",IBPAG,!?60,"Run Date: ",$$DAT1^IBOUTL(DT)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,$$DASH(),!!
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: "All ",$S(IBI=352.2:"dispositions",IBI=352.3:"clinic stop codes",1:"clinics")," are billable on this date."
  • Line Location: LST+1
Function Call: WRITE
  • Prompt: $$VAL(IBI,IBJ)
  • Line Location: LST+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+3
Routine Call
  • DIR
  • Line Location:
    • PAUSE+4
Routine Call
  • %ZIS
  • Line Location:
    • EN+9
Routine Call
  • %ZIS
  • Line Location:
    • EN+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(37 - [#37] VAL+6
^DIC(40.7 - [#40.7] VAL+7
^IBE( DQ+3
^SC - [#44] VAL+8
^TMP("IBEMTF2" DQ+3*, ENQ1!, LST+1, LST+2

Label References

Name Line Occurrences
$$DASH HDR+3, HDR+5
$$NBILL DQ+3
$$VAL LST+4
ENQ EN+6, EN+9, EN+10
ENQ1 DQ+3
HDR DQ+6, LST+3
LST DQ+6
LSTQ LST+1
NBILLQ NBILL+5, NBILL+6, NBILL+7
PAUSE DQ+6, LST+3
VALQ VAL+5, VAL+6, VAL+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT EN+5*, EN+6!
%DT("A" EN+5*
%DT("B" EN+5*
>> %ZIS EN+9*
DIR PAUSE+2~
DIR(0 PAUSE+4*
DIROUT PAUSE+2~
DIRUT PAUSE+2~, PAUSE+4
DT EN+5, HDR+4
DTOUT PAUSE+2~
DUOUT PAUSE+2~, PAUSE+4
IBD NBILL~, NBILL+5
IBDAT EN+6*, DQ+3, ENQ+1!, HDR+3, NBILL+6, NBILL+7, NBILL+8
IBEN NBILL~, NBILL+5, NBILL+6, NBILL+7, NBILL+8, VAL~, VAL+5, VAL+6, VAL+7, VAL+8
IBF NBILL~, NBILL+5, NBILL+6, NBILL+7, NBILL+8, VAL~, VAL+5, VAL+6, VAL+7, VAL+8
IBI DQ+3*, DQ+6*, ENQ+1!, HDR+2, LST+1, LST+2, LST+4
IBJ DQ+3*, ENQ+1!, LST+2*, LST+4
IBPAG DQ+6*, ENQ+1!, HDR+1, HDR+2*, HDR+4
IBQ DQ+6*, ENQ+1!, LST+2, LST+3, PAUSE+4*
IBT ENQ+1!, HDR+2*, HDR+3
IBX PAUSE+2~, PAUSE+3*
IO EN+15
IO("Q" EN+10, EN+13!
IOF HDR+1
IOSL LST+3, PAUSE+3
IOST HDR+1, PAUSE+1
>> POP EN+9
X PAUSE+2~
Y EN+6, NBILL+4~*, NBILL+6*, NBILL+7*, NBILL+8*, NBILLQ, VAL+4~*, VAL+6*, VAL+7*, VAL+8*
VALQPAUSE+2~
>> ZTDESC EN+11*
>> ZTQUEUED ENQ
>> ZTRTN EN+11*
>> ZTSAVE("IBDAT" EN+11*
ZTSK EN+12, EN+13!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All