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

Package: Lab Service

Routine: LRBLJPA


Information

LRBLJPA ;AVAMC/REG/CYM - BB INVENTORY FINAL DISPOSITION ;6/20/96 09:22 ;

Source Information

Source file <LRBLJPA.m>

Entry Points

Name Comments DBIA/ICR reference
QUE
SET
END

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?18,"INVENTORY- UNITS WITH FINAL DISPOSITION",!?21,"FROM ONE DATE RECEIVED TO ANOTHER",!
  • Line Location: LRBLJPA+6
Function Call: WRITE
  • Prompt: $C(7),!,"There is a list of units printed by ",$P(^VA(200,X,0),"^"),!,"They should be deleted before printing another list. OK "
  • Line Location: LRBLJPA+7
Function Call: WRITE
  • Prompt: !!,"Use supervisor option RU- Remove units with final disposition to delete list.",!
  • Line Location: LRBLJPA+8
Info |  Source |  Entry Points |  Interaction Calls