Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PSOMLLDT

Package: Outpatient Pharmacy

Routine: PSOMLLDT


Information

PSOMLLDT ;BIR/RTR - Copay date routine ;08/24/01

Source Information

Source file <PSOMLLDT.m>

Entry Points

Name Comments DBIA/ICR reference
DT() ;function for Copay date
MST ;Military Sexual Trauma Question
VEH ;Vietnam-Era Herbicide Question
RAD ;Radiation question
PGW ;Persian Gulf War question
HNC ;Head or Neck Cancer question
CV ; Combat Veteran Question
PAUSE ;
MESS ;
MESSM ;
MESSV ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: MST+10
Function Call: WRITE
  • Prompt: !
  • Line Location: MST+11
Function Call: WRITE
  • Prompt: !!,"This Renewal has been designated as"_$S($G(PSOUFLAG)="YES":"",1:" NOT")_" being used for treatment of Military",!,"Sexual Trauma."
  • Line Location: MST+15
Function Call: WRITE
  • Prompt: !
  • Line Location: VEH+10
Function Call: WRITE
  • Prompt: !
  • Line Location: VEH+11
Function Call: WRITE
  • Prompt: !!,"This Renewal has been designated as"_$S($G(PSOUFLAG)="YES":"",1:" NOT")_" being used for treatment of Vietnam-Era",!,"Herbicide (Agent Orange) exposure."
  • Line Location: VEH+15
Function Call: WRITE
  • Prompt: !
  • Line Location: RAD+10
Function Call: WRITE
  • Prompt: !
  • Line Location: RAD+11
Function Call: WRITE
  • Prompt: !!,"This Renewal has been designated as"_$S($G(PSOUFLAG)="YES":"",1:" NOT")_" being used for treatment of ionizing",!,"radiation exposure."
  • Line Location: RAD+15
Function Call: WRITE
  • Prompt: !
  • Line Location: PGW+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PGW+12
Function Call: WRITE
  • Prompt: !!,"This Renewal has been designated as"_$S($G(PSOUFLAG)="YES":"",1:" NOT")_" being used for treatment of",!,"Southwest Asia Conditions exposure."
  • Line Location: PGW+16
Function Call: WRITE
  • Prompt: !
  • Line Location: HNC+10
Function Call: WRITE
  • Prompt: !
  • Line Location: HNC+11
Function Call: WRITE
  • Prompt: !!,"This Renewal has been designated as"_$S($G(PSOUFLAG)="YES":"",1:" NOT")_" being used for treatment related to",!,"Head and/or Neck Cancer."
  • Line Location: HNC+15
Function Call: WRITE
  • Prompt: !
  • Line Location: CV+18
Function Call: WRITE
  • Prompt: !
  • Line Location: CV+19
Function Call: WRITE
  • Prompt: !!,"This Renewal has been designated as"_$S($G(PSOUFLAG)="YES":"",1:" NOT")_" being used for treatment of military"
  • Line Location: CV+24
Function Call: WRITE
  • Prompt: !,"combat service."
  • Line Location: CV+25
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !,"Please use the 'Reset Copay Status/Cancel Charges' option to make corrections.",!
  • Line Location: MESS+2
Function Call: WRITE
  • Prompt: " Please use the 'Reset Copay Status/Cancel Charges' option",!,"to make corrections.",!
  • Line Location: MESSM+2
Function Call: WRITE
  • Prompt: " Please use the 'Reset Copay Status/Cancel",!,"Charges' option to make corrections.",!
  • Line Location: MESSV+2
Info |  Source |  Entry Points |  Interaction Calls