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

Package: Imaging

Routine: MAGXCVR


Information

MAGXCVR ;WOIFO/SEB,MLH - Image File Conversion Reports ; 05/18/2007 11:23

Source Information

Source file <MAGXCVR.m>

Entry Points

Name Comments DBIA/ICR reference
REPORT
REPORT1
REPONE(MAGIEN,TYPE)
INDICES(INDXDATA,TYPE)
SUMMARY
ALL
SUMMARY1
HEADER(TYPE)
SUMM(SUMDATA)
DETL(SUMMARY)
DONE
STATUS
ST()

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Are you sure that you want to run this report for ",(END-START+1)," images? Y // "
  • Line Location: REPORT+2
Function Call: WRITE
  • Prompt: !,"OK, report not printed."
  • Line Location: REPORT+3
Function Call: WRITE
  • Prompt: !,"This report must be run on a device at least 132 columns wide."
  • Line Location: REPORT+5
Function Call: WRITE
  • Prompt: !,"This report must be run on a device at least 132 columns wide. Goodbye!"
  • Line Location: REPORT1+1
Function Call: WRITE
  • Prompt: !,MAGIEN
  • Line Location: REPONE+8
Function Call: WRITE
  • Prompt: ?9,"<<< "_$S(GRPFLG:"PARENT ",1:"")_"IMAGE RECORD DOES NOT EXIST! >>>"
  • Line Location: REPONE+10
Function Call: WRITE
  • Prompt: ?9,$E($G(MAGVALS(6,"E")),1,16),?27,$E($G(MAGVALS(10,"E")),1,27),?56,$E($G(MAGVALS(16,"E")),1,20)
  • Line Location: REPONE+18
Function Call: WRITE
  • Prompt: ?78,$E($G(MAGVALS(100,"E")),1,23),?103,$E($G(MAGVALS(3,"E")),1,17),?120,$E(UTYPE,1,10)
  • Line Location: REPONE+19
Function Call: WRITE
  • Prompt: !
  • Line Location: REPONE+21
Function Call: WRITE
  • Prompt: !
  • Line Location: INDICES+2
Function Call: WRITE
  • Prompt: ?TAB,$E(INDXVAL,1,LEN)," "
  • Line Location: INDICES+8
Function Call: WRITE
  • Prompt: $P("Package^Class^Type^Procedure^Specialty",U,D0),": ",$E(INDXVAL,1,LEN),$E(SPACES,1,LEN-$L(INDXVAL))
  • Line Location: INDICES+9
Function Call: WRITE
  • Prompt: !,"This report must be run on a 132-column device. Goodbye!"
  • Line Location: SUMMARY1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMMARY1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: SUMMARY1+9
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SUMMARY1+9
Function Call: WRITE
  • Prompt: !!,"Index Commit History:"
  • Line Location: SUMMARY1+13
Function Call: WRITE
  • Prompt: !?2,I,?8,$P(SUMDATA,U),"-",$P(SUMDATA,U,3)," started on ",$P(SUMDATA,U,2),", finished on ",$P(SUMDATA,U,4)
  • Line Location: SUMMARY1+16
Function Call: READ
  • Timeout: DTIME
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: #
  • Condition for execution: PAGE>0
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !?53,"Image Index Report ",$S(TYPE=1:"Detail",1:"Summary"),?106,"Page #",PAGE
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !,"Img ID",?9,"Procedure",?27,"Short Description",?56,"Parent Data File"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: ?78,"Document Category",?103,"Obj. Type",?120,"User Type"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !?9,"Package",?27,"Class",?36,"Type",?56,"Procedure/Event",?78,"Specialty"
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !?40,"Compiled: ",$P(STATUS,U,2),"-",$P(STATUS,U,4)
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !?(132-11-$L($P(STATUS,U))-$L($P(STATUS,U,3))/2),"Image IDs: ",$P(STATUS,U),"-",$P(STATUS,U,3)
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+15
Function Call: WRITE
  • Prompt: "-"
  • Line Location: HEADER+15
Function Call: WRITE
  • Prompt: !,"Total: ",$P(SUMDATA,U),?15,"First IEN: ",$P(SUMDATA,U,2),?35,"Last IEN: ",$P(SUMDATA,U,3)
  • Line Location: SUMM+0
Function Call: WRITE
  • Prompt: !,"Img ID",?9,"Procedure",?27,"Short Description",?56,"Parent Data File"
  • Line Location: SUMM+2
Function Call: WRITE
  • Prompt: ?78,"Document Category",?103,"Obj. Type",?120,"User Type"
  • Line Location: SUMM+3
Function Call: WRITE
  • Prompt: !,"Img ID",?9,"Procedure",?27,"Short Description",?56,"Parent Data File"
  • Line Location: DETL+1
Function Call: WRITE
  • Prompt: ?78,"Document Category",?103,"Obj. Type",?120,"User Type"
  • Line Location: DETL+2
Function Call: WRITE
  • Prompt: !!,"Done!"
  • Line Location: DONE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: "-"
  • Line Location: STATUS+2
Function Call: WRITE
  • Prompt: !,"Current status: ",$$ST
  • Line Location: STATUS+3
Function Call: WRITE
  • Prompt: " (#",TASKNUM,")"
  • Line Location: STATUS+3
Function Call: WRITE
  • Prompt: ?60,"Current IEN: ",$P(STDATA,U,((STFLAG>3)+1)*6)
  • Line Location: STATUS+4
Function Call: WRITE
  • Prompt: !!,"Last generation started on: ",$P(STDATA,U,3),?53,"Starting IEN: ",$P(STDATA,U,2)
  • Line Location: STATUS+5
Function Call: WRITE
  • Prompt: !?18,"ended on: ",$P(STDATA,U,5),?55,"Ending IEN: ",$P(STDATA,U,4)
  • Line Location: STATUS+6
Function Call: WRITE
  • Prompt: !!?4,"Last commit started on: ",$P(STDATA,U,9),?53,"Starting IEN: ",$P(STDATA,U,8)
  • Line Location: STATUS+7
Function Call: WRITE
  • Prompt: !?18,"ended on: ",$P(STDATA,U,11),?55,"Ending IEN: ",$P(STDATA,U,10)
  • Line Location: STATUS+8
Function Call: WRITE
  • Prompt: !
  • Line Location: STATUS+9
Function Call: WRITE
  • Prompt: "-"
  • Line Location: STATUS+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^MAG(2005 - [#2005] GET1^DIQ,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call