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

Package: Outpatient Pharmacy

Routine: PSOLBLN2


Information

PSOLBLN2 ;BHAM ISC/RTR - NEW LABEL TRAILER ;06/06/94

Source Information

Source file <PSOLBLN2.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Outpatient Pharmacy 3 ^PSOBUILD  BLANK^PSOLBLD  $$ZZ^PSOSUTL  
VA FileMan 3 DD^%DT  C^%DTC  ^DIWP  
Registration 1 (6,PID)^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Outpatient Pharmacy 2 PSOLBL  PSOLBL2  

Entry Points

Name Comments DBIA/ICR reference
END
SUSP ;SUSPENSE DOCUMENT
PRSUS
NARR ;SET TMP GLOBAL FOR NARRATIVES
START ;RETURN MAIL
ADD
PRINT
NPP1 ;

External References

Name Field # of Occurrence
DD^%DT ADD+4
C^%DTC SUSP+2
^DIWP NARR+1, NARR+4, NARR+10
^PSOBUILD SUSP+3
BLANK^PSOLBLD END+2
$$ZZ^PSOSUTL ADD+6
6^VADPT SUSP+4
PID^VADPT SUSP+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?54,VADM(1)_" "_EDT
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?54,@PSOBAR1,PSOTRDFN,@PSOBAR0,$C(13)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!!
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+2
Function Call: WRITE
  • Prompt: !,"The VA Notice of Privacy Practices, IB 10-163, which outlines your privacy",!
  • Line Location: NPP1+3
Function Call: WRITE
  • Prompt: "rights, is available online at http://www1.domain.ext/Health/ or you may obtain",!
  • Line Location: NPP1+4
Function Call: WRITE
  • Prompt: "a copy by writing the VHA Privacy Office (19F2), 810 Vermont Avenue NW,",!
  • Line Location: NPP1+5
Function Call: WRITE
  • Prompt: "Washington, DC 20420.",!
  • Line Location: NPP1+6
Function Call: WRITE
  • Prompt: !,"La Notificacion relacionada con las Politicas de Privacidad del Departamento",!
  • Line Location: NPP1+8
Function Call: WRITE
  • Prompt: "de Asuntos del Veterano, IB 10-163, contiene los detalles acerca de sus",!
  • Line Location: NPP1+9
Function Call: WRITE
  • Prompt: "derechos de privacidad y esta disponible electronicamente en la siguiente",!
  • Line Location: NPP1+10
Function Call: WRITE
  • Prompt: "direccion: http://www1.domain.ext/Health/. Usted tambien puede conseguir una",!
  • Line Location: NPP1+11
Function Call: WRITE
  • Prompt: "copia escribiendo a la Oficina de Privacidad del Departamento de Asuntos de",!
  • Line Location: NPP1+12
Function Call: WRITE
  • Prompt: "Salud del Veterano, (19F2), 810 Vermont Avenue NW, Washington, DC 20420.",!
  • Line Location: NPP1+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" PRINT
^DIC(5 - [#5] START+2
^PS(52.5 - [#52.5] ADD+4
^PS(55 - [#55] NPP1+1
^PS(59 - [#59] START+1, NARR+1, NARR+4, NARR+10
^PSRX - [#52] SUSP+1, ADD+5
^TMP($J PSOLBLN2+4!, START+4*, START+5*, START+6*, START+7*, NARR+2*, NARR+3*, NARR+5*, NARR+6*, NARR+7*
, NARR+9*, NARR+11*, SUSP+5*, SUSP+6*, SUSP+7*, ADD, ADD+1*, ADD+2*, ADD+5*, ADD+6*
, PRINT+7, PRINT+8, END!, PRSUS+1, PRSUS+2, PRSUS+3
^UTILITY($J NARR+1!, NARR+2, NARR+4!, NARR+5, NARR+10!, NARR+11, END!

Label References

Name Line Occurrences
ADD SUSP+5, SUSP+6
END PRINT+5
NPP1 PRINT+5, PRINT+10
PRINT SUSP+4
PRSUS PRINT+5
SUSP NARR+6, NARR+8

Naked Globals

Name Field # of Occurrence
^( START+4*, START+7*, NARR+1, NARR+4, NARR+10, ADD+2*, PRINT+7, PRINT+8, PRSUS+1, PRSUS+2
, PRSUS+3
^(0 START+1, START+2, NARR+1, NARR+4, NARR+10
^(2 SUSP+5*
^(3 SUSP+5*
^(4 SUSP+5*
^(6 SUSP+7*
^(7 SUSP+7*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADDR(2 SUSP+5
>> ADDR(3 SUSP+5, SUSP+6, SUSP+7
>> ADDR(4 SUSP+5, SUSP+6, SUSP+7
>> DFN PSOLBLN2+2, SUSP+1*, NPP1+1
DIWF NARR+1*, NARR+4*, NARR+10*, END+1!
DIWL NARR+1*, NARR+2, NARR+4*, NARR+5, NARR+10*, NARR+11, END+1!
DIWR NARR+1*, NARR+4*, NARR+10*, END+1!
DT SUSP+2, PRINT
EDT PRINT*, PRINT+1, END+1!
IOF END+1, END+2
LLL NARR+2*, NARR+5*, NARR+11*, END+1!
>> PI PSOLBLN2+3
>> PPL PSOLBLN2+3
PRCOPAY PSOLBLN2+4*, START+4, START+5, START+6, START+7, NARR+8, PRINT+2, PRINT+3, PRINT+4, END+1!
PS START+1*, START+2, START+3, START+4, END+1!
PSNACNT NARR+1*, NARR+2*, NARR+3*, NARR+5*, NARR+6, NARR+7*, NARR+9*, NARR+11*, END+1!
PSNOADDR PRINT+6*, PRINT+7*, PRINT+9, END+1!, PRSUS*, PRSUS+1*, PRSUS+4
PSNOBOTH PRINT+6*, PRINT+9*, END+1!
PSNONARR PRINT+6*, PRINT+8*, PRINT+9, END+1!, PRSUS*, PRSUS+2*, PRSUS+4
PSNOSUSP END+1!, PRSUS*, PRSUS+3*, PRSUS+4
PSNTHREE END+1!, PRSUS*, PRSUS+4*
>> PSOBAR0 PRINT+2
>> PSOBAR1 PRINT+2
>> PSOBARS PRINT+2, PRINT+3
>> PSOBLALL PSOLBLN2+3
>> PSOCHAMP NARR+6
>> PSOCPN PSOLBLN2+4
>> PSODFN SUSP+1*
>> PSODTCUT SUSP+2*
>> PSOHZIP START+3*, START+4
PSOLAN NPP1+1~*, NPP1+2, NPP1+7
PSOLGTH ADD+5*, END+1!
>> PSOPAR END+2
PSOSD END+1!
PSOSD( SUSP+3
>> PSOSITE START+1, NARR+1, NARR+4, NARR+10
>> PSOSYS START+1
PSOTRAIL PSOLBLN2+2, END+1!
>> PSOTRAMT NARR+6
PSOTRDFN PRINT*, PRINT+2, END+1!
PSSEVFL NARR+1*, NARR+5*, NARR+6, NARR+9, END+1!
PSSIXFL NARR+1*, NARR+2*, NARR+3, END+1!
PSSPCNT SUSP+1*, ADD*, ADD+1*, ADD+2*, ADD+5*, ADD+6*, END+1!
PSSSRX ADD+3*, ADD+4, ADD+5, ADD+6, END+1!
PSSUFLG SUSP+1*, SUSP+4*, PRINT+5, END+1!
>> PSZIP START+3*
>> RX SUSP+1
>> RXN PSOLBLN2+2
RXX SUSP+1*, SUSP+3*, END+1!
SPDATE ADD+4*, ADD+5, ADD+6!, END+1!
SPNUM ADD+4*, ADD+6!, END+1!
SPPL SUSP+1*, SUSP+3*, SUSP+4, ADD+3, END+1!
>> STA SUSP+1*, SUSP+3*
STATE START+2*, START+4, END+1!
TTT PRINT+6*, PRINT+7, PRINT+8, END+1!, PRSUS*, PRSUS+1, PRSUS+2, PRSUS+3
VAADDR1 START+2*, START+4, END+1!
VADM END+1!
VADM(1 SUSP+5, PRINT+1
VADM(2 PRINT
VAEL END+1!
VAPA END+1!
VAPA(1 SUSP+5
VASTREET START+2*, START+4, END+1!
>> X NARR+1*, NARR+4*, NARR+10*, SUSP+2, PRINT+2*
>> X1 SUSP+2*, PRINT+2*
>> X2 SUSP+2*, PRINT+2*
>> XX ADD+3*
Y ADD+4*, ADD+6!, PRINT*
ZZ NARR+1*, NARR+4*, NARR+10*, ADD*, END+1!
ZZZ START+5*, START+6*, END+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All