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

Package: Equipment Turn-In Request

Routine: PRCNSERP


Information

PRCNSERP ;SSI/ALA-Service Priority Report ;[ 02/04/97 6:44 PM ]

Source Information

Source file <PRCNSERP.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Begin report by selecting a service
BEG
ALL
PRI
TRN
SRV
CONT
EXIT
CHKPG ; If printing to screen & it is full, clear screen, if printing to
; a printer take appropriate action
HDR ; Print a header for the report
ITD ; Get item description and format

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Formatting: !
  • Prompt: "Press RETURN to continue or '^' to quit. "
  • Variable: PRCNC
  • Timeout: DTIME
  • Line Location: ALL+3
Function Call: WRITE
  • Prompt: !,$P(PRCNDAT0,U),?20,PRI,?40,$E(PRCNF,1,8)
  • Line Location: TRN+5
Function Call: WRITE
  • Prompt: !,?72,$E(LIN,1,7),!,?70,$J(TOTAL,9,2)
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: !,?35,"*** NO RECORDS TO PRINT *** "
  • Line Location: CONT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CONT+3
Function Call: READ
  • Variable: PRCNC
  • Timeout: DTIME
  • Line Location: CHKPG+4
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"REQUESTS BY SERVICE PRIORITY"
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: $J("",IOM-$L(TXT)\2)
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT(Y,"1P")_" PAGE: "_PG,!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"TRANSACTION #",?20,"PRIORITY",?40,"TYPE",?54,"COST",?62,"QUANTITY",?73,"TOTAL"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,?39,"PARENT SYSTEM",!,?5,"ITEM DESCRIPTION",?39,"/ COMPONENT"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,?40,"JUSTIFICATION",!,LIN,!
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,"SERVICE: ",SRVNM,!
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,?5,^UTILITY($J,"W",DIWL,PI,0)
  • Line Location: ITD+4
Function Call: WRITE
  • Prompt: ?38,$E(PRCNF,1,12),?54,$J(COST,6,2),?62,$J(QTY,4,0),?73,$J(SBTOT,6,2)
  • Line Location: ITD+5

FileMan Files Accessed Via FileMan Db Call

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