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

Package: Inpatient Medications

Routine: PSJDEA


Information

PSJDEA ;BIR/CML3-HELP TEXT FOR DEA FIELD IN DRUG FILE ;20 JUN 94 / 5:24 PM

Source Information

Source file <PSJDEA.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 YN^DICN  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Inpatient Medications 1 ^PS(50.3  

Entry Points

Name Comments DBIA/ICR reference
EDIT ;
L ; list of codes

External References

Name Field # of Occurrence
YN^DICN PSJDEA+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"The special handling code is 1 to 6 characters. If applicable, the schedule",!,"code must appear in the first position. For example, a schedule 3 narcotic",!,"would be coded as '3A' and a schedule 2 depressant would be coded as '2L'."
  • Line Location: PSJDEA+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PSJDEA+4
Function Call: WRITE
  • Prompt: !,"Would you like a list of the codes"
  • Line Location: PSJDEA+4
Function Call: WRITE
  • Prompt: !,"Would you like a list of the codes"
  • Line Location: PSJDEA+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PSJDEA+5
Function Call: WRITE
  • Prompt: !?10,Y
  • Line Location: PSJDEA+5
Function Call: WRITE
  • Prompt: !
  • Line Location: PSJDEA+6
Function Call: WRITE
  • Prompt: !," The B designation is only valid for schedule 3, 4, and 5 narcotics!",$C(7)
  • Line Location: EDIT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PSJDEA+2~, PSJDEA+4*, PSJDEA+5
%Y PSJDEA+2~
X PSJDEA+2~, PSJDEA+5*, EDIT+1!
Y PSJDEA+2~, PSJDEA+5*

Marked Items

Name Field # of Occurrence
$T(L+X PSJDEA+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Local Variables |  Marked Items |  All