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

Package: Order Entry Results Reporting

Routine: OCXOED13


Information

OCXOED13 ;SLC/RJS,CLA - Rule Editor (Meta Dictionary Link Display) ;10/29/98 12:37

Source Information

Source file <OCXOED13.m>

Entry Points

Name Comments DBIA/ICR reference
S ;
EN(OCXLNK,OCXSRC) ;
DISP(OCXD0,OCXRD,OCXACT) ;
PVAL(SUB,OCXD0,PNAME) ;
CHKVR(OCXD0,OCXRD) ;
CENTER(X,M) ;
SEP(OCXHDR) ;
FIELD(OCXHDR) ;
DATA(OCXVAL,OCXLEN) ;
GETDATA(OCXD0,OCXD) ;
DIC(OCXDIC,OCXDIC0,OCXDICA,OCXX,OCXDICS,OCXDR) ;
DIQ(DIC,DA,OCXDIQ0,OCXARY) ;
ADDLINK(OCXNAME,OCXSRC) ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,OCXTNLN
  • Line Location: DISP+7
Function Call: WRITE
  • Prompt: !,$$CENTER($$FIELD("Meta Dictionary Edit Screen"),80),!
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !," ",$$FIELD("Link:")," ",$$DATA($G(OCXRD("LINK",OCXD0,.01,"E")),50)
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !," ",$$FIELD(" Subject:")," ",$$DATA($G(OCXRD("LINK",OCXD0,.02,"E")),50)
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("Change Attribute","EDATT","14",.OCXACT,OCXD0,"CA")
  • Line Location: DISP+11
Function Call: WRITE
  • Prompt: " ",$$FIELD(" Attribute:")," ",$$DATA($G(OCXRD("LINK",OCXD0,.05,"E")),50)
  • Line Location: DISP+12
Function Call: WRITE
  • Prompt: !!,$$SEP("Parameters"),!
  • Line Location: DISP+14
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("P1","EDPARAM","14",.OCXACT,OCXD0_",""OCXO EXTERNAL FUNCTION CALL""")
  • Line Location: DISP+16
Function Call: WRITE
  • Prompt: " ",$$FIELD(" M Function Call: ")," ",$$DATA($$PVAL("LINK",OCXD0,"OCXO EXTERNAL FUNCTION CALL"),30)
  • Line Location: DISP+17
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("P2","EDPARAM","14",.OCXACT,OCXD0_",""OCXO VARIABLE NAME""")
  • Line Location: DISP+18
Function Call: WRITE
  • Prompt: " ",$$FIELD(" Data Variable Name: ")," ",$$DATA($$PVAL("LINK",OCXD0,"OCXO VARIABLE NAME"),30)
  • Line Location: DISP+19
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("P3","EDPARAM","14",.OCXACT,OCXD0_",""OCXO VT-BAR PIECE NUMBER""")
  • Line Location: DISP+20
Function Call: WRITE
  • Prompt: " ",$$FIELD(" Vertical Bar '|' Piece Number: ")," ",$$DATA($$PVAL("LINK",OCXD0,"OCXO VT-BAR PIECE NUMBER"),30)
  • Line Location: DISP+21
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("P4","EDPARAM","14",.OCXACT,OCXD0_",""OCXO UP-ARROW PIECE NUMBER""")
  • Line Location: DISP+22
Function Call: WRITE
  • Prompt: " ",$$FIELD(" Up Arrow '^' Piece Number: ")," ",$$DATA($$PVAL("LINK",OCXD0,"OCXO UP-ARROW PIECE NUMBER"),30)
  • Line Location: DISP+23
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("P5","EDPARAM","14",.OCXACT,OCXD0_",""OCXO SEMI-COLON PIECE NUMBER""")
  • Line Location: DISP+24
Function Call: WRITE
  • Prompt: " ",$$FIELD(" Semi Colon ';' Piece Number: ")," ",$$DATA($$PVAL("LINK",OCXD0,"OCXO SEMI-COLON PIECE NUMBER"),30)
  • Line Location: DISP+25
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("P6","EDPARAM","14",.OCXACT,OCXD0_",""OCXO FILE POINTER""")
  • Line Location: DISP+26
Function Call: WRITE
  • Prompt: " ",$$FIELD(" Pointed To File Number: ")," ",$$DATA($$PVAL("LINK",OCXD0,"OCXO FILE POINTER"),30)
  • Line Location: DISP+27
Function Call: WRITE
  • Prompt: !," ",$$OPT^OCXOEDT("P7","EDPARAM","14",.OCXACT,OCXD0_",""OCXO HL7 SEGMENT ID""")
  • Line Location: DISP+28
Function Call: WRITE
  • Prompt: " ",$$FIELD(" HL7 Segment ID: ")," ",$$DATA($$PVAL("LINK",OCXD0,"OCXO HL7 SEGMENT ID"),30)
  • Line Location: DISP+29
Function Call: WRITE
  • Prompt: "."
  • Line Location: GETDATA+6
Function Call: WRITE
  • Prompt: "."
  • Line Location: GETDATA+17
Info |  Source |  Entry Points |  Interaction Calls