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

Package: Engineering

Routine: ENFAR9


Information

ENFAR9 ;WIRMFO/SAB-FAP DOCUMENT HISTORY OF EQUIPMENT ;7.21.97

Source Information

Source file <ENFAR9.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; entry
; ask equipment
QEN ; queued entry
EXIT
HD ; header
HDC ; header for continued transaction
FT ; footer
DOC2 ; FA document
DOC3 ; FB document
DOC4 ; FC document
DOC5 ; FD document
DOC6 ; FR document

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," NO FAP DOCUMENTS FOUND"
  • Line Location: QEN+12
Function Call: WRITE
  • Prompt: !,ENTRC,?6,ENTRN,?16,$TR($$FMTE^XLFDT(ENDT,"2DF")," ",0),?26,ENSN
  • Line Location: QEN+27
Function Call: WRITE
  • Prompt: ?54,$E($P($$GET1^DIQ(ENFILE,ENDA("F?"),1.5),","),1,10)
  • Line Location: QEN+30
Function Call: WRITE
  • Prompt: ?65,$J("$"_$FN(ENVALFA+ENVALFB,",",2),14)
  • Line Location: QEN+31
Function Call: WRITE
  • Prompt: !
  • Line Location: QEN+32
Function Call: WRITE
  • Prompt: !
  • Line Location: QEN+35
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: "FAP DOCUMENT HISTORY FOR EQUIPMENT",?49,ENDTR,?72,"page ",ENPG
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !," ENTRY #: ",ENDA("EQ")
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: " CURRENT VALUE: $",$FN($$GET1^DIQ(6914,ENDA("EQ"),12),",",2)
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !!,"TRANSACTION",?26,"STA",?33,"SGL",?38,"DOCUMENT VALUE",?54,"SENDER",?65,"ASSET VALUE"
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !,"CODE*",?6,"NUMBER",?16,"DATE",?26,"NBR",?65,"AFTER DOCUMENT"
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !,"-----",?6,"---------",?16,"--------",?26,"-----",?33,"----"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: ?38,"--------------",?54,"----------",?65,"--------------"
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !,?5,"Transaction: ",$E(ENTRC,1,2),"-",ENTRN," (continued)"
  • Line Location: HDC+1
Function Call: WRITE
  • Prompt: !!," * Betterment # follows FB and FC. T (Turn-In) or D (Final Disp.) follows FD."
  • Line Location: FT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6914 - [#6914] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call