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

Package: Outpatient Pharmacy

Routine: PSONVAP4


Information

PSONVAP4 ;HPS/DSK - NON-VA PROVIDER BACKOUT ;May 16, 2018@16:00

Source Information

Source file <PSONVAP4.m>

Entry Points

Name Comments DBIA/ICR reference
EN ;
ASK ;
INACT ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option is to be used ONLY to inactivate non-VA providers"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"which were loaded by the Non-VA Provider Import option."
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !!,"If you proceed, NEW PERSON (#200) file entries which meet"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !,"the following criteria:",!
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,?2,"NON-VA PRESCRIBER (#53.91) field = YES"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !,?2,"REMARKS (#53.9) field contains ""NON-VA PROVIDER"""
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !,?2,"DATE ENTERED (#30) field = the date specified in the ""DATE ENTERED"" prompt"
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !!,"will have:"
  • Line Location: EN+10
Function Call: WRITE
  • Prompt: !!,?2,"DISUSER (#7) field set to ""YES"""
  • Line Location: EN+11
Function Call: WRITE
  • Prompt: !!,?2,"TERMINATION DATE (#9.2) and INACTIVE DATE (#53.4)"
  • Line Location: EN+12
Function Call: WRITE
  • Prompt: !,?2,"fields populated with yesterday's date."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !,?2,"(Yesterday's date must be used in order to immediately"
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !,?2,"inactivate the providers.)"
  • Line Location: EN+15
Function Call: WRITE
  • Prompt: !!,?2,"REMARKS (#53.9) field will have a comment added:"
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: !,?2,"""INACTIVATED BY NON-VA INACTIVATE OPTION"".",!
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: !!,"NEW PERSON (#200) file entries for non-VA providers which were entered on"
  • Line Location: ASK+7
Function Call: WRITE
  • Prompt: !,Y," will be inactivated."
  • Line Location: ASK+8
Function Call: WRITE
  • Prompt: !!,"Starting -- Please wait ."
  • Line Location: INACT+14
Function Call: WRITE
  • Prompt: "."
  • Line Location: INACT+18
Function Call: WRITE
  • Prompt: !,"Finished."
  • Line Location: INACT+28
Function Call: WRITE
  • Prompt: !!,"Check ^XTMP(""",PSOJOB,""""," for IEN's which have been inactivated."
  • Line Location: INACT+29
Function Call: WRITE
  • Prompt: !
  • Line Location: INACT+30
Info |  Source |  Entry Points |  Interaction Calls