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

Package: Record Tracking

Routine: RTP4


Information

RTP4 ;MJK/TROY ISC;Charge Out Pull List; ; 5/15/87 11:06 AM ;

Source Information

Source file <RTP4.m>

Entry Points

Name Comments DBIA/ICR reference
6 ;Charge Out Pull List
START
Q
CHK
CHKPULL
SCAN
SET
DIV ;Entry point to determine if pull function is allowed
; with RTAPL and RTDIV defined
MES
FILL
FILL1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"*** Printing an 'UPDATE' listing maybe a good idea ***",!?5,"*** before charging out these records. ***"
  • Line Location: 6+12
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+2
Function Call: WRITE
  • Prompt: @IOF,!,"PULL LIST CHARGE-OUT LOG"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: ?51,"RUN DATE: ",Y
  • Line Location: START+3
Function Call: WRITE
  • Prompt: ?51,"RUN DATE: ",Y
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"Institution: ",$P(^DIC(4,+RTDIV,0),"^")
  • Line Location: DIV+3
Function Call: WRITE
  • Prompt: !!?3,*7,"This function requires the user to be signed onto the",!?3,"system with INSTITUTION parameters defined. Please use",!?3,"the Record Tracking Total System Menu to access this option."
  • Line Location: MES+0
Function Call: WRITE
  • Prompt: !?3,"...'",$P(RTP0,"^"),"' pull list has been charged out."
  • Line Location: FILL+1
Info |  Source |  Entry Points |  Interaction Calls