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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSDGSK

Package: Controlled Substances

Routine: PSDGSK


Information

PSDGSK ;BIR/CML,JPW-Build Sort Key for NAOUs in Inven. Grp ; 2 Aug 94

Source Information

Source file <PSDGSK.m>

Entry Points

Name Comments DBIA/ICR reference
DIC
ASK1
ASK2
NEW
DIE
BOTTOM
END
PRINT
HDR

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !!
  • Prompt: "Make..... "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK1+0
Function Call: WRITE
  • Prompt: !!,"Enter the name of the NAOU you wish to move to another location.",!,"Enter <RET> or ""^"" to EXIT."
  • Line Location: ASK1+0
Function Call: READ
  • Formatting: !
  • Prompt: "Follow... "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK2+0
Function Call: WRITE
  • Prompt: !!,"Enter the name of the NAOU you wish ",NAOUM," to follow.",!,"Enter <RET> or ""^"" to EXIT.",!
  • Line Location: ASK2+0
Function Call: WRITE
  • Prompt: !!,"Do you wish to print the NAOU List again "
  • Line Location: BOTTOM+0
Function Call: WRITE
  • Prompt: !?5,"Enter 'YES' if you wish to see the current AOU sort order for ",!?5,$P(^PSI(58.2,INVGRP,0),"^")
  • Line Location: BOTTOM+0
Function Call: WRITE
  • Prompt: !,"NAOU Inventory Group List",?60,PSDT,!!,"Current NAOU Sort Order for ",$P(^PSI(58.2,INVGRP,0),"^"),!,LN
  • Line Location: HDR+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSI(58.2 - [#58.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call