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

Package: Women's Health

Routine: BWUTL7


Information

BWUTL7 ;IHS/ANMC/MWR - UTIL: HEADERS & TRAILERS;23-Jan-2009 10:35;DU

Source Information

Source file <BWUTL7.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Women's Health 4 ($$DES,$$INACT)^BWUTL1  DIRZ^BWUTL3  ($$PNLAB,$$PNLB,$$SLDT1,$$SLDT2,$$TXDT,CENTERT)^BWUTL5  $$INSTTX^BWUTL6  
Kernel 2 ^%ZISC  $$FMTE^XLFDT  
VA Fileman 2 NOW^%DTC  $$GET1^DIQ  

Caller Graph

Caller Graph Total: 17

Package Total Caller Graph
Women's Health 16 BWBRNED1  BWBRNOT1  BWBRPCD1  BWCVD2  BWGETALL  BWLABLG1  BWPATP  BWPCC2  
BWPROC1  BWPROF1  BWPROF3  BWPRPCD  BWRPPCD1  BWRPSCR  BWRPSCR1  BWRPSNP1  
iCare 1 BQIWHPRF  

Entry Points

Name Comments DBIA/ICR reference
ENDREP(X) ;EP
HEADER41 ;EP
S(S) ;EP
HEADER2 ;EP
HEADER3 ;EP
HEADER1 ;EP
HEADER6 ;EP
HEADER7 ;EP
HEADER4 ;EP
HEADER5 ;EP
HEADER8 ;EP
TOPHEAD ;EP

External References

Name Field # of Occurrence
NOW^%DTC TOPHEAD+3
^%ZISC ENDREP+10
$$DES^BWUTL1 HEADER41+9
$$INACT^BWUTL1 HEADER2+14
DIRZ^BWUTL3 ENDREP+9
$$PNLAB^BWUTL5 HEADER2+9, HEADER41+2
$$PNLB^BWUTL5 HEADER7+10
$$SLDT1^BWUTL5 TOPHEAD+3
$$SLDT2^BWUTL5 HEADER2+14, HEADER2+27, HEADER3+10, HEADER3+12, HEADER5+20, HEADER8+8, HEADER8+14
$$TXDT^BWUTL5 HEADER1+15, HEADER1+17
CENTERT^BWUTL5 ENDREP+7
$$INSTTX^BWUTL6 HEADER1+16, HEADER2+12, HEADER3+8, HEADER5+19, HEADER7+7
$$GET1^DIQ HEADER2+10
$$FMTE^XLFDT HEADER2+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Case Mgr: "
  • Line Location: HEADER1+8
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: HEADER1+9
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: HEADER1+10
Function Call: WRITE
  • Prompt: "UNKNOWN"
  • Line Location: HEADER1+11
Function Call: WRITE
  • Prompt: "UNKNOWN"
  • Line Location: HEADER1+12
Function Call: WRITE
  • Prompt: "UNKNOWN"
  • Line Location: HEADER1+13
Function Call: WRITE
  • Prompt: ?56,"For period: ",$$TXDT^BWUTL5(BWBEGDT)
  • Line Location: HEADER1+15
Function Call: WRITE
  • Prompt: !,"Facility: ",$$INSTTX^BWUTL6(DUZ(2))
  • Line Location: HEADER1+16
Function Call: WRITE
  • Prompt: ?64,"To: ",$$TXDT^BWUTL5(BWENDDT)
  • Line Location: HEADER1+17
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER1+18
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEADER1+18
Function Call: WRITE
  • Prompt: !!,"Patient Name: ",BWNAMAGE,?55,$$PNLAB^BWUTL5(DUZ(2)),BWCHRT
  • Line Location: HEADER2+9
Function Call: WRITE
  • Prompt: !,"DOB : ",$$FMTE^XLFDT($$GET1^DIQ(2,BWDFN,.03,"I")),?58,"PCP: ",$E($$GET1^DIQ(9002086,BWDFN,.25),1,16)
  • Line Location: HEADER2+10
Function Call: WRITE
  • Prompt: !,"Case Manager: ",BWCMGR
  • Line Location: HEADER2+11
Function Call: WRITE
  • Prompt: ?53,"Facility: ",$E($$INSTTX^BWUTL6(DUZ(2)),1,17)
  • Line Location: HEADER2+12
Function Call: WRITE
  • Prompt: !,"Cx Tx Need : ",BWCNEED
  • Line Location: HEADER2+13
Function Call: WRITE
  • Prompt: ?51,"Inact Date: ",$$SLDT2^BWUTL5($$INACT^BWUTL1(BWDFN))
  • Line Location: HEADER2+14
Function Call: WRITE
  • Prompt: !,"PAP Regimen : ",BWPAPRG
  • Line Location: HEADER2+18
Function Call: WRITE
  • Prompt: ?50,"Income Elig: "
  • Line Location: HEADER2+19
Function Call: WRITE
  • Prompt: $S(X=1:"YES",X=2:"NO",X=3:"REFUSED",1:"NOT DETERMINED")
  • Line Location: HEADER2+22
Function Call: WRITE
  • Prompt: !,"Br Tx Need : ",BWBNEED
  • Line Location: HEADER2+23
Function Call: WRITE
  • Prompt: ?50,"Income Date: "
  • Line Location: HEADER2+24
Function Call: WRITE
  • Prompt: $$SLDT2^BWUTL5(X)
  • Line Location: HEADER2+27
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER2+30
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEADER2+30
Function Call: WRITE
  • Prompt: $S(BWEDC]"":BWEDC_"====",1:"===============================")
  • Line Location: HEADER2+32
Function Call: WRITE
  • Prompt: !!,"Facility: ",$$INSTTX^BWUTL6($S($G(BWFAC):BWFAC,1:DUZ(2)))
  • Line Location: HEADER3+8
Function Call: WRITE
  • Prompt: ?49,"From: ",$$SLDT2^BWUTL5(BWBEGDT)
  • Line Location: HEADER3+10
Function Call: WRITE
  • Prompt: " to ",$$SLDT2^BWUTL5(BWENDDT)
  • Line Location: HEADER3+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER3+13
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEADER3+13
Function Call: WRITE
  • Prompt: !!,BWTITLE1,?70,"page: ",BWPAGE
  • Line Location: HEADER4+6
Function Call: WRITE
  • Prompt: !!,"Patient Name: ",BWNAMAGE,?53,$$PNLAB^BWUTL5(DUZ(2)),BWCHRT
  • Line Location: HEADER41+2
Function Call: WRITE
  • Prompt: !,"Case Manager: ",BWCMGR
  • Line Location: HEADER41+3
Function Call: WRITE
  • Prompt: ?50,"Procedure: ",$E(BWPN,1,19)
  • Line Location: HEADER41+4
Function Call: WRITE
  • Prompt: !,"Cx Tx Need : ",BWCNEED
  • Line Location: HEADER41+5
Function Call: WRITE
  • Prompt: ?55,"Acc#: ",BWACCN
  • Line Location: HEADER41+6
Function Call: WRITE
  • Prompt: !,"PAP Regimen : ",BWPAPRG
  • Line Location: HEADER41+7
Function Call: WRITE
  • Prompt: !,"Br Tx Need : ",BWBNEED
  • Line Location: HEADER41+8
Function Call: WRITE
  • Prompt: ?61,$S($$DES^BWUTL1(BWDFN):"*DES DAUGHTER*",1:"")
  • Line Location: HEADER41+9
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER41+10
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HEADER41+10
Function Call: WRITE
  • Prompt: $S(BWEDC]"":BWEDC_"------",1:"-------------------------------")
  • Line Location: HEADER41+11
Function Call: WRITE
  • Prompt: !!,"Case Mgr: "
  • Line Location: HEADER5+8
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: HEADER5+9
Function Call: WRITE
  • Prompt: "ALL"
  • Line Location: HEADER5+10
Function Call: WRITE
  • Prompt: "UNKNOWN"
  • Line Location: HEADER5+11
Function Call: WRITE
  • Prompt: "UNKNOWN"
  • Line Location: HEADER5+12
Function Call: WRITE
  • Prompt: ?46,"Communit"
  • Line Location: HEADER5+14
Function Call: WRITE
  • Prompt: "ies: ALL"
  • Line Location: HEADER5+15
Function Call: WRITE
  • Prompt: "y: ",$E($P(^AUTTCOM($O(BWCC(N)),0),U),1,22)
  • Line Location: HEADER5+17
Function Call: WRITE
  • Prompt: !,"Facility: ",$$INSTTX^BWUTL6(BWFAC)
  • Line Location: HEADER5+19
Function Call: WRITE
  • Prompt: ?46,"Tx Needs Past Due as of ",$$SLDT2^BWUTL5(BWDDATE)
  • Line Location: HEADER5+20
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER5+21
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEADER5+21
Function Call: WRITE
  • Prompt: !!," Note: This report includes all facilities"
  • Line Location: HEADER6+7
Function Call: WRITE
  • Prompt: " using this database."
  • Line Location: HEADER6+8
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER6+11
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEADER6+11
Function Call: WRITE
  • Prompt: !!,"Facility: ",$$INSTTX^BWUTL6(DUZ(2))
  • Line Location: HEADER7+7
Function Call: WRITE
  • Prompt: ?64,"Cutoff Age: ",BWAGE
  • Line Location: HEADER7+8
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER7+9
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEADER7+9
Function Call: WRITE
  • Prompt: !,?3,"NAME",?30,$$PNLB^BWUTL5(DUZ(2)),?45,"DOB",?60,"STATUS"
  • Line Location: HEADER7+10
Function Call: WRITE
  • Prompt: !,BWLINE
  • Line Location: HEADER7+11
Function Call: WRITE
  • Prompt: !!?4,"For Age Range: ",$S(BWAGRG=1:"ALL",1:BWAGRG)
  • Line Location: HEADER8+7
Function Call: WRITE
  • Prompt: ?56,"For period: ",$$SLDT2^BWUTL5(BWBEGDT)
  • Line Location: HEADER8+8
Function Call: WRITE
  • Prompt: !?4,"Communit"
  • Line Location: HEADER8+9
Function Call: WRITE
  • Prompt: "ies: ALL"
  • Line Location: HEADER8+10
Function Call: WRITE
  • Prompt: "y: ",$E($O(BWCC("")),1,22)
  • Line Location: HEADER8+12
Function Call: WRITE
  • Prompt: ?64,"To: ",$$SLDT2^BWUTL5(BWENDDT)
  • Line Location: HEADER8+14
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER8+15
Function Call: WRITE
  • Prompt: "="
  • Line Location: HEADER8+15
Function Call: WRITE
  • Prompt: !?4,"(Note: This report includes all facilities"
  • Line Location: HEADER8+16
Function Call: WRITE
  • Prompt: " using this database.)",!
  • Line Location: HEADER8+17
Function Call: WRITE
  • Prompt: !,BWTITLE
  • Line Location: ENDREP+7
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: ENDREP+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^BWP - [#9002086] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTCOM - [#9999999.05] HEADER5+17, HEADER5+18
^BWP - [#9002086] HEADER2+21, HEADER2+26
^VA(200 - [#200] HEADER1+13, HEADER1+14, HEADER5+12, HEADER5+13

Label References

Name Line Occurrences
@( HEADER1+19, HEADER2+34, HEADER3+14, HEADER5+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TOPHEAD+3
>> BWACCN HEADER41+6
>> BWAGE HEADER7+8
>> BWAGRG HEADER8+7
>> BWBEGDT HEADER1+15, HEADER3+10, HEADER8+8
>> BWBNEED HEADER2+23, HEADER41+8
>> BWCC( HEADER5+16, HEADER5+17, HEADER5+18, HEADER8+11
>> BWCC("" HEADER8+12, HEADER8+13
>> BWCC("ALL" HEADER5+15, HEADER8+10
>> BWCHRT HEADER2+9, HEADER41+2
>> BWCMGR HEADER1+11, HEADER1+12, HEADER1+13, HEADER1+14, HEADER2+11, HEADER41+3, HEADER5+11, HEADER5+12, HEADER5+13
>> BWCNEED HEADER2+13, HEADER41+5
>> BWCONF HEADER1+6, HEADER2+6, HEADER3+6, HEADER5+6, HEADER7+5
>> BWCONFF TOPHEAD+7*, TOPHEAD+8*, HEADER1+6, HEADER2+6, HEADER3+6, HEADER4+5, HEADER5+6, HEADER7+5
>> BWCRT TOPHEAD+6*, HEADER1+5, HEADER1+6, HEADER1+7, HEADER2+5, HEADER2+6, HEADER2+7, HEADER3+5, HEADER3+6, HEADER3+7
, HEADER4+4, HEADER4+5, HEADER5+5, HEADER5+6, HEADER5+7, HEADER6+4, HEADER6+5, HEADER6+6, HEADER7+4, HEADER7+5
, HEADER7+6, HEADER8+4, HEADER8+5, HEADER8+6, ENDREP+8, ENDREP+9
>> BWDDATE HEADER5+20
>> BWDFN HEADER2+10, HEADER2+14, HEADER2+21, HEADER2+26, HEADER41+9
>> BWE HEADER1+9, HEADER1+10, HEADER5+9, HEADER5+10
>> BWEDC HEADER2+32, HEADER41+11
>> BWENDDT HEADER1+17, HEADER3+12, HEADER8+14
>> BWFAC HEADER3+8, HEADER5+19
>> BWLINE TOPHEAD+4*, TOPHEAD+9, HEADER7+11
>> BWNAMAGE HEADER2+9, HEADER41+2
>> BWNOW TOPHEAD+3*, TOPHEAD+9
>> BWPAGE TOPHEAD+5*, HEADER1+5, HEADER1+7, HEADER2+5, HEADER2+7, HEADER3+5, HEADER3+7, HEADER4+4, HEADER4+6*, HEADER5+5
, HEADER5+7, HEADER6+4, HEADER6+6, HEADER7+4, HEADER7+6*, HEADER8+4, HEADER8+6
>> BWPAPRG HEADER2+18, HEADER41+7
>> BWPN HEADER41+4
>> BWPOP ENDREP+7, ENDREP+9
>> BWSUBH HEADER1+19, HEADER2+34, HEADER3+14, HEADER5+22
>> BWTIMLN TOPHEAD+9*, HEADER1+6, HEADER2+6, HEADER3+6, HEADER4+5, HEADER5+6, HEADER6+5, HEADER7+5, HEADER8+5
>> BWTITLE HEADER1+7, HEADER2+7, HEADER3+7, HEADER5+7, HEADER6+6, HEADER7+6, HEADER8+6, ENDREP+6*, ENDREP+7
>> BWTITLE1 HEADER4+6
DUZ(2 HEADER1+16, HEADER2+9, HEADER2+12, HEADER3+8, HEADER41+2, HEADER7+7, HEADER7+10
I S+2~*, TOPHEAD+4*, HEADER1+18*, HEADER2+30*, HEADER3+13*, HEADER41+10*, HEADER5+16~*, HEADER5+17, HEADER5+21*, HEADER6+11*
, HEADER7+9*, HEADER8+11~*, HEADER8+12, HEADER8+15*
IO("S" ENDREP+9
IOF HEADER1+5, HEADER2+5, HEADER3+5, HEADER4+4, HEADER5+5, HEADER6+4, HEADER7+4, HEADER8+4, ENDREP+8, ENDREP+9
IOST TOPHEAD+6
N HEADER5+16~*, HEADER5+17, HEADER5+18, HEADER8+11~*
S S~, S+3
SP S+2~*, S+3
U HEADER1+14, HEADER2+21, HEADER2+26, HEADER5+13, HEADER5+17, HEADER5+18
X TOPHEAD+2~, HEADER1+4~, HEADER2+4~, HEADER2+20~, HEADER2+21*, HEADER2+22, HEADER2+25~, HEADER2+26*, HEADER2+27, HEADER3+4~
, HEADER5+4~, HEADER6+3~, HEADER7+3~, HEADER8+3~, ENDREP~, ENDREP+7
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 |  Local Variables |  All