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

Package: Integrated Billing

Routine: IBCSC1


Information

IBCSC1 ;ALB/MJB - MCCR SCREEN 1 (DEMOGRAPHICS) ;27 MAY 88 10:13

Source Information

Source file <IBCSC1.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Integrated Billing 3 ^IBCSCP  (,A,H)^IBCSCU  ALL^IBCVA0  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Integrated Billing 4 IBCB  IBCB2  IBCCC2  IBCRTN  

Entry Points

Name Comments DBIA/ICR reference
BEN
1
3
2
5
4
7
6

External References

Name Field # of Occurrence
^IBCSCP 7+1
^IBCSCU BEN+3
A^IBCSCU 4+2
H^IBCSCU BEN+3
ALL^IBCVA0 BEN+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " DOB : ",$P(VADM(3),"^",2)
  • Line Location: 1+0
Function Call: WRITE
  • Prompt: " Alias : "
  • Line Location: 2+0
Function Call: WRITE
  • Prompt: !?13
  • Condition for execution: $X>40
  • Line Location: 2+0
Function Call: WRITE
  • Prompt: Z,"/"
  • Line Location: 2+0
Function Call: WRITE
  • Prompt: " Sex : ",$S($P(VADM(5),U,2)]"":$P(VADM(5),U,2),1:IBU),?48,"Marital: ",$S($D(^DIC(11,+$P(^DPT(DFN,0),U,5),0)):$E($P(^(0),U,1),1,28),1:IBU)
  • Line Location: 3+0
Function Call: WRITE
  • Prompt: " Address: ",$S($D(IBA(1)):IBA(1),1:"NONE ON FILE"),?46,"Temporary: ",$S($D(IBA(2)):IBA(2),1:"NO TEMPORARY ADDRESS")
  • Line Location: 5+0
Function Call: WRITE
  • Prompt: IBA(I)
  • Line Location: 5+1
Function Call: WRITE
  • Prompt: " SC Care: "
  • Line Location: 7+0
Function Call: WRITE
  • Prompt: $S(X="":"UNSPECIFIED",X:"YES",1:"NO")
  • Line Location: 7+0
Function Call: WRITE
  • Prompt: $S(X="":"UNSPECIFIED",X:"YES",1:"NO")
  • Line Location: 7+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] BEN+2, 6
^DIC(11 - [#11] 3
^DIC(8 - [#8] 4
^DPT - [#2] 2, 3, 4+1
^XUSEC("DG ELIGIBILITY" BEN

Naked Globals

Name Field # of Occurrence
^( 2, 4+1
^("M" 6
^(0 BEN+2, 3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN 2, 3, 4+1
DUZ BEN
>> I 2*, 4+1*, 5+1*
>> I1 2*, 2+1, 5+1*
>> IB( 4+1*, 4+2
>> IB(0 BEN+2*, 7
IBA 4+2!
IBA( 5+1
IBA(1 5
IBA(2 5
>> IBA1 4+2*
>> IBA2 4+2*
>> IBAD 4+2*
>> IBIFN BEN+2, 6
>> IBSR BEN*
>> IBSR1 BEN*
>> IBU 3, 4, 6
>> IBV BEN+1
>> IBV1 BEN*, BEN+1*
>> IBW 1*, 2*, 3*, 4*, 5*, 6*, 7*
>> IBWW BEN+3, 1, 2, 3, 4, 5, 6, 7
U 3, 6
>> VADM(3 1
>> VADM(5 3
>> VAEL(1 4
>> VAEL(4 4
>> X 7*
>> Z 1*, 2*, 3*, 4*, 5*, 6*, 7*
>> Z1 2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All