Version dialog poorly displayed in AIX development

[schepurny]

This has been a longtime problem that we haven't bothered reporting before. This appears to happen any time we bring up the versioning dialog (usually from the VA Organizer).

This forum won't allow me to attach any type of file! I can email the image of the problem if needed.

[wembley]

Did you try using the 'Upload attachment' tab near the bottom of the page?

[schepurny]

Yes, I get the message.. The extension bmp is not allowed.

When I tried just about every other file extension in the book I got a similar type of message.

[Eric Clayberg]

Yes, I get the message.. The extension bmp is not allowed.
When I tried just about every other file extension in the book I got a similar type of message.

Try a GIF, JPG or PNG. BMP files are not web friendly.

[schepurny]

Thanks for the suggestion.. that seemed to work.

[solveig]

I have opened a case for this. it is 34944.

Try this filein to rectify the problem.

Code: Select all

!StsVersionPrompter privateMethods !

createWorkRegion

   "Private: WARNING!!!!  This method was automatically generated by
    WindowBuilder Pro.  Code you add here which does not conform
    to the WindowBuilder Pro API will probably be lost the next time
    you save your layout definition."

   | numAnswers offset commentLabel isUnix |

   isUnix := self stsIsUnix.

   label := CwLabel
      createManagedWidget: 'label'
      parent: self workRegion
      argBlock: [:w | w
         width: 380;
         height: 15;
         labelString: 'label';
         yourself].

   text := CwComboBox
      createManagedWidget: 'text'
      parent: self workRegion
      argBlock: [:w | w
         width: 380;
         height: 24;
         editable: true;
         items: #();
         yourself.
         self setFontListFor: w.
         numAnswers := self class answersFor: self keyString.
         isUnix
            ifTrue: [w visibleItemCount: (numAnswers size min: 16)]
            ifFalse: [numAnswers isEmpty ifTrue: [w comboBoxType: XmSIMPLE]]].

   commentLabel := CwLabel
      createManagedWidget: 'commentLabel'
      parent: self workRegion
      argBlock: [:w | w
         width: 380;
         height: 15;
         labelString: 'Revision Note (optional)';
         yourself].

   comment := (self workRegion
      createScrolledText:'comments'
      argBlock: [:w | w
         width: 380;
         height: 64;
         editMode: XmMULTILINEEDIT;
         wordWrap: true;
         yourself.
         self setFontListFor: w]) manageChild.

   settings := CwLabel
      createManagedWidget: 'settings'
      parent: self workRegion
      argBlock: [:w | w
         width: 68;
         labelString: 'Settings...';
         yourself].

   okButton := CwPushButton
      createManagedWidget: 'okButton'
      parent: self workRegion
      argBlock: [:w | w
         width: 68;
         height: 32;
         labelString: 'OK';
         mnemonic: $O;
         showAsDefault: 1;
         recomputeSize: false;
         yourself].

   cancelButton := CwPushButton
      createManagedWidget: 'cancelButton'
      parent: self workRegion
      argBlock: [:w | w
         width: 68;
         height: 32;
         labelString: MxEST261;
         mnemonic: $C;
         recomputeSize: false;
         yourself].

   label
      leftOffset: 8; leftAttachment: XmATTACHFORM;
      rightOffset: 8; rightAttachment: XmATTACHFORM;
      topOffset: 4; topAttachment: XmATTACHFORM.

   offset := self stsIsUnix
      ifTrue: [55]
      ifFalse: [27 + text osWidget textHeight].
   text
      leftOffset: 8; leftAttachment: XmATTACHFORM;
      rightOffset: 8; rightAttachment: XmATTACHFORM;
      topOffset: 27; topAttachment: XmATTACHFORM;
      addCallback: XmNactivateCallback
         receiver: self
         selector: #ok:clientData:callData:
         clientData: nil.
   
   EsSystemInfo osType = 'AIX'
      ifTrue: [text bottomOffset: 4; bottomAttachment: XmATTACHWIDGET; bottomWidget: commentLabel].

   self canAutoFill
      ifTrue: [
         text
            addCallback: XmNmodifyVerifyCallback
               receiver: self
               selector: #modifyVerify:clientData:callData:
               clientData: nil;
            addCallback: XmNvalueChangedCallback
               receiver: self
               selector: #valueChanged:clientData:callData:
               clientData: nil;
            addCallback: XmNsingleSelectionCallback
               receiver: self
               selector: #singleSelection:clientData:callData:
               clientData: nil].

   commentLabel
      leftOffset: 8; leftAttachment: XmATTACHFORM;
      rightOffset: 8; rightAttachment: XmATTACHFORM;
      topOffset: offset; topAttachment: XmATTACHFORM.

   comment parent
      leftOffset: 8; leftAttachment: XmATTACHFORM;
      rightOffset: 8; rightAttachment: XmATTACHFORM;
      topOffset: offset + 20; topAttachment: XmATTACHFORM;
      bottomOffset: 40; bottomAttachment: XmATTACHFORM.

   settings
      leftOffset: 4; leftAttachment: XmATTACHFORM;
      topOffset: -24; topAttachment: XmATTACHOPPOSITEFORM;
      bottomOffset: 4; bottomAttachment: XmATTACHFORM.

   okButton
      leftOffset: (isUnix ifTrue: [-160] ifFalse: [-152]); leftAttachment: XmATTACHOPPOSITEFORM;
      bottomOffset: (isUnix ifTrue: [(EsSystemInfo osType = 'AIX') ifTrue:[0] ifFalse:[4]] ifFalse: [4]); bottomAttachment: XmATTACHFORM;
      topOffset: (isUnix ifTrue: [40] ifFalse: [-32]);
      topAttachment: (isUnix ifTrue: [(EsSystemInfo osType = 'AIX') ifTrue:[XmATTACHNONE] ifFalse:[XmATTACHSELF]] ifFalse: [XmATTACHOPPOSITEFORM]);
      addCallback: XmNactivateCallback
         receiver: self
         selector: #ok:clientData:callData:
         clientData: nil.

   cancelButton
      leftOffset: -76; leftAttachment: XmATTACHOPPOSITEFORM;
      bottomOffset: 4; bottomAttachment: XmATTACHFORM;
      topOffset: (isUnix ifTrue: [40] ifFalse: [-32]);
      topAttachment: (isUnix ifTrue: [(EsSystemInfo osType = 'AIX') ifTrue:[XmATTACHNONE] ifFalse:[XmATTACHSELF]] ifFalse: [XmATTACHOPPOSITEFORM]);
      addCallback: XmNactivateCallback
         receiver: self
         selector: #cancel:clientData:callData:
         clientData: nil.! !